From 9362ab2f42f792644bca8e87545e7b58402741fc Mon Sep 17 00:00:00 2001
From: Lassi Kortela <lassi@lassi.io>
Date: Fri, 31 Jul 2020 11:41:44 +0300
Subject: [PATCH] Add reader directives registry

---
 reader-directive.scm | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 reader-directive.scm

diff --git a/reader-directive.scm b/reader-directive.scm
new file mode 100644
index 0000000..fa48d18
--- /dev/null
+++ b/reader-directive.scm
@@ -0,0 +1,23 @@
+(directive "#!bwp")
+(purpose "broken-weak-pair object")
+(implementations chezscheme)
+
+(directive "#!eof")
+(purpose "end-of-file object")
+(implementations chezscheme chicken gambit)
+
+(directive "#!fold-case")
+(purpose "change to case insensitive identifiers")
+(rnrs r7rs)
+
+(directive "#!no-fold-case")
+(purpose "change to case sensitive identifiers")
+(rnrs r7rs)
+
+(directive "#!r6rs")
+(purpose "change to R6RS read syntax")
+(rnrs r6rs)
+
+(directive "#!r7rs")
+(purpose "change to R7RS read syntax")
+(implementations gauche)