suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Modified sig file, adding err^

Browse Source 
svn: r5739
This commit is contained in:
Kathy Gray 2007-03-06 13:56:54 +00:00
parent 661ba66b1c
commit 7d4c8a053d
3 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/combinator-parser/combinator-unit.ss
View File

@ -4,7 +4,7 @@
"private-combinator/parser-sigs.ss")
(provide combinator-parser-tools@
combinator-parser^
combinator-parser^ err^
error-format-parameters^ language-format-parameters^ language-dictionary^
terminals)

2
collects/combinator-parser/private-combinator/combinator-parser.scm
View File

@ -85,7 +85,7 @@
(define-unit/new-import-export combinator-parser-tools@
(import error-format-parameters^ language-format-parameters^ language-dictionary^)
(export combinator-parser^)
(export combinator-parser^ err^)
((combinator-parser-forms^ parser^ out^) combinator-parser@ error-format-parameters^ language-format-parameters^
language-dictionary^))

4
collects/combinator-parser/private-combinator/parser-sigs.ss
View File

@ -186,8 +186,8 @@
(define-signature error^ (fail-type->message))
(define-signature combinator-parser^ extends combinator-parser-forms^
(parser (struct err (msg src))))
(define-signature combinator-parser^ extends combinator-parser-forms^ (parser))
(define-signature err^ (err? err-msg err-src))
)