foss-mmo/modules/local-storage.scm
2024-05-20 22:12:35 -04:00

11 lines
313 B
Scheme

(define-module (local-storage)
#:use-module (hoot ffi)
#:export (local-storage-ref
local-storage-set!))
(define-foreign local-storage-ref
"localStorage" "getItem"
(ref string) -> (ref string))
(define-foreign local-storage-set!
"localStorage" "setItem"
(ref string) (ref string) -> none)