added more code to ffi
This commit is contained in:
@ -88,8 +88,9 @@ class MyObject(Object)
|
||||
(ffi isError)
|
||||
ifTrue: [System logNl: 'cannot open libc.so' ]
|
||||
ifFalse: [
|
||||
(ffi call: #getpid signature: 'i' arguments: nil) dump.
|
||||
(ffi call: #getpid signature: ')i' arguments: nil) dump.
|
||||
(ffi call: #printf signature: 's|iis)i' arguments: #(S'A=>%d B=>%d Hello, world %s\n' 1 2 'fly away')) dump.
|
||||
ffi close.
|
||||
]
|
||||
}
|
||||
}
|
||||
}
|
@ -242,4 +242,4 @@ extend MyObject
|
||||
System logNl: JJJ.
|
||||
System logNl: -200 asString.
|
||||
}
|
||||
}
|
||||
}
|
Reference in New Issue
Block a user