anchor.diff:                                                                          (OMETA::O
                                                                            OMETA::NULLARG)
                                                                         ""))))))))
  -                                      (SETF SIGN OMETA::V)
  +                                      (SETF OMETA::SIGN OMETA::V)
                                         OMETA::V))
                                     (LAMBDA (OMETA::O OMETA::NULLARG)
                                       (LET ((OMETA::V
  
positive.code:                                                                  (OMETA::O
                                                                    OMETA::NULLARG)
                                                                 (OMETA::OMETA-APPLY
                                                                  OMETA::O 'OMETA::EMPTY
                                                                  NIL))
                                                               (LAMBDA
                                                                   (OMETA::O
  
negative.code:                                                                            OMETA::O
                                                                             'OMETA::SCHARACTERS
                                                                             NIL)))
                                                                       (SETF OMETA::S
                                                                               OMETA::V)
                                                                       OMETA::V))
                                                                   (LAMBDA
                                                                       (OMETA::O
                                                                        OMETA::NULLARG)
                                                                     `(:APP TOKEN
                                                                       ,S)))))
                                                               (LAMBDA
                                                                   (OMETA::O
  