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

bitwise functions

Browse Source 
svn: r12012

original commit: dbadf365a3533ab2554ebe966e4e713e23b95c66
This commit is contained in:
Eli Barzilay 2008-10-13 15:47:52 +00:00
parent 7c6b674141
commit 98d2ec4846
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/typed-scheme/private/base-env.ss
View File

@ -314,6 +314,10 @@
[exp (N . -> . N)]
[arithmetic-shift (-Integer -Integer . -> . -Integer)]
[bitwise-and (null N . ->* . N)]
[bitwise-ior (null N . ->* . N)]
[bitwise-not (null N . ->* . N)]
[bitwise-xor (null N . ->* . N)]
[vector (-poly (a) (->* (list) a (-vec a)))]
[make-string (cl-> [(N) -String] [(N -Char) -String])]