From 5e5c7c6f9abf76efd692eacd9952e31fb4974f94 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Fri, 4 Nov 2011 16:06:18 +0900 Subject: [PATCH] Forgot extra c[ad]*r bindings. --- lib/scheme/base.sld | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/lib/scheme/base.sld b/lib/scheme/base.sld index 0a27bc0e..d751cd71 100644 --- a/lib/scheme/base.sld +++ b/lib/scheme/base.sld @@ -15,10 +15,12 @@ bytevector-copy-partial bytevector-copy-partial! bytevector-length bytevector-u8-ref bytevector-u8-set! bytevector? caar cadr call-with-current-continuation call-with-port call-with-values - call/cc car case cdddar cddddr cdr ceiling char->integer char-ready? - char<=? char=? char>? char? close-input-port - close-output-port close-port complex? cond cond-expand cons - current-error-port current-input-port current-output-port define + call/cc car case cdr cdar cddr caaar caadr cadar caddr cdaar cdadr cddar + cdddr caaaar caaadr caadar caaddr cadaar cadadr caddar cadddr cdaaar + cdaadr cdadar cdaddr cddaar cddadr cdddar cddddr ceiling char->integer + char-ready? char<=? char=? char>? char? + close-input-port close-output-port close-port complex? cond cond-expand + cons current-error-port current-input-port current-output-port define define-record-type define-syntax define-values denominator do dynamic-wind else eof-object? eq? equal? eqv? error error-object-irritants error-object-message error-object? even?