mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-25 04:55:04 +02:00
Added a non-working stub
This commit is contained in:
parent
4f3d7055d4
commit
ae22ecffbe
1 changed files with 12 additions and 0 deletions
12
scheme/time.sld
Normal file
12
scheme/time.sld
Normal file
|
@ -0,0 +1,12 @@
|
||||||
|
(define-library (scheme time)
|
||||||
|
(export
|
||||||
|
current-jiffy ;; TODO: This is just temporary, of course
|
||||||
|
)
|
||||||
|
(import (scheme base)
|
||||||
|
)
|
||||||
|
(begin
|
||||||
|
(define-c prim-test
|
||||||
|
"(void *data, int argc, closure _, object k, object arg1, object arg2)"
|
||||||
|
" return_closcall1(data, k, arg1); ")
|
||||||
|
;; End FFI
|
||||||
|
))
|
Loading…
Add table
Reference in a new issue