From dceba19c6d7d431eb969bae4dba3f7ecf97daf91 Mon Sep 17 00:00:00 2001 From: Joe Marshall Date: Mon, 29 Mar 2010 10:14:45 -0700 Subject: [PATCH] Make STRING-LENGTH a foldable operator. --- src/runtime/scomb.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/runtime/scomb.scm b/src/runtime/scomb.scm index 5a92ec731..d9d1c05b6 100644 --- a/src/runtime/scomb.scm +++ b/src/runtime/scomb.scm @@ -114,10 +114,11 @@ USA. POSITIVE-FIXNUM? POSITIVE? PRIMITIVE-PROCEDURE-ARITY - ;; STRING->SYMBOL is a special case. Strings have can + ;; STRING->SYMBOL is a special case. Strings can ;; be side-effected, but it is useful to be able to ;; constant fold this primitive anyway. STRING->SYMBOL + STRING-LENGTH ZERO-FIXNUM? ZERO? )))) -- 2.25.1