equal
deleted
inserted
replaced
17 instanceVariableNames:'flags moduleName returnType argumentTypes owningClass' |
17 instanceVariableNames:'flags moduleName returnType argumentTypes owningClass' |
18 classVariableNames:'CALLTYPE_API CALLTYPE_C CALLTYPE_MASK CALLTYPE_OLE |
18 classVariableNames:'CALLTYPE_API CALLTYPE_C CALLTYPE_MASK CALLTYPE_OLE |
19 CALLTYPE_UNIX64 CALLTYPE_V8 CALLTYPE_V9 DLLPATH DllMapping |
19 CALLTYPE_UNIX64 CALLTYPE_V8 CALLTYPE_V9 DLLPATH DllMapping |
20 FLAG_ASYNC FLAG_NONVIRTUAL FLAG_OBJECTIVEC FLAG_RETVAL_IS_CONST |
20 FLAG_ASYNC FLAG_NONVIRTUAL FLAG_OBJECTIVEC FLAG_RETVAL_IS_CONST |
21 FLAG_UNLIMITEDSTACK FLAG_VIRTUAL LastModuleHandleHolder |
21 FLAG_UNLIMITEDSTACK FLAG_VIRTUAL LastModuleHandleHolder |
22 LastModuleHandleName Verbose' |
22 LastModuleHandleName Verbose FLAG_RETVAL_MUST_FREE' |
23 poolDictionaries:'' |
23 poolDictionaries:'' |
24 category:'System-Support' |
24 category:'System-Support' |
25 ! |
25 ! |
26 |
26 |
27 !ExternalLibraryFunction primitiveDefinitions! |
27 !ExternalLibraryFunction primitiveDefinitions! |
771 "Created: / 01-08-2006 / 13:56:54 / cg" |
771 "Created: / 01-08-2006 / 13:56:54 / cg" |
772 ! |
772 ! |
773 |
773 |
774 moduleName |
774 moduleName |
775 ^ moduleName |
775 ^ moduleName |
|
776 ! |
|
777 |
|
778 mustFreeReturnValue |
|
779 "specify that a pointer to some C-datum is returned, which must be freed by ST/X. |
|
780 (i.e. points to malloc'd data which is NOT freed by c)" |
|
781 |
|
782 flags := (flags ? 0) bitOr: FLAG_RETVAL_MUST_FREE. |
|
783 |
|
784 "Created: / 12-02-2017 / 23:31:27 / cg" |
776 ! |
785 ! |
777 |
786 |
778 returnType |
787 returnType |
779 ^ returnType |
788 ^ returnType |
780 ! |
789 ! |