diff options
| author | Case Duckworth | 2023-07-26 09:17:05 -0500 |
|---|---|---|
| committer | Case Duckworth | 2023-07-26 09:17:05 -0500 |
| commit | f5d2b328c6a532ae37e97991d2bdb33de3b0d593 (patch) | |
| tree | 007e215df4d06ff1f22aa359051f350a692d5683 | |
| parent | Add a few more extras (diff) | |
| download | chicanery-f5d2b328c6a532ae37e97991d2bdb33de3b0d593.tar.gz chicanery-f5d2b328c6a532ae37e97991d2bdb33de3b0d593.zip | |
Properly export utf8
| -rw-r--r-- | chicanery.egg | 6 | ||||
| -rw-r--r-- | chicanery.scm | 2 |
2 files changed, 5 insertions, 3 deletions
| diff --git a/chicanery.egg b/chicanery.egg index 4fddaec..ca0fb94 100644 --- a/chicanery.egg +++ b/chicanery.egg | |||
| @@ -2,7 +2,7 @@ | |||
| 2 | 2 | ||
| 3 | ((synopsis "Subtly breaking scheme expectations.") | 3 | ((synopsis "Subtly breaking scheme expectations.") |
| 4 | (author "Case Duckworth") | 4 | (author "Case Duckworth") |
| 5 | (version "0.1.0") | 5 | (version "0.2.0") |
| 6 | (license "God Willing License") | 6 | (license "God Willing License") |
| 7 | (category lang-exts) | 7 | (category lang-exts) |
| 8 | (dependencies r7rs utf8) | 8 | (dependencies r7rs utf8) |
| @@ -11,4 +11,6 @@ | |||
| 11 | (source chicanery.scm) | 11 | (source chicanery.scm) |
| 12 | (types-file) ; I don't know what this does ... | 12 | (types-file) ; I don't know what this does ... |
| 13 | (inline-file) | 13 | (inline-file) |
| 14 | (csc-options "-X" "r7rs" "-R" "r7rs")))) | 14 | (csc-options "-X" "r7rs" "-R" "r7rs" |
| 15 | "-X" "utf8" "-R" "utf8" | ||
| 16 | "-no-warnings")))) | ||
| diff --git a/chicanery.scm b/chicanery.scm index a46cd91..12f5ab3 100644 --- a/chicanery.scm +++ b/chicanery.scm | |||
| @@ -19,7 +19,7 @@ | |||
| 19 | (import (scheme repl)) | 19 | (import (scheme repl)) |
| 20 | (import (scheme time)) | 20 | (import (scheme time)) |
| 21 | (import (scheme write)) | 21 | (import (scheme write)) |
| 22 | (import (utf8)) | 22 | (import utf8) |
| 23 | (export * + - / <= < >= = > abs and append apply assoc assq assv begin | 23 | (export * + - / <= < >= = > abs and append apply assoc assq assv begin |
| 24 | binary-port? boolean? boolean=? bytevector bytevector-append | 24 | binary-port? boolean? boolean=? bytevector bytevector-append |
| 25 | bytevector-copy bytevector-copy! bytevector-length bytevector-u8-ref | 25 | bytevector-copy bytevector-copy! bytevector-length bytevector-u8-ref |