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

Fixed the type for fxrshift.

Browse Source
This commit is contained in:
Vincent St-Amour 2010-07-16 09:35:14 -04:00
parent 8c840a2282
commit 85b96a98b3
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
collects/typed-scheme/private/base-env-numeric.rkt
View File

@ -484,8 +484,8 @@
[unsafe-fxior fx-op] [unsafe-fxior fx-op]
[unsafe-fxxor fx-op] [unsafe-fxxor fx-op]
[unsafe-fxnot fx-unop] [unsafe-fxnot fx-unop]
[unsafe-fxlshift fx-intop] [unsafe-fxlshift fx-natop]
[unsafe-fxrshift (cl->* (-> -NonnegativeFixnum -NonnegativeFixnum -NonnegativeFixnum) fx-intop)] [unsafe-fxrshift fx-natop]
[unsafe-fx= fx=-type] [unsafe-fx= fx=-type]
[unsafe-fx< fx<-type] [unsafe-fx< fx<-type]
@ -509,8 +509,8 @@
[fxior fx-op] [fxior fx-op]
[fxxor fx-op] [fxxor fx-op]
[fxnot fx-unop] [fxnot fx-unop]
[fxlshift fx-intop] [fxlshift fx-natop]
[fxrshift (cl->* (-> -NonnegativeFixnum -NonnegativeFixnum -NonnegativeFixnum) fx-intop)] [fxrshift fx-natop]
[fx= fx=-type] [fx= fx=-type]
[fx< fx<-type] [fx< fx<-type]