*** empty log message ***

original commit: c8f5e9305fc279d88c5c1b65a1461500273ca9fa
tokens
Scott Owens 21 years ago
parent c3b300f30a
commit 1bf8516b3b

@ -7,7 +7,7 @@
(require (lib "class.ss") (require (lib "class.ss")
(lib "list.ss") (lib "list.ss")
"yacc-helper.ss" "yacc-helper.ss"
(lib "contracts.ss")) (lib "contract.ss"))
;; Each production has a unique index 0 <= index <= number of productions ;; Each production has a unique index 0 <= index <= number of productions
(define-struct prod (lhs rhs index prec action) (make-inspector)) (define-struct prod (lhs rhs index prec action) (make-inspector))

@ -8,7 +8,7 @@
"../private-lex/token-syntax.ss" "../private-lex/token-syntax.ss"
"grammar.ss" "grammar.ss"
(lib "class.ss") (lib "class.ss")
(lib "contracts.ss")) (lib "contract.ss"))
(provide/contract (provide/contract

@ -5,7 +5,7 @@
"grammar.ss" "grammar.ss"
"table.ss" "table.ss"
(lib "class.ss") (lib "class.ss")
(lib "contracts.ss")) (lib "contract.ss"))
(provide/contract (provide/contract
(build-parser ((string? any? any? syntax? (listof syntax?) (listof syntax?) (build-parser ((string? any? any? syntax? (listof syntax?) (listof syntax?)

Loading…
Cancel
Save