--- a/ExternalLibraryFunction.st Fri Mar 01 14:51:31 2019 +0100
+++ b/ExternalLibraryFunction.st Fri Mar 01 15:40:42 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 2004 by eXept Software AG
All Rights Reserved
@@ -204,7 +202,7 @@
Synchronous vs. Asynchronous calls:
by default, foreign function calls are synchronous, effectively blocking the whole ST/X system
- (that is by purpose,´because most C-code is not prepared for being interrupted, and also, normal
+ (that is by purpose,´because most C-code is not prepared for being interrupted, and also, normal
code is not prepared for a garbage collector to move objects around, while another C thread might
access the data...).
Therefore, the following will block all ST/X activity for 10 seconds
@@ -1256,7 +1254,7 @@
mustFreeRetVal := self mustFreeReturnValue.
alreadyFreed := false.
- argumentsOrNil size > 0 ifTrue:[
+ argumentsOrNil size ~~ 0 ifTrue:[
argumentsOrNil := argumentsOrNil collect:[:arg | self convertArgument:arg]
].
@@ -2808,6 +2806,7 @@
"Created: / 01-08-2006 / 13:56:23 / cg"
"Modified: / 15-05-2017 / 19:48:52 / mawalch"
"Modified: / 01-08-2017 / 14:03:52 / cg"
+ "Modified: / 01-03-2019 / 15:40:14 / Claus Gittinger"
!
tryAgainWithAsyncSafeArguments:argumentsOrNil forCPPInstance:aReceiverOrNil