mirror of
https://github.com/janet-lang/janet
synced 2024-11-25 01:37:19 +00:00
8 lines
149 B
Plaintext
8 lines
149 B
Plaintext
|
(ffi/context "user32.dll")
|
||
|
|
||
|
(ffi/defbind MessageBoxA :int
|
||
|
[w :ptr text :string cap :string typ :int])
|
||
|
|
||
|
(MessageBoxA nil "Hello, World!" "Test" 0)
|
||
|
|