Intern SYSTEM:AVAILABLE-ENCODINGS symbols

(robert Dodier)

c.f. <https://github.com/armedbear/abcl/issues/82>
parent 40c19fa2
......@@ -396,7 +396,7 @@ public class Stream extends StructureObject {
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;
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment