From eeeea2c93ea3755877145b9abb754a88251a88b3 Mon Sep 17 00:00:00 2001
From: Lassi Kortela <lassi@lassi.io>
Date: Sun, 12 May 2019 17:24:27 +0300
Subject: [PATCH] Add EUC-JP test file

---
 encoding-reader.scm |  1 +
 test-euc-jp.scm     | 10 ++++++++++
 2 files changed, 11 insertions(+)
 create mode 100644 test-euc-jp.scm

diff --git a/encoding-reader.scm b/encoding-reader.scm
index 3875bb9..e884b81 100644
--- a/encoding-reader.scm
+++ b/encoding-reader.scm
@@ -117,6 +117,7 @@
   (for-each writeln (read-declarations-from-file filename))
   (newline))
 
+(try-file "test-euc-jp.scm")
 (try-file "test-shift-jis.scm")
 (try-file "test-utf16-be.scm")
 (try-file "test-utf16-le.scm")
diff --git a/test-euc-jp.scm b/test-euc-jp.scm
new file mode 100644
index 0000000..faf0152
--- /dev/null
+++ b/test-euc-jp.scm
@@ -0,0 +1,10 @@
+#! /usr/bin/env gosh
+
+(declare-file
+ (coding EUC-JP)
+ (language scheme r7rs)
+ (copyright 2019 "Lassi Kortela")
+ (spdx-license-identifier "ISC"))
+
+(display "こんにちは世界")
+(newline)