From c4cca0eb3d16560704e7e62258a9b60413a38ddb Mon Sep 17 00:00:00 2001 From: Joe Marshall Date: Fri, 26 Mar 2010 15:54:24 -0700 Subject: [PATCH] Add new parser control variables. --- src/runtime/parse.scm | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/src/runtime/parse.scm b/src/runtime/parse.scm index 4b74c8a49..f9d20aee4 100644 --- a/src/runtime/parse.scm +++ b/src/runtime/parse.scm @@ -31,14 +31,20 @@ USA. (integrate-external "port")) (define *parser-associate-positions?* #f) +(define *parser-atom-delimiters*) (define *parser-canonicalize-symbols?* #t) +(define *parser-constituents*) (define *parser-keyword-style* #f) (define *parser-radix* 10) +(define *parser-table*) (define runtime-parser-associate-positions? #f) +(define runtime-parser-atom-delimiters) (define runtime-parser-canonicalize-symbols? #t) +(define runtime-parser-constituents) (define runtime-parser-keyword-style #f) (define runtime-parser-radix 10) +(define runtime-parser-table) (define ignore-extra-list-closes #t) @@ -109,8 +115,6 @@ USA. (define char-set/atom-delimiters) (define char-set/symbol-quotes) (define char-set/number-leaders) -(define *parser-table*) -(define runtime-parser-table) (define (initialize-package!) (let* ((constituents -- 2.25.1