Add new syntax_entry bit, "p", which indicates that the character is a
authorChris Hanson <org/chris-hanson/cph>
Tue, 16 May 1989 17:01:17 +0000 (17:01 +0000)
committerChris Hanson <org/chris-hanson/cph>
Tue, 16 May 1989 17:01:17 +0000 (17:01 +0000)
prefix character.  A combination of `syntaxcode_whitespace' and this
bit is equivalent to `syntaxcode_quote' -- except that the new bit can
be used in combination with other codes to provide new functionality.

v7/src/microcode/syntax.c

index 4aad917aa03e2ff89ca3ad1bb40162b18d387227..68b4d3d905168eb7296309a93fc9de87bd06a12d 100644 (file)
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/syntax.c,v 1.16 1989/05/16 17:00:37 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/syntax.c,v 1.17 1989/05/16 17:01:17 cph Exp $
 
 Copyright (c) 1987, 1988, 1989 Massachusetts Institute of Technology
 
@@ -108,7 +108,6 @@ DEFINE_PRIMITIVE ("STRING->SYNTAX-ENTRY", Prim_string_to_syntax_entry, 1, 1, 0)
 
   CHECK_ARG (1, STRING_P);
   length = (string_length (ARG_REF (1)));
-  if (length > 7) error_bad_range_arg (1);
   scan = (string_pointer ((ARG_REF (1)), 0));
 
   if ((length--) > 0)