Add type for xor

original commit: 2bc15286300c93542632f296140ed606819fbd88
This commit is contained in:
Asumu Takikawa 2012-12-10 15:44:46 -05:00
parent 300d3dae51
commit 6639ac8f4c

View File

@ -250,7 +250,7 @@
[boolean=? (B B . -> . B)]
[symbol=? (Sym Sym . -> . B)]
[false? (make-pred-ty (-val #f))]
[xor (-> Univ Univ Univ)]