50 lines
1,009 B
Smalltalk
50 lines
1,009 B
Smalltalk
"
|
|
I am the FFI library for libgomuksffi.so. Since that library isnt usually deployed by packages, the path needs to be given using `GmksFFILibrary libraryPath: aPath`.
|
|
"
|
|
Class {
|
|
#name : 'GmksFFILibrary',
|
|
#superclass : 'FFILibrary',
|
|
#classInstVars : [
|
|
'libraryPath'
|
|
],
|
|
#category : 'Gomuks-FFI',
|
|
#package : 'Gomuks',
|
|
#tag : 'FFI'
|
|
}
|
|
|
|
{ #category : 'accessing' }
|
|
GmksFFILibrary class >> libraryPath [
|
|
|
|
^ libraryPath
|
|
]
|
|
|
|
{ #category : 'accessing' }
|
|
GmksFFILibrary class >> libraryPath: anObject [
|
|
|
|
libraryPath := anObject
|
|
]
|
|
|
|
{ #category : 'accessing' }
|
|
GmksFFILibrary >> calloutAPIClass [
|
|
^ TFCalloutAPI
|
|
]
|
|
|
|
{ #category : 'accessing - platform' }
|
|
GmksFFILibrary >> macLibraryName [
|
|
^ self class libraryPath
|
|
]
|
|
|
|
{ #category : 'accessing' }
|
|
GmksFFILibrary >> runner [
|
|
^ TFWorker default.
|
|
]
|
|
|
|
{ #category : 'accessing - platform' }
|
|
GmksFFILibrary >> unixLibraryName [
|
|
^ self class libraryPath
|
|
]
|
|
|
|
{ #category : 'accessing - platform' }
|
|
GmksFFILibrary >> win32LibraryName [
|
|
^ self class libraryPath
|
|
]
|