Add type for xor
This commit is contained in:
parent
77e687579a
commit
2bc1528630
|
@ -250,7 +250,7 @@
|
|||
[boolean=? (B B . -> . B)]
|
||||
[symbol=? (Sym Sym . -> . B)]
|
||||
[false? (make-pred-ty (-val #f))]
|
||||
|
||||
[xor (-> Univ Univ Univ)]
|
||||
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user