Version 3.2 HI-TECH Software Intermediate Code
"12 C:\Program Files\HI-TECH Software\PICC\LITE\9.60\include\stdio.h
[v _ptrdiff_t `i 1 t ]
"13
[v _size_t `ui 1 t ]
"14
[v _wchar_t `us 1 t ]
"53 C:\Program Files\HI-TECH Software\PICC\LITE\9.60\include\stdarg.h
[v _va_list `*v -> -> 1 `i `ux t ]
"39 C:\Program Files\HI-TECH Software\PICC\LITE\9.60\include\stdio.h
[s S1 `*uc 1 `i 1 `*uc 1 `us 1 `s 1 `ui 1 ]
[n S1 _iobuf _ptr _cnt _base _flag _file _size ]
"54
[s S2 `uc -> 81 `i `*S1 1 ]
[n S2 _tfiles tname tfp ]
"166
[v F113 `(v 1 tf ]
"47 C:\Program Files\HI-TECH Software\PICC\LITE\9.60\include\stdlib.h
[s S3 `i 1 `i 1 ]
[n S3 . quot rem ]
[v _div_t `S3 1 t ]
"51
[s S4 `ui 1 `ui 1 ]
[n S4 . quot rem ]
[v _udiv_t `S4 1 t ]
"55
[s S5 `l 1 `l 1 ]
[n S5 . quot rem ]
[v _ldiv_t `S5 1 t ]
"59
[s S6 `ul 1 `ul 1 ]
[n S6 . quot rem ]
[v _uldiv_t `S6 1 t ]
"122
[v F213 `(v 1 tf ]
"126
[v F225 `(i 1 tf2`*Cv`*Cv ]
"127
[v F234 `(i 1 tf2`*Cv`*Cv ]
"38 C:\Program Files\HI-TECH Software\PICC\LITE\9.60\include\setjmp.h
[v _jmp_buf `ui -> 4 `i t ]
"35 C:\Program Files\HI-TECH Software\PICC\LITE\9.60\include\signal.h
[v F339 `(v 1 tf1`i ]
[v F342 `(v 1 tf1`i ]
"26 focal.h
[s S7 `*S7 1 `uc 1 `uc 1 `uc -> -> 1 `i `ux ]
[n S7 line l_fp l_lno l_gno l_text ]
"33
[s S8 `uc 1 `uc 1 `i 1 ]
[n S8 lno ln_lno ln_gno ln_type ]
"47
[v F411 `(d 1 tf1`d ]
"48
[u S10 `d 1 `*F411 1 ]
[n S10 . s_value s_fp ]
"50
[s S9 `*S9 1 `i 1 `i 1 `S10 1 `uc -> -> 1 `i `ux ]
[n S9 sym s_fp s_type s_subs s_un s_id ]
"65
[s S11 `*S11 1 `i 1 `*S7 1 `*uc 1 `*S9 1 `f 1 `f 1 ]
[n S11 control c_fp c_mode c_lp c_tp c_sp c_limit c_step ]
"10 proto.h
[v F442 `(d 1 tf1`d ]
"40 focal2.c
[v _library `(v 1 ef ]
{
[e :U _library ]
[f ]
"41
[v _p `*uc 1 A ]
"42
[v _c `i 1 A ]
"43
[v _d `i 1 A ]
"44
[v _sctp `*uc 1 A ]
"45
[v _lp1 `*S7 1 A ]
"46
[v _lp2 `*S7 1 A ]
"47
[v _fp `*S1 1 A ]
"49
[v _getnb `(i 0 ef ]
[e = _c ( _getnb ..  ]
"50
[e $ ! && && && != -> _c `ui -> 99 `ui != -> _c `ui -> 115 `ui != -> _c `ui -> 108 `ui != -> _c `ui -> 100 `ui 13 ]
"51
[v _diag `(v 0 ef1`*Cuc ]
[e ( _diag (1 :s 1C ]
[e :U 13 ]
"52
[v __ctype_ `Cuc -> 0 `x e ]
[v _ctp `*uc 0 e ]
[e $U 14 ]
[e :U 15 ]
"53
[e =+ _ctp * -> -> 1 `i `x -> -> # `uc `i `x ]
[e :U 14 ]
"52
[e $ != & -> *U + + &U __ctype_ * -> -> 1 `i `x -> -> # `Cuc `i `x * -> *U _ctp `ux -> -> # `Cuc `ui `ux `i | -> 1 `i -> 2 `i -> 0 `i 15 ]
[e :U 16 ]
"54
[e $U 17 ]
[e :U 18 ]
"55
[e =+ _ctp * -> -> 1 `i `x -> -> # `uc `i `x ]
[e :U 17 ]
"54
[e $ || == -> = _d -> *U _ctp `i `ui -> 32 `ui == -> _d `ui -> 9 `ui 18 ]
[e :U 19 ]
"56
[e $ ! && != -> _c `ui -> 108 `ui == _d -> 0 `i 20 ]
"57
[e ( _diag (1 :s 2C ]
[e :U 20 ]
"58
[e = _p _ctp ]
"59
[e $U 21 ]
[e :U 22 ]
"60
[e =+ _ctp * -> -> 1 `i `x -> -> # `uc `i `x ]
[e :U 21 ]
"59
[e $ != -> *U _ctp `i -> 0 `i 22 ]
[e :U 23 ]
"61
[e $U 25 ]
"63
[e :U 26 ]
"64
[v _fopen `(*S1 0 ef2`*Cuc`*Cuc ]
[e $ ! == = _fp ( _fopen (2 , -> _p `*Cuc :s 3C -> -> 0 `i `*S1 27 ]
"65
[e ( _diag (1 :s 4C ]
[e :U 27 ]
"66
[v _linev `*S7 0 e ]
[e = _lp1 _linev ]
"67
[e $U 28 ]
[e :U 29 ]
"68
[e = _lp2 . *U _lp1 0 ]
"69
[v _free `(v 0 ef1`*v ]
[e ( _free (1 -> -> _lp1 `*uc `*v ]
"70
[e = _lp1 _lp2 ]
"71
[e :U 28 ]
"67
[e $ != _lp1 -> -> 0 `i `*S7 29 ]
[e :U 30 ]
"72
[e = _linev -> -> 0 `i `*S7 ]
"73
[e = _sctp _ctp ]
"74
[v _getline `(i 0 ef2`*uc`*S1 ]
[v _abuf `uc -> 0 `x e ]
[e $U 31 ]
[e :U 32 ]
"75
[e = _ctp &U _abuf ]
"76
[e $ ! != = _c ( _getnb ..  -> 0 `i 34 ]
"77
[e $ ! == & -> *U + + &U __ctype_ * -> -> 1 `i `x -> -> # `Cuc `i `x * -> -> _c `uc `ux -> -> # `Cuc `ui `ux `i -> 4 `i -> 0 `i 35 ]
"78
[e ( _diag (1 :s 5C ]
[e :U 35 ]
"79
[v _inject `(v 0 ef1`i ]
[e ( _inject (1 _c ]
"80
[e :U 34 ]
"81
[e :U 31 ]
"74
[e $ != ( _getline (2 , &U _abuf _fp -> 0 `i 32 ]
[e :U 33 ]
"82
[v _fclose `(i 0 ef1`*S1 ]
[e ( _fclose (1 _fp ]
"83
[e = _ctp _sctp ]
"84
[e $U 24 ]
"86
[e :U 36 ]
"90
[v _remove `(i 0 ef1`*Cuc ]
[e $ ! < ( _remove (1 -> _p `*Cuc -> 0 `i 37 ]
"92
[e ( _diag (1 :s 6C ]
[e :U 37 ]
"93
[e $U 24 ]
"95
[e :U 38 ]
"97
[e ( _diag (1 :s 7C ]
"165
[e $U 24 ]
"167
[e :U 39 ]
"168
[e $ ! == = _fp ( _fopen (2 , -> _p `*Cuc :s 8C -> -> 0 `i `*S1 40 ]
"169
[e ( _diag (1 :s 9C ]
[e :U 40 ]
"170
[v _save `(v 0 ef2`*S8`*S1 ]
[e ( _save (2 , -> -> 0 `i `*S8 _fp ]
"171
[e ( _fclose (1 _fp ]
"172
[e $U 24 ]
"173
[e $U 24 ]
"61
[e :U 25 ]
[e [\ _c , $ -> -> 99 `ui `i 26
 , $ -> -> 100 `ui `i 36
 , $ -> -> 108 `ui `i 38
 , $ -> -> 115 `ui `i 39
 24 ]
"173
[e :U 24 ]
"174
[e :UE 12 ]
}
"181
[v _catchcc `(v 1 ef ]
{
[e :U _catchcc ]
[f ]
"182
[v _signal `(*F342 0 ef2`i`*F339 ]
[v F536 `(v 1 tf1`i ]
[v _onintr `(v 0 ef ]
[e ( _signal (2 , -> 1 `i -> &U _onintr `*F536 ]
"183
[e :UE 41 ]
}
"192
[v _onintr `(v 1 ef ]
{
[e :U _onintr ]
[f ]
"193
[v _intflag `i 0 e ]
[e =+ _intflag -> 1 `i ]
"194
[e :UE 42 ]
}
[a 8C 119 0 ]
[a 3C 114 0 ]
[a 4C 67 97 110 110 111 116 32 111 112 101 110 0 ]
[a 5C 68 105 114 101 99 116 32 108 105 110 101 32 105 110 32 99 97 108 108 0 ]
[a 6C 67 97 110 110 111 116 32 100 101 108 101 116 101 0 ]
[a 9C 67 97 110 110 111 116 32 99 114 101 97 116 101 0 ]
[a 2C 77 105 115 115 105 110 103 32 102 105 108 101 32 110 97 109 101 0 ]
[a 1C 66 97 100 32 108 105 98 114 97 114 121 32 99 111 109 109 97 110 100 0 ]
[a 7C 76 105 98 114 97 114 121 32 108 105 115 116 32 110 111 116 32 105 109 112 108 101 109 101 110 116 101 100 0 ]