diff --git a/core/alien/alien.factor b/core/alien/alien.factor index a44d703fbc..7a539d4dd5 100644 --- a/core/alien/alien.factor +++ b/core/alien/alien.factor @@ -5,6 +5,10 @@ kernel.private byte-arrays byte-vectors arrays init continuations.private ; IN: alien +SINGLETONS: stdcall cdecl mingw ; + +UNION: abi stdcall cdecl mingw ; + PREDICATE: pinned-alien < alien underlying>> not ; UNION: pinned-c-ptr pinned-alien POSTPONE: f ;