mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-07-04 08:40:21 +02:00
Code Activity

Deprecate srfi-14 in default environment

Browse source 
* libguile/srfi-14.c:
* module/srfi/srfi-14.scm: Arrange to define bindings here instead of in
the default environment.
* libguile/init.c:
* libguile/srfi-14.h: Fix so that srfi-14 can register an extension to
be loaded later.
* libguile/unidata_to_charset.awk: Rename private cs_letter_plus_digit
to cs_letter_and_digit.
* module/ice-9/deprecated.scm: Add deprecation trampolines for srfi-14.
* module/ice-9/sandbox.scm:
* module/language/elisp/lexer.scm:
* module/language/scheme/decompile-tree-il.scm:
* module/rnrs/unicode.scm:
* module/sxml/simple.scm:
* module/system/base/syntax.scm:
* module/system/repl/server.scm:
* module/texinfo/serialize.scm:
* module/texinfo/string-utils.scm:
* module/web/http.scm:
* module/web/uri.scm:
* test-suite/tests/strings.test:
* test-suite/tests/tree-il.test: Adapt for srfi-14 being in a module.
This commit is contained in:
Andy Wingo 2025-06-13 09:03:20 +02:00
parent 7d899fa7c7
commit 4516119dd1
19 changed files with 330 additions and 148 deletions
Download patch file Download diff file Expand all files Collapse all files

8
module/rnrs/unicode.scm
View file

@ -1,6 +1,6 @@
;;; unicode.scm --- The R6RS Unicode library
;; Copyright (C) 2010 Free Software Foundation, Inc.
;; Copyright (C) 2010, 2025 Free Software Foundation, Inc.
;;
;; This library is free software; you can redistribute it and/or
;; modify it under the terms of the GNU Lesser General Public
@ -69,9 +69,6 @@
char-upper-case?
char-lower-case?
char-set-contains?
char-set:title-case
char-general-category
char-upcase
@ -92,6 +89,9 @@
string-normalize-nfkd
string-normalize-nfc
string-normalize-nfkc)
(only (srfi srfi-14)
char-set-contains?
char-set:title-case)
(rnrs base (6)))
(define (char-foldcase char)