diff options
| author | David Thompson <dthompson2@worcester.edu> | 2024-04-10 14:49:03 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2024-04-10 14:49:03 -0400 |
| commit | 6696a0b5fcb1b17895285d80d9636defb2df3f9d (patch) | |
| tree | 2cce306afcd7776925f725a382ae1a834513636c /strigoform/event.scm | |
| parent | 20b4e7c566cd268f8fafd3e2d3846513e31949e7 (diff) | |
Sloppily refactor into modules.
Diffstat (limited to 'strigoform/event.scm')
| -rw-r--r-- | strigoform/event.scm | 12 |
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))) |