Handbook
Glossary
size-case-type ( cases -- quot )
Vocabulary
alien
.
fortran
.
private
Inputs
cases
an
object
Outputs
quot
an
object
Definition
USING:
accessors
alien.fortran
combinators
kernel
sequences
;
IN:
alien.fortran.private
MACRO:
size-case-type
( cases -- quot )
[
invalid-fortran-type
]
suffix
[
[
size>>
]
]
dip
[
case
]
curry
compose
[
[
append-dimensions
]
bi
]
curry
;