struct->vector
svn: r15645 original commit: 55c9f55cf3e127fa748c619e78adffa5215b3750
This commit is contained in:
parent
93bdf0ebba
commit
71e1b33d99
|
@ -278,6 +278,8 @@
|
|||
[call-with-current-continuation (-poly (a b) (((a . -> . (Un)) . -> . b) . -> . (Un a b)))]
|
||||
[call-with-escape-continuation (-poly (a b) (((a . -> . (Un)) . -> . b) . -> . (Un a b)))]
|
||||
|
||||
[struct->vector (Univ . -> . (-vec Univ))]
|
||||
|
||||
[quotient (-Integer -Integer . -> . -Integer)]
|
||||
[remainder (-Integer -Integer . -> . -Integer)]
|
||||
[quotient/remainder
|
||||
|
|
Loading…
Reference in New Issue
Block a user