Changeset 13713 in project for chicken/trunk/csi.scm


Ignore:
Timestamp:
03/12/09 15:20:51 (11 years ago)
Author:
Kon Lovett
Message:

Removed my stupid -chicken-syntax option.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • chicken/trunk/csi.scm

    r13694 r13713  
    103103        -no-parentheses-synonyms  disables list delimiter synonyms
    104104        -no-symbol-escape         disables support for escaped symbols
    105         -chicken-syntax           enables the Chicken extensions to
    106                                    R5RS syntax
    107105        -r5rs-syntax              disables the Chicken extensions to
    108106                                   R5RS syntax
     
    838836  '("-ss" "-sx" "-script" "-version" "-help" "--help" "-feature" "-eval"
    839837    "-case-insensitive" "-keyword-style" "-no-parentheses-synonyms" "-no-symbol-escape"
    840     "-r5rs-syntax" "-chicken-syntax"
     838    "-r5rs-syntax"
    841839    "-require-extension" "-batch" "-quiet" "-no-warnings" "-no-init"
    842840    "-include-path" "-release" "-print" "-pretty-print" "--") )
     
    867865(define-constant simple-options
    868866  '("--" "-b" "-batch" "-q" "-quiet" "-n" "-no-init" "-w" "-no-warnings" "-i" "-case-insensitive"
    869     "-no-parentheses-synonyms" "-no-symbol-escape" "-r5rs-syntax" "-chicken-syntax"
     867    "-no-parentheses-synonyms" "-no-symbol-escape" "-r5rs-syntax"
    870868    ; Not "simple" but processed early
    871869    "-ss" "-sx" "-s" "-script") )
     
    966964        (unless quiet (display "Disabled support for escaped symbols\n"))
    967965        (symbol-escape #f) )
    968       (when (member* '("-chicken-syntax") args)
    969         (unless quiet (display "Enabled the Chicken extensions to R5RS syntax\n"))
    970         (case-sensitive #t)
    971         (keyword-style #:suffix)
    972         (parentheses-synonyms #t)
    973         (symbol-escape #t) )
    974966      (when (member* '("-r5rs-syntax") args)
    975967        (unless quiet (display "Disabled the Chicken extensions to R5RS syntax\n"))
Note: See TracChangeset for help on using the changeset viewer.