![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to utf-8.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth|
Return to utf-8.fs CVS log | Up to [gforth] / gforth |
| version 1.22, 2006/02/20 08:22:28 | version 1.23, 2006/05/01 09:45:56 |
|---|---|
| Line 162 $80 Value max-single-byte | Line 162 $80 Value max-single-byte |
| s" UTF-8" search nip nip | s" UTF-8" search nip nip |
| IF set-encoding-utf-8 ELSE set-encoding-fixed-width THEN ; | IF set-encoding-utf-8 ELSE set-encoding-fixed-width THEN ; |
| ' utf-8-cold INIT8 chained | :noname ( -- ) |
| defers 'cold | |
| utf-8-cold | |
| ; is 'cold | |
| utf-8-cold | utf-8-cold |