From 41eb286f902bf271e6e2287fbf1de2134d80dbab Mon Sep 17 00:00:00 2001 From: Lassi Kortela Date: Mon, 26 Aug 2019 11:15:38 +0300 Subject: [PATCH] Remove vestigial char.* builtins --- c/string.c | 4 ---- scheme-core/aliases.scm | 2 -- 2 files changed, 6 deletions(-) diff --git a/c/string.c b/c/string.c index 0acd8df..b52c536 100644 --- a/c/string.c +++ b/c/string.c @@ -501,10 +501,6 @@ static struct builtinspec stringfunc_info[] = { { "char-downcase", builtin_char_downcase }, { "char-alphabetic?", builtin_char_alphabetic }, - { "char.upcase", builtin_char_upcase }, - { "char.downcase", builtin_char_downcase }, - { "char.alphabetic?", builtin_char_alphabetic }, - { "number->string", fl_numbertostring }, { "string->number", fl_stringtonumber }, diff --git a/scheme-core/aliases.scm b/scheme-core/aliases.scm index 2d2447b..1fc4710 100644 --- a/scheme-core/aliases.scm +++ b/scheme-core/aliases.scm @@ -66,8 +66,6 @@ (define (char->integer c) (fixnum c)) (define (integer->char i) (wchar i)) -;(define char-upcase #f) -;(define char-downcase #f) (define char=? eqv?) (define char? >)