anchor.diff:                repeated-sequence
                 grouped-sequence
                 meta-identifier
  -              terminal-string
  +              (grammar-func terminal-string
  +                            (lambda (x)
  +                              (list (list 'grammar-string x))))
                 special-sequence
                 empty-sequence))
   
   (grammar-rule syntactic-factor
     "see 4.8"
  -  (grammar-and (grammar-optional (grammar-and ebnf-integer
  -                                              repetition-symbol))
  -               syntactic-primary))
  +  (grammar-func
  +   (grammar-and (grammar-optional (grammar-and ebnf-integer
  +                                               repetition-symbol))
  +                syntactic-primary)
  +   (lambda (x)
  +     (if (car x)
  +         (list 'grammar-n (read-from-string (caaar x))
  +               (cadr x))
  +         (cadr x)))))
   
   (grammar-rule syntactic-exception
     "see 4.7"
  
positive.code:                 definitions-list
                  end-repeat-symbol)
     (lambda (x)
       (list (list :* (caaadr x))))))
    
  
  (grammar-rule grouped-sequence
    "see 4.13"
    (grammar-and start-group-symbol
                 definitions-list
                 end-group-symbol))
  
  (grammar-rule empty-sequence
    "see 4.14"
  
negative.code:           (syntax-abstract vc :start 0))))))
  
  ;; Demos
  ;(iso14977:syntax "(* hello *) test='ab c',\"g\'night\"(*test*) | 'c' , 'd', {'e'}, ['f'] | 3 * 'q'; test2='b'")
  