USING: assocs kernel locals namespaces ;

IN: alien.fortran

:: (fortran-invoke)
( return library function parameters -- quot )
library library-fortran-abis get-global at
dup bad-fortran-abi?
[ [ throw ] curry ] [
drop
return library function parameters ((fortran-invoke))
] if ;