syndicate-lang
/
syndicate-rkt
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Bring up-to-date with Preserves and protocol changes

This commit is contained in:
Tony Garnock-Jones 2024-03-10 12:40:28 +01:00
parent 68ed693c41
commit 54cba83791
3 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
syndicate/private/schemas/racketEvent.prs
View File

@ -1,3 +1,3 @@
version 1 .
RacketEvent = <racket-event @source #!any @event #!any>.
RacketEvent = <racket-event @source #:any @event #:any>.

1
syndicate/rewrite.rkt
View File

@ -21,7 +21,6 @@
[(Pattern-PAtom (PAtom-Boolean)) (boolean? v)]
[(Pattern-PAtom (PAtom-ByteString)) (bytes? v)]
[(Pattern-PAtom (PAtom-Double)) (flonum? v)]
[(Pattern-PAtom (PAtom-Float)) (float? v)]
[(Pattern-PAtom (PAtom-SignedInteger)) (integer? v)]
[(Pattern-PAtom (PAtom-String)) (string? v)]
[(Pattern-PAtom (PAtom-Symbol)) (symbol? v)]

1
syndicate/schema-compiler.rkt
View File

@ -47,7 +47,6 @@
[(SimplePattern-atom atomKind)
`(lambda (stx) #`(? ,(match atomKind
[(AtomKind-Boolean) `boolean?]
[(AtomKind-Float) `float?]
[(AtomKind-Double) `double-flonum?]
[(AtomKind-SignedInteger) `integer?]
[(AtomKind-String) `string?]