--- a/JISEncodedString.st Mon Jun 30 15:42:20 1997 +0200
+++ b/JISEncodedString.st Mon Jun 30 16:32:45 1997 +0200
@@ -77,22 +77,35 @@
!JISEncodedString class methodsFor:'code tables'!
-romanJISDecoderTable
+romanTable
"return a table to decode from roman ascii to 16 bit JIS."
^ #(
+ "excla" " # " " $ " " % " " & " " ' "
16r212a 16r2149 16r2174 16r2170 16r2173 16r2175 16r2147
+ " ( " " ) " " * " " + " " , " " - " " . " " / "
16r214a 16r214b 16r2176 16r215c 16r2124 16r215d 16r2125 16r213f
+ " 0 " " 1 " " 2 " " 3 " " 4 " " 5 " " 6 " " 7 "
16r2330 16r2331 16r2332 16r2333 16r2334 16r2335 16r2336 16r2337
+ " 8 " " 9 " " : " " ; " " < " " = " " > " " ? "
16r2338 16r2339 16r2127 16r2128 16r2163 16r2161 16r2164 16r2129
+ " @ " " A " " B " " C " " D " " E " " F " " G "
16r2177 16r2341 16r2342 16r2343 16r2344 16r2345 16r2346 16r2347
+ " H " " I " " J " " K " " L " " M " " N " " O "
16r2348 16r2349 16r234a 16r234b 16r234c 16r234d 16r234e 16r234f
+ " P " " Q " " R " " S " " T " " U " " V " " W "
16r2350 16r2351 16r2352 16r2353 16r2354 16r2355 16r2356 16r2357
+ " X " " Y " " Z " " [ " " \ " " ] " " ^ " " _ "
16r2358 16r2359 16r235a 16r214e 16r2140 16r214f 16r2130 16r2132
+ " ` " " a " " b " " c " " d " " e " " f " " g "
16r2146 16r2361 16r2362 16r2363 16r2364 16r2365 16r2366 16r2367
+ " h " " i " " j " " k " " l " " m " " n " " o "
16r2368 16r2369 16r236a 16r236b 16r236c 16r236d 16r236e 16r236f
+ " p " " q " " r " " s " " t " " u " " v " " w "
16r2370 16r2371 16r2372 16r2373 16r2374 16r2375 16r2376 16r2377
+ " x " " y " " z " " { " " | " " } " " ~ "
16r2378 16r2379 16r237a 16r2150 16r2143 16r2151 16r2141 16r2121
+
16r2121 16r2123 16r2156 16r2157 16r2122 16r2126 16r2572 16r2521
16r2523 16r2525 16r2527 16r2529 16r2563 16r2565 16r2567 16r2543
16r213c 16r2522 16r2524 16r2526 16r2528 16r252a 16r252b 16r252d
@@ -102,19 +115,20 @@
16r255f 16r2560 16r2561 16r2562 16r2564 16r2566 16r2568 16r2569
16r256a 16r256b 16r256c 16r256d 16r256f 16r2573 16r212b 16r212c ).
- "Created: 26.2.1996 / 17:52:19 / cg"
- "Modified: 22.4.1996 / 16:09:12 / cg"
+ "Created: 30.6.1997 / 14:25:53 / cg"
+ "Modified: 30.6.1997 / 14:36:27 / cg"
! !
!JISEncodedString class methodsFor:'standards'!
jis7KanjiEscapeSequence
- "return the escape sequence used to switch to kanji in jis7 encoded strings"
+ "return the escape sequence used to switch to kanji in jis7 encoded strings.
+ This happens to be the same as ISO2022-JP's escape sequence."
^ Character esc asString , '$B'.
"Created: 26.2.1996 / 17:38:08 / cg"
- "Modified: 22.4.1996 / 16:08:35 / cg"
+ "Modified: 30.6.1997 / 16:03:16 / cg"
!
jis7RomanEscapeSequence
@@ -126,6 +140,14 @@
"Modified: 22.4.1996 / 16:08:42 / cg"
!
+jisISO2022EscapeSequence
+ "return the escape sequence used to switch to kanji in iso2022 encoded strings"
+
+ ^ Character esc asString , '&@' , Character esc asString , '$B'.
+
+ "Created: 30.6.1997 / 16:02:34 / cg"
+!
+
oldJis7KanjiEscapeSequence
"return the escape sequence used to switch to kanji in
old jis7 encoded strings"
@@ -150,6 +172,6 @@
!JISEncodedString class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/JISEncodedString.st,v 1.13 1997-06-28 18:20:25 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/JISEncodedString.st,v 1.14 1997-06-30 14:32:37 cg Exp $'
! !
JISEncodedString initialize!