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

Add type for fl->exact-integer. Closes PR 11429.

Browse Source
This commit is contained in:
Vincent St-Amour 2010-11-22 17:36:15 -05:00
parent 58d1f75dc1
commit 54991835d6
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -381,6 +381,9 @@
[inexact->exact (cl->* [inexact->exact (cl->*
(-Real . -> . -ExactRational) (-Real . -> . -ExactRational)
(N . -> . N))] (N . -> . N))]
[fl->exact-integer (cl->*
(-NonnegativeFlonum . -> . -Nat)
(-Flonum . -> . -Integer))]
[floor rounder] [floor rounder]
[ceiling rounder] [ceiling rounder]