Annotation of parser3/tests/230.html, revision 1.3

1.1       misha       1: @main[]
                      2: $sSourceFile[230_utf8.txt]
                      3: $sTargetFile[230_target.txt]
                      4: 
                      5: $s1251[windows-1251]
                      6: $sUTF[UTF-8]
                      7: 
                      8: $f[^file::load[text;$sSourceFile]]
                      9: 
                     10: 
                     11: ^f.save[text;$sTargetFile]
                     12: ^load[$sTargetFile;$sUTF]
                     13: 
                     14: ^f.save[text;$sTargetFile;
                     15:        $.charset[$s1251]
                     16: ]
                     17: ^load[$sTargetFile;$s1251]
                     18: 
                     19: ^do{
                     20:        ^f.save[text;$sTargetFile;
                     21:                $.unknown-option[zigi]
                     22:        ]
                     23: }
                     24: 
                     25: 
                     26: <hr />
                     27: 
                     28: ^f.text.save[$sTargetFile]
                     29: ^load[$sTargetFile;$sUTF]
                     30: 
                     31: ^f.text.save[append;$sTargetFile]
                     32: ^load[$sTargetFile;$sUTF]
                     33: 
                     34: 
                     35: ^f.text.save[$sTargetFile;
                     36:        $.charset[$s1251]
                     37: ]
                     38: ^load[$sTargetFile;$s1251]
                     39: 
                     40: 
                     41: ^f.text.save[$sTargetFile;
                     42:        $.charset[$s1251]
                     43:        $.append(true)
                     44: ]
                     45: ^load[$sTargetFile;$s1251]
                     46: 
                     47: ^do{
                     48: ^f.text.save[$sTargetFile;
                     49:        $.charset[$s1251]
                     50:        $.append(true)
                     51:        $.unknown-option[zigi]
                     52: ]
                     53: }
                     54: 
                     55: @load[sFileName;sCharset][f]
                     56: $f[^file::load[text;$sFileName;
                     57:        $.charset[$sCharset]
                     58: ]]
                     59: $sCharset=$f.text<br />
                     60: 
                     61: @do[jCode]
1.3     ! moko       62: ^try-catch{
1.1       misha      63:        $jCode
                     64: }
1.3     ! moko       65: <br />

E-mail: