add singletons for stdcall, cdecl, mingw abis

release
Joe Groff 2010-03-31 19:17:06 -07:00
parent 000c21fc66
commit 565e3383ab
1 changed files with 4 additions and 0 deletions

View File

@ -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 ;