From dfaf83a6438037b40e9b5d7ed464398f0552c630 Mon Sep 17 00:00:00 2001
From: mevenson <mevenson@1c010e3e-69d0-11dd-93a8-456734b0d56f>
Date: Sun, 1 Apr 2018 11:41:34 +0000
Subject: [PATCH] Intern SYSTEM:AVAILABLE-ENCODINGS symbols

(robert Dodier)

c.f. <https://github.com/armedbear/abcl/issues/82>

git-svn-id: https://abcl.org/svn/trunk/abcl@15114 1c010e3e-69d0-11dd-93a8-456734b0d56f
---
 src/org/armedbear/lisp/Stream.java | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/org/armedbear/lisp/Stream.java b/src/org/armedbear/lisp/Stream.java
index 60f262df..1b1d43d0 100644
--- a/src/org/armedbear/lisp/Stream.java
+++ b/src/org/armedbear/lisp/Stream.java
@@ -396,7 +396,7 @@ static public List<Symbol> availableEncodings() {
     SortedMap<String, Charset> available = Charset.availableCharsets();
     Set<String> encodings = available.keySet();
     for (String charset : encodings) {
-      result.add(new Symbol(charset, PACKAGE_KEYWORD));
+      result.add (PACKAGE_KEYWORD.intern (charset));
     }
     return result;
   }