mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-16 06:12:25 -08:00
Code Issues Projects Releases Packages Wiki Activity

Added more aliases which are compatible with iconv's

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2009-01-09 11:10:43 +01:00
parent 1bf50bed96
commit 392cb901f6
1 changed files with 18 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

35
contrib/encodings/generate.lisp
View file

@ -35,13 +35,13 @@
(:koi8-r :koi8r)
(:iso-8859-1 :latin-1 :latin1)
(:iso-8859-1 :latin-1 :latin1 :cp819 :ibm819)
(:iso-8859-2 :latin-2 :latin2)
(:iso-8859-3 :latin-3 :latin3)
(:iso-8859-4 :latin-4 :latin4)
(:iso-8859-5 :latin-5 :latin5 :cyrillic)
(:iso-8859-6 :latin-6 :latin6 :arabic)
(:iso-8859-7 :latin-7 :latin7 :greek)
(:iso-8859-7 :latin-7 :latin7 :greek :ecma-118)
(:iso-8859-8 :latin-8 :latin8 :hebrew)
(:iso-8859-9 :latin-9 :latin9)
(:iso-8859-10 :latin-10 :latin10)
@ -49,32 +49,32 @@
(:iso-8859-15 :latin-0 :latin0)
(:dos-cp437 :ibm437)
(:dos-cp850 :ibm850)
(:dos-cp850 :ibm850 :cp850)
(:dos-cp852 :ibm852)
(:dos-cp855 :ibm855)
(:dos-cp857 :ibm857)
(:dos-cp860 :ibm860)
(:dos-cp861 :ibm861)
(:dos-cp862 :ibm862)
(:dos-cp862 :ibm862 :cp862)
(:dos-cp863 :ibm863)
(:dos-cp864 :ibm864)
(:dos-cp865 :ibm865)
(:dos-cp866 :ibm866)
(:dos-cp866 :ibm866 :cp866)
(:dos-cp869 :ibm869)
(:windows-cp932 :windows-932)
(:windows-cp936 :windows-936)
(:windows-cp949 :windows-949)
(:windows-cp950 :windows-950)
(:windows-cp932 :windows-932 :cp932)
(:windows-cp936 :windows-936 :cp936)
(:windows-cp949 :windows-949 :cp949)
(:windows-cp950 :windows-950 :cp950)
(:windows-cp1250 :windows-1250)
(:windows-cp1251 :windows-1251)
(:windows-cp1252 :windows-1252)
(:windows-cp1253 :windows-1253)
(:windows-cp1254 :windows-1254)
(:windows-cp1255 :windows-1255)
(:windows-cp1256 :windows-1256)
(:windows-cp1257 :windows-1257)
(:windows-cp1250 :windows-1250 :ms-ee)
(:windows-cp1251 :windows-1251 :ms-cyrl)
(:windows-cp1252 :windows-1252 :ms-ansi)
(:windows-cp1253 :windows-1253 :ms-greek)
(:windows-cp1254 :windows-1254 :ms-turk)
(:windows-cp1255 :windows-1255 :ms-hebr)
(:windows-cp1256 :windows-1256 :ms-arab)
(:windows-cp1257 :windows-1257 :winbaltrim)
(:windows-cp1258 :windows-1258)
))
@ -87,5 +87,6 @@
(format t "~%;;; Creating alias ~A -> ~A, ~A" alias name filename)
(format out "(defparameter ext::~A 'ext::~A)" alias name))))
(copy-file "ext:encodings;tools.lisp" "build:encodings;tools.lisp")
(copy-file "ext:encodings;ISO-2022-JP" "build:encodings;ISO-2022-JP")
(copy-file "ext:encodings;ISO-2022-JP-1" "build:encodings;ISO-2022-JP-1")