anchor.diff:    (:anyof :UNQUALIFIED-CLAIM-NAME :QUALIFIED-CLAIM-NAME))
   
   (define-sw-parser-rule :UNQUALIFIED-CLAIM-NAME ()
  -  (1 :CLAIM-NAME)
  +  (:tuple (1 :CLAIM-NAME))
     (MetaSlang::mkUnQualifiedId 1))
   
   (define-sw-parser-rule :QUALIFIED-CLAIM-NAME ()
  
positive.code:    ((:tuple "using")        "using")
     ((:tuple "options")      "options")
     ((:tuple "answerVar")    "answerVar")
     ((1 :SYMBOL)             (common-lisp::symbol-name (quote 1)))
     ))
  
  (define-sw-parser-rule :EQUALS ()
  
negative.code: 
  (define-sw-parser-rule :NAME ()
    (:anyof
     ((:tuple "=")              "=")	; so we can use "="  in expressions, e.g "A = B"
     ((:tuple (1 :SYMBOL-NAME)) 1)
     ))
  
  