summaryrefslogtreecommitdiff
path: root/strigoform/event.scm
diff options
context:
space:
mode:
Diffstat (limited to 'strigoform/event.scm')
-rw-r--r--strigoform/event.scm12
1 files changed, 12 insertions, 0 deletions
diff --git a/strigoform/event.scm b/strigoform/event.scm
new file mode 100644
index 0000000..5f47099
--- /dev/null
+++ b/strigoform/event.scm
@@ -0,0 +1,12 @@
+(library (strigoform event)
+ (export prevent-default!
+ keyboard-event-code)
+ (import (scheme base)
+ (hoot ffi))
+
+ (define-foreign prevent-default!
+ "event" "preventDefault"
+ (ref null extern) -> none)
+ (define-foreign keyboard-event-code
+ "event" "keyboardCode"
+ (ref null extern) -> (ref string)))