version 1.25, 2008/07/15 16:11:49
|
version 1.26, 2008/08/05 07:52:44
|
Line 431 also cb-decl definitions
|
Line 431 also cb-decl definitions
|
' ffi-arg-longlong 8 argtype' llong |
' ffi-arg-longlong 8 argtype' llong |
' ffi-arg-dlong 6 argtype' dlong |
' ffi-arg-dlong 6 argtype' dlong |
' ffi-arg-ptr &12 argtype' ptr |
' ffi-arg-ptr &12 argtype' ptr |
|
: ints ( n -- ) 0 ?DO postpone int LOOP ; immediate |
|
|
' ffi-ret-void 0 rettype' (void) |
' ffi-ret-void 0 rettype' (void) |
' ffi-ret-int 6 rettype' (int) |
' ffi-ret-int 6 rettype' (int) |