equal
deleted
inserted
replaced
1004 filename suffix isEmpty ifTrue:[ |
1004 filename suffix isEmpty ifTrue:[ |
1005 "/ try again with the OS-specific dll-extension |
1005 "/ try again with the OS-specific dll-extension |
1006 ^ self loadLibrary:(filename withSuffix:ObjectFileLoader sharedLibrarySuffix) |
1006 ^ self loadLibrary:(filename withSuffix:ObjectFileLoader sharedLibrarySuffix) |
1007 ]. |
1007 ]. |
1008 |
1008 |
|
1009 "/ check for: the dll-path in: |
|
1010 "/ - owningClass dllPath |
|
1011 "/ - self class dllPath |
|
1012 "/ check for: the dll-name mapping |
|
1013 "/ - DllMapping (the classVar, but accessed via self class dllMapping) |
|
1014 "/ this can map both basenames and whole pathnames |
|
1015 "/ eg: self class dllMapping at:'libtesseract' put:('/opt/local/lib/libtesseract.dylib'). |
|
1016 "/ see also the settings dialog for external libraries. |
1009 self |
1017 self |
1010 error:('Cannot find or load dll/module: "%1"' bindWith:nameString) |
1018 error:('Cannot find or load dll/module: "%1"' bindWith:nameString) |
1011 mayProceed:true. |
1019 mayProceed:true. |
1012 ^ nil |
1020 ^ nil |
1013 |
1021 |
1014 "Modified: / 12-11-2016 / 11:27:23 / cg" |
1022 "Modified: / 12-11-2016 / 11:27:23 / cg" |
|
1023 "Modified (comment): / 11-02-2017 / 16:45:40 / cg" |
1015 ! |
1024 ! |
1016 |
1025 |
1017 prepareInvoke |
1026 prepareInvoke |
1018 "called before invoked. |
1027 "called before invoked. |
1019 When called the very first time, moduleHandle is nil, |
1028 When called the very first time, moduleHandle is nil, |