/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / a_utils / perl / mac-perl / mcprl402.bin / Perl_src / handy.h

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 07 68 61 6e 64 79 2e | 68 00 00 00 00 00 00 00 |..handy.|h.......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 12 f1 00 | 00 01 ac a6 eb cb bd a6 |........|........|
|00000060| eb cb bd 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 2f 0b 00 00 |........|..../...|
|00000080| 2f 2a 20 24 52 43 53 66 | 69 6c 65 3a 20 68 61 6e |/* $RCSf|ile: han|
|00000090| 64 79 2e 68 2c 76 20 24 | 24 52 65 76 69 73 69 6f |dy.h,v $|$Revisio|
|000000a0| 6e 3a 20 34 2e 30 2e 31 | 2e 34 20 24 24 44 61 74 |n: 4.0.1|.4 $$Dat|
|000000b0| 65 3a 20 39 32 2f 30 36 | 2f 30 38 20 31 33 3a 32 |e: 92/06|/08 13:2|
|000000c0| 33 3a 31 37 20 24 0d 20 | 2a 0d 20 2a 20 20 20 20 |3:17 $. |*. *    |
|000000d0| 43 6f 70 79 72 69 67 68 | 74 20 28 63 29 20 31 39 |Copyrigh|t (c) 19|
|000000e0| 39 31 2c 20 4c 61 72 72 | 79 20 57 61 6c 6c 0d 20 |91, Larr|y Wall. |
|000000f0| 2a 0d 20 2a 20 20 20 20 | 59 6f 75 20 6d 61 79 20 |*. *    |You may |
|00000100| 64 69 73 74 72 69 62 75 | 74 65 20 75 6e 64 65 72 |distribu|te under|
|00000110| 20 74 68 65 20 74 65 72 | 6d 73 20 6f 66 20 65 69 | the ter|ms of ei|
|00000120| 74 68 65 72 20 74 68 65 | 20 47 4e 55 20 47 65 6e |ther the| GNU Gen|
|00000130| 65 72 61 6c 20 50 75 62 | 6c 69 63 0d 20 2a 20 20 |eral Pub|lic. *  |
|00000140| 20 20 4c 69 63 65 6e 73 | 65 20 6f 72 20 74 68 65 |  Licens|e or the|
|00000150| 20 41 72 74 69 73 74 69 | 63 20 4c 69 63 65 6e 73 | Artisti|c Licens|
|00000160| 65 2c 20 61 73 20 73 70 | 65 63 69 66 69 65 64 20 |e, as sp|ecified |
|00000170| 69 6e 20 74 68 65 20 52 | 45 41 44 4d 45 20 66 69 |in the R|EADME fi|
|00000180| 6c 65 2e 0d 20 2a 0d 20 | 2a 20 24 4c 6f 67 3a 09 |le.. *. |* $Log:.|
|00000190| 68 61 6e 64 79 2e 68 2c | 76 20 24 0d 20 2a 20 52 |handy.h,|v $. * R|
|000001a0| 65 76 69 73 69 6f 6e 20 | 34 2e 30 2e 31 2e 34 20 |evision |4.0.1.4 |
|000001b0| 20 39 32 2f 30 36 2f 30 | 38 20 20 31 33 3a 32 33 | 92/06/0|8  13:23|
|000001c0| 3a 31 37 20 20 6c 77 61 | 6c 6c 0d 20 2a 20 70 61 |:17  lwa|ll. * pa|
|000001d0| 74 63 68 32 30 3a 20 69 | 73 61 73 63 69 69 28 29 |tch20: i|sascii()|
|000001e0| 20 6d 61 79 20 6e 6f 77 | 20 62 65 20 73 75 70 70 | may now| be supp|
|000001f0| 6c 69 65 64 20 62 79 20 | 61 20 6c 69 62 72 61 72 |lied by |a librar|
|00000200| 79 20 72 6f 75 74 69 6e | 65 0d 20 2a 20 70 61 74 |y routin|e. * pat|
|00000210| 63 68 32 30 3a 20 50 65 | 72 6c 20 6e 6f 77 20 64 |ch20: Pe|rl now d|
|00000220| 69 73 74 69 6e 67 75 69 | 73 68 65 73 20 6f 76 65 |istingui|shes ove|
|00000230| 72 6c 61 70 70 65 64 20 | 63 6f 70 69 65 73 20 66 |rlapped |copies f|
|00000240| 72 6f 6d 20 6e 6f 6e 2d | 6f 76 65 72 6c 61 70 70 |rom non-|overlapp|
|00000250| 65 64 0d 20 2a 20 0d 20 | 2a 20 52 65 76 69 73 69 |ed. * . |* Revisi|
|00000260| 6f 6e 20 34 2e 30 2e 31 | 2e 33 20 20 39 31 2f 31 |on 4.0.1|.3  91/1|
|00000270| 31 2f 30 35 20 20 32 32 | 3a 35 34 3a 32 36 20 20 |1/05  22|:54:26  |
|00000280| 6c 77 61 6c 6c 0d 20 2a | 20 70 61 74 63 68 31 31 |lwall. *| patch11|
|00000290| 3a 20 65 72 72 61 74 75 | 6d 0d 20 2a 20 0d 20 2a |: erratu|m. * . *|
|000002a0| 20 52 65 76 69 73 69 6f | 6e 20 34 2e 30 2e 31 2e | Revisio|n 4.0.1.|
|000002b0| 32 20 20 39 31 2f 31 31 | 2f 30 35 20 20 31 37 3a |2  91/11|/05  17:|
|000002c0| 32 33 3a 33 38 20 20 6c | 77 61 6c 6c 0d 20 2a 20 |23:38  l|wall. * |
|000002d0| 70 61 74 63 68 31 31 3a | 20 70 72 65 70 61 72 65 |patch11:| prepare|
|000002e0| 64 20 66 6f 72 20 63 74 | 79 70 65 20 69 6d 70 6c |d for ct|ype impl|
|000002f0| 65 6d 65 6e 74 61 74 69 | 6f 6e 73 20 74 68 61 74 |ementati|ons that|
|00000300| 20 64 6f 6e 27 74 20 64 | 65 66 69 6e 65 20 69 73 | don't d|efine is|
|00000310| 61 73 63 69 69 28 29 0d | 20 2a 20 0d 20 2a 20 52 |ascii().| * . * R|
|00000320| 65 76 69 73 69 6f 6e 20 | 34 2e 30 2e 31 2e 31 20 |evision |4.0.1.1 |
|00000330| 20 39 31 2f 30 36 2f 30 | 37 20 20 31 31 3a 30 39 | 91/06/0|7  11:09|
|00000340| 3a 35 36 20 20 6c 77 61 | 6c 6c 0d 20 2a 20 70 61 |:56  lwa|ll. * pa|
|00000350| 74 63 68 34 3a 20 6e 65 | 77 20 63 6f 70 79 72 69 |tch4: ne|w copyri|
|00000360| 67 68 74 20 6e 6f 74 69 | 63 65 0d 20 2a 20 0d 20 |ght noti|ce. * . |
|00000370| 2a 20 52 65 76 69 73 69 | 6f 6e 20 34 2e 30 20 20 |* Revisi|on 4.0  |
|00000380| 39 31 2f 30 33 2f 32 30 | 20 20 30 31 3a 32 32 3a |91/03/20|  01:22:|
|00000390| 31 35 20 20 6c 77 61 6c | 6c 0d 20 2a 20 34 2e 30 |15  lwal|l. * 4.0|
|000003a0| 20 62 61 73 65 6c 69 6e | 65 2e 0d 20 2a 20 0d 20 | baselin|e.. * . |
|000003b0| 2a 2f 0d 0d 23 69 66 64 | 65 66 20 4e 55 4c 4c 0d |*/..#ifd|ef NULL.|
|000003c0| 23 75 6e 64 65 66 20 4e | 55 4c 4c 0d 23 65 6e 64 |#undef N|ULL.#end|
|000003d0| 69 66 0d 23 69 66 6e 64 | 65 66 20 49 32 38 36 0d |if.#ifnd|ef I286.|
|000003e0| 23 20 20 64 65 66 69 6e | 65 20 4e 55 4c 4c 20 30 |#  defin|e NULL 0|
|000003f0| 0d 23 65 6c 73 65 0d 23 | 20 20 64 65 66 69 6e 65 |.#else.#|  define|
|00000400| 20 4e 55 4c 4c 20 30 4c | 0d 23 65 6e 64 69 66 0d | NULL 0L|.#endif.|
|00000410| 23 64 65 66 69 6e 65 20 | 4e 75 6c 6c 28 74 79 70 |#define |Null(typ|
|00000420| 65 29 20 28 28 74 79 70 | 65 29 4e 55 4c 4c 29 0d |e) ((typ|e)NULL).|
|00000430| 23 64 65 66 69 6e 65 20 | 4e 75 6c 6c 63 68 20 4e |#define |Nullch N|
|00000440| 75 6c 6c 28 63 68 61 72 | 2a 29 0d 23 64 65 66 69 |ull(char|*).#defi|
|00000450| 6e 65 20 4e 75 6c 6c 66 | 70 20 4e 75 6c 6c 28 46 |ne Nullf|p Null(F|
|00000460| 49 4c 45 2a 29 0d 0d 23 | 69 66 64 65 66 20 55 54 |ILE*)..#|ifdef UT|
|00000470| 53 0d 23 64 65 66 69 6e | 65 20 62 6f 6f 6c 20 69 |S.#defin|e bool i|
|00000480| 6e 74 0d 23 65 6c 73 65 | 0d 23 64 65 66 69 6e 65 |nt.#else|.#define|
|00000490| 20 62 6f 6f 6c 20 63 68 | 61 72 0d 23 65 6e 64 69 | bool ch|ar.#endi|
|000004a0| 66 0d 0d 23 69 66 64 65 | 66 20 54 52 55 45 0d 23 |f..#ifde|f TRUE.#|
|000004b0| 75 6e 64 65 66 20 54 52 | 55 45 0d 23 65 6e 64 69 |undef TR|UE.#endi|
|000004c0| 66 0d 23 69 66 64 65 66 | 20 46 41 4c 53 45 0d 23 |f.#ifdef| FALSE.#|
|000004d0| 75 6e 64 65 66 20 46 41 | 4c 53 45 0d 23 65 6e 64 |undef FA|LSE.#end|
|000004e0| 69 66 0d 23 64 65 66 69 | 6e 65 20 54 52 55 45 20 |if.#defi|ne TRUE |
|000004f0| 28 31 29 0d 23 64 65 66 | 69 6e 65 20 46 41 4c 53 |(1).#def|ine FALS|
|00000500| 45 20 28 30 29 0d 0d 23 | 64 65 66 69 6e 65 20 43 |E (0)..#|define C|
|00000510| 74 6c 28 63 68 29 20 28 | 63 68 20 26 20 30 33 37 |tl(ch) (|ch & 037|
|00000520| 29 0d 0d 23 64 65 66 69 | 6e 65 20 73 74 72 4e 45 |)..#defi|ne strNE|
|00000530| 28 73 31 2c 73 32 29 20 | 28 73 74 72 63 6d 70 28 |(s1,s2) |(strcmp(|
|00000540| 73 31 2c 73 32 29 29 0d | 23 64 65 66 69 6e 65 20 |s1,s2)).|#define |
|00000550| 73 74 72 45 51 28 73 31 | 2c 73 32 29 20 28 21 73 |strEQ(s1|,s2) (!s|
|00000560| 74 72 63 6d 70 28 73 31 | 2c 73 32 29 29 0d 23 64 |trcmp(s1|,s2)).#d|
|00000570| 65 66 69 6e 65 20 73 74 | 72 4c 54 28 73 31 2c 73 |efine st|rLT(s1,s|
|00000580| 32 29 20 28 73 74 72 63 | 6d 70 28 73 31 2c 73 32 |2) (strc|mp(s1,s2|
|00000590| 29 20 3c 20 30 29 0d 23 | 64 65 66 69 6e 65 20 73 |) < 0).#|define s|
|000005a0| 74 72 4c 45 28 73 31 2c | 73 32 29 20 28 73 74 72 |trLE(s1,|s2) (str|
|000005b0| 63 6d 70 28 73 31 2c 73 | 32 29 20 3c 3d 20 30 29 |cmp(s1,s|2) <= 0)|
|000005c0| 0d 23 64 65 66 69 6e 65 | 20 73 74 72 47 54 28 73 |.#define| strGT(s|
|000005d0| 31 2c 73 32 29 20 28 73 | 74 72 63 6d 70 28 73 31 |1,s2) (s|trcmp(s1|
|000005e0| 2c 73 32 29 20 3e 20 30 | 29 0d 23 64 65 66 69 6e |,s2) > 0|).#defin|
|000005f0| 65 20 73 74 72 47 45 28 | 73 31 2c 73 32 29 20 28 |e strGE(|s1,s2) (|
|00000600| 73 74 72 63 6d 70 28 73 | 31 2c 73 32 29 20 3e 3d |strcmp(s|1,s2) >=|
|00000610| 20 30 29 0d 23 64 65 66 | 69 6e 65 20 73 74 72 6e | 0).#def|ine strn|
|00000620| 4e 45 28 73 31 2c 73 32 | 2c 6c 29 20 28 73 74 72 |NE(s1,s2|,l) (str|
|00000630| 6e 63 6d 70 28 73 31 2c | 73 32 2c 6c 29 29 0d 23 |ncmp(s1,|s2,l)).#|
|00000640| 64 65 66 69 6e 65 20 73 | 74 72 6e 45 51 28 73 31 |define s|trnEQ(s1|
|00000650| 2c 73 32 2c 6c 29 20 28 | 21 73 74 72 6e 63 6d 70 |,s2,l) (|!strncmp|
|00000660| 28 73 31 2c 73 32 2c 6c | 29 29 0d 0d 23 69 66 20 |(s1,s2,l|))..#if |
|00000670| 64 65 66 69 6e 65 64 28 | 43 54 59 50 45 32 35 36 |defined(|CTYPE256|
|00000680| 29 20 7c 7c 20 28 21 64 | 65 66 69 6e 65 64 28 69 |) || (!d|efined(i|
|00000690| 73 61 73 63 69 69 29 20 | 26 26 20 21 64 65 66 69 |sascii) |&& !defi|
|000006a0| 6e 65 64 28 48 41 53 5f | 49 53 41 53 43 49 49 29 |ned(HAS_|ISASCII)|
|000006b0| 29 0d 23 64 65 66 69 6e | 65 20 69 73 41 4c 4e 55 |).#defin|e isALNU|
|000006c0| 4d 28 63 29 20 28 69 73 | 61 6c 70 68 61 28 63 29 |M(c) (is|alpha(c)|
|000006d0| 20 7c 7c 20 69 73 64 69 | 67 69 74 28 63 29 20 7c | || isdi|git(c) ||
|000006e0| 7c 20 63 20 3d 3d 20 27 | 5f 27 29 0d 23 64 65 66 || c == '|_').#def|
|000006f0| 69 6e 65 20 69 73 41 4c | 50 48 41 28 63 29 20 69 |ine isAL|PHA(c) i|
|00000700| 73 61 6c 70 68 61 28 63 | 29 0d 23 64 65 66 69 6e |salpha(c|).#defin|
|00000710| 65 20 69 73 53 50 41 43 | 45 28 63 29 20 69 73 73 |e isSPAC|E(c) iss|
|00000720| 70 61 63 65 28 63 29 0d | 23 64 65 66 69 6e 65 20 |pace(c).|#define |
|00000730| 69 73 44 49 47 49 54 28 | 63 29 20 69 73 64 69 67 |isDIGIT(|c) isdig|
|00000740| 69 74 28 63 29 0d 23 64 | 65 66 69 6e 65 20 69 73 |it(c).#d|efine is|
|00000750| 55 50 50 45 52 28 63 29 | 20 69 73 75 70 70 65 72 |UPPER(c)| isupper|
|00000760| 28 63 29 0d 23 64 65 66 | 69 6e 65 20 69 73 4c 4f |(c).#def|ine isLO|
|00000770| 57 45 52 28 63 29 20 69 | 73 6c 6f 77 65 72 28 63 |WER(c) i|slower(c|
|00000780| 29 0d 23 65 6c 73 65 0d | 23 64 65 66 69 6e 65 20 |).#else.|#define |
|00000790| 69 73 41 4c 4e 55 4d 28 | 63 29 20 28 69 73 61 73 |isALNUM(|c) (isas|
|000007a0| 63 69 69 28 63 29 20 26 | 26 20 28 69 73 61 6c 70 |cii(c) &|& (isalp|
|000007b0| 68 61 28 63 29 20 7c 7c | 20 69 73 64 69 67 69 74 |ha(c) ||| isdigit|
|000007c0| 28 63 29 20 7c 7c 20 63 | 20 3d 3d 20 27 5f 27 29 |(c) || c| == '_')|
|000007d0| 29 0d 23 64 65 66 69 6e | 65 20 69 73 41 4c 50 48 |).#defin|e isALPH|
|000007e0| 41 28 63 29 20 28 69 73 | 61 73 63 69 69 28 63 29 |A(c) (is|ascii(c)|
|000007f0| 20 26 26 20 69 73 61 6c | 70 68 61 28 63 29 29 0d | && isal|pha(c)).|
|00000800| 23 69 66 64 65 66 20 6d | 61 63 69 6e 74 6f 73 68 |#ifdef m|acintosh|
|00000810| 0d 23 64 65 66 69 6e 65 | 20 69 73 53 50 41 43 45 |.#define| isSPACE|
|00000820| 28 63 29 20 28 28 69 73 | 61 73 63 69 69 28 63 29 |(c) ((is|ascii(c)|
|00000830| 20 26 26 20 69 73 73 70 | 61 63 65 28 63 29 29 20 | && issp|ace(c)) |
|00000840| 7c 7c 20 63 20 3d 3d 20 | 27 5c 33 31 32 27 29 0d ||| c == |'\312').|
|00000850| 23 65 6c 73 65 0d 23 64 | 65 66 69 6e 65 20 69 73 |#else.#d|efine is|
|00000860| 53 50 41 43 45 28 63 29 | 20 28 69 73 61 73 63 69 |SPACE(c)| (isasci|
|00000870| 69 28 63 29 20 26 26 20 | 69 73 73 70 61 63 65 28 |i(c) && |isspace(|
|00000880| 63 29 29 0d 23 65 6e 64 | 69 66 0d 23 64 65 66 69 |c)).#end|if.#defi|
|00000890| 6e 65 20 69 73 44 49 47 | 49 54 28 63 29 20 28 69 |ne isDIG|IT(c) (i|
|000008a0| 73 61 73 63 69 69 28 63 | 29 20 26 26 20 69 73 64 |sascii(c|) && isd|
|000008b0| 69 67 69 74 28 63 29 29 | 0d 23 64 65 66 69 6e 65 |igit(c))|.#define|
|000008c0| 20 69 73 55 50 50 45 52 | 28 63 29 20 28 69 73 61 | isUPPER|(c) (isa|
|000008d0| 73 63 69 69 28 63 29 20 | 26 26 20 69 73 75 70 70 |scii(c) |&& isupp|
|000008e0| 65 72 28 63 29 29 0d 23 | 64 65 66 69 6e 65 20 69 |er(c)).#|define i|
|000008f0| 73 4c 4f 57 45 52 28 63 | 29 20 28 69 73 61 73 63 |sLOWER(c|) (isasc|
|00000900| 69 69 28 63 29 20 26 26 | 20 69 73 6c 6f 77 65 72 |ii(c) &&| islower|
|00000910| 28 63 29 29 0d 23 65 6e | 64 69 66 0d 0d 23 64 65 |(c)).#en|dif..#de|
|00000920| 66 69 6e 65 20 4d 45 4d | 5f 53 49 5a 45 20 75 6e |fine MEM|_SIZE un|
|00000930| 73 69 67 6e 65 64 20 69 | 6e 74 0d 0d 2f 2a 20 4c |signed i|nt../* L|
|00000940| 69 6e 65 20 6e 75 6d 62 | 65 72 73 20 61 72 65 20 |ine numb|ers are |
|00000950| 75 6e 73 69 67 6e 65 64 | 2c 20 31 36 20 62 69 74 |unsigned|, 16 bit|
|00000960| 73 2e 20 2a 2f 0d 74 79 | 70 65 64 65 66 20 75 6e |s. */.ty|pedef un|
|00000970| 73 69 67 6e 65 64 20 73 | 68 6f 72 74 20 6c 69 6e |signed s|hort lin|
|00000980| 65 5f 74 3b 0d 23 69 66 | 64 65 66 20 6c 69 6e 74 |e_t;.#if|def lint|
|00000990| 0d 23 64 65 66 69 6e 65 | 20 4e 4f 4c 49 4e 45 20 |.#define| NOLINE |
|000009a0| 28 28 6c 69 6e 65 5f 74 | 29 30 29 0d 23 65 6c 73 |((line_t|)0).#els|
|000009b0| 65 0d 23 64 65 66 69 6e | 65 20 4e 4f 4c 49 4e 45 |e.#defin|e NOLINE|
|000009c0| 20 28 28 6c 69 6e 65 5f | 74 29 20 36 35 35 33 35 | ((line_|t) 65535|
|000009d0| 29 0d 23 65 6e 64 69 66 | 0d 0d 23 69 66 6e 64 65 |).#endif|..#ifnde|
|000009e0| 66 20 6c 69 6e 74 0d 23 | 69 66 6e 64 65 66 20 4c |f lint.#|ifndef L|
|000009f0| 45 41 4b 54 45 53 54 0d | 23 69 66 6e 64 65 66 20 |EAKTEST.|#ifndef |
|00000a00| 73 61 66 65 6d 61 6c 6c | 6f 63 0d 63 68 61 72 20 |safemall|oc.char |
|00000a10| 2a 73 61 66 65 6d 61 6c | 6c 6f 63 28 29 3b 0d 63 |*safemal|loc();.c|
|00000a20| 68 61 72 20 2a 73 61 66 | 65 72 65 61 6c 6c 6f 63 |har *saf|erealloc|
|00000a30| 28 29 3b 0d 76 6f 69 64 | 20 73 61 66 65 66 72 65 |();.void| safefre|
|00000a40| 65 28 29 3b 0d 23 65 6e | 64 69 66 0d 23 69 66 6e |e();.#en|dif.#ifn|
|00000a50| 64 65 66 20 4d 53 44 4f | 53 0d 23 64 65 66 69 6e |def MSDO|S.#defin|
|00000a60| 65 20 4e 65 77 28 78 2c | 76 2c 6e 2c 74 29 20 20 |e New(x,|v,n,t)  |
|00000a70| 28 76 20 3d 20 28 74 2a | 29 73 61 66 65 6d 61 6c |(v = (t*|)safemal|
|00000a80| 6c 6f 63 28 28 4d 45 4d | 5f 53 49 5a 45 29 28 28 |loc((MEM|_SIZE)((|
|00000a90| 6e 29 20 2a 20 73 69 7a | 65 6f 66 28 74 29 29 29 |n) * siz|eof(t)))|
|00000aa0| 29 0d 23 64 65 66 69 6e | 65 20 4e 65 77 63 28 78 |).#defin|e Newc(x|
|00000ab0| 2c 76 2c 6e 2c 74 2c 63 | 29 20 20 28 76 20 3d 20 |,v,n,t,c|)  (v = |
|00000ac0| 28 63 2a 29 73 61 66 65 | 6d 61 6c 6c 6f 63 28 28 |(c*)safe|malloc((|
|00000ad0| 4d 45 4d 5f 53 49 5a 45 | 29 28 28 6e 29 20 2a 20 |MEM_SIZE|)((n) * |
|00000ae0| 73 69 7a 65 6f 66 28 74 | 29 29 29 29 0d 23 64 65 |sizeof(t|)))).#de|
|00000af0| 66 69 6e 65 20 4e 65 77 | 7a 28 78 2c 76 2c 6e 2c |fine New|z(x,v,n,|
|00000b00| 74 29 20 28 76 20 3d 20 | 28 74 2a 29 73 61 66 65 |t) (v = |(t*)safe|
|00000b10| 6d 61 6c 6c 6f 63 28 28 | 4d 45 4d 5f 53 49 5a 45 |malloc((|MEM_SIZE|
|00000b20| 29 28 28 6e 29 20 2a 20 | 73 69 7a 65 6f 66 28 74 |)((n) * |sizeof(t|
|00000b30| 29 29 29 29 2c 20 5c 0d | 20 20 20 20 6d 65 6d 7a |)))), \.|    memz|
|00000b40| 65 72 6f 28 28 63 68 61 | 72 2a 29 28 76 29 2c 20 |ero((cha|r*)(v), |
|00000b50| 28 6e 29 20 2a 20 73 69 | 7a 65 6f 66 28 74 29 29 |(n) * si|zeof(t))|
|00000b60| 0d 23 64 65 66 69 6e 65 | 20 52 65 6e 65 77 28 76 |.#define| Renew(v|
|00000b70| 2c 6e 2c 74 29 20 28 76 | 20 3d 20 28 74 2a 29 73 |,n,t) (v| = (t*)s|
|00000b80| 61 66 65 72 65 61 6c 6c | 6f 63 28 28 63 68 61 72 |afereall|oc((char|
|00000b90| 2a 29 28 76 29 2c 28 4d | 45 4d 5f 53 49 5a 45 29 |*)(v),(M|EM_SIZE)|
|00000ba0| 28 28 6e 29 2a 73 69 7a | 65 6f 66 28 74 29 29 29 |((n)*siz|eof(t)))|
|00000bb0| 29 0d 23 64 65 66 69 6e | 65 20 52 65 6e 65 77 63 |).#defin|e Renewc|
|00000bc0| 28 76 2c 6e 2c 74 2c 63 | 29 20 28 76 20 3d 20 28 |(v,n,t,c|) (v = (|
|00000bd0| 63 2a 29 73 61 66 65 72 | 65 61 6c 6c 6f 63 28 28 |c*)safer|ealloc((|
|00000be0| 63 68 61 72 2a 29 28 76 | 29 2c 28 4d 45 4d 5f 53 |char*)(v|),(MEM_S|
|00000bf0| 49 5a 45 29 28 28 6e 29 | 2a 73 69 7a 65 6f 66 28 |IZE)((n)|*sizeof(|
|00000c00| 74 29 29 29 29 0d 23 65 | 6c 73 65 0d 23 64 65 66 |t)))).#e|lse.#def|
|00000c10| 69 6e 65 20 4e 65 77 28 | 78 2c 76 2c 6e 2c 74 29 |ine New(|x,v,n,t)|
|00000c20| 20 20 28 76 20 3d 20 28 | 74 2a 29 73 61 66 65 6d |  (v = (|t*)safem|
|00000c30| 61 6c 6c 6f 63 28 28 28 | 75 6e 73 69 67 6e 65 64 |alloc(((|unsigned|
|00000c40| 20 6c 6f 6e 67 29 28 6e | 29 20 2a 20 73 69 7a 65 | long)(n|) * size|
|00000c50| 6f 66 28 74 29 29 29 29 | 0d 23 64 65 66 69 6e 65 |of(t))))|.#define|
|00000c60| 20 4e 65 77 63 28 78 2c | 76 2c 6e 2c 74 2c 63 29 | Newc(x,|v,n,t,c)|
|00000c70| 20 20 28 76 20 3d 20 28 | 63 2a 29 73 61 66 65 6d |  (v = (|c*)safem|
|00000c80| 61 6c 6c 6f 63 28 28 28 | 75 6e 73 69 67 6e 65 64 |alloc(((|unsigned|
|00000c90| 20 6c 6f 6e 67 29 28 6e | 29 20 2a 20 73 69 7a 65 | long)(n|) * size|
|00000ca0| 6f 66 28 74 29 29 29 29 | 0d 23 64 65 66 69 6e 65 |of(t))))|.#define|
|00000cb0| 20 4e 65 77 7a 28 78 2c | 76 2c 6e 2c 74 29 20 28 | Newz(x,|v,n,t) (|
|00000cc0| 76 20 3d 20 28 74 2a 29 | 73 61 66 65 6d 61 6c 6c |v = (t*)|safemall|
|00000cd0| 6f 63 28 28 28 75 6e 73 | 69 67 6e 65 64 20 6c 6f |oc(((uns|igned lo|
|00000ce0| 6e 67 29 28 6e 29 20 2a | 20 73 69 7a 65 6f 66 28 |ng)(n) *| sizeof(|
|00000cf0| 74 29 29 29 29 2c 20 5c | 0d 20 20 20 20 6d 65 6d |t)))), \|.    mem|
|00000d00| 7a 65 72 6f 28 28 63 68 | 61 72 2a 29 28 76 29 2c |zero((ch|ar*)(v),|
|00000d10| 20 28 6e 29 20 2a 20 73 | 69 7a 65 6f 66 28 74 29 | (n) * s|izeof(t)|
|00000d20| 29 0d 23 64 65 66 69 6e | 65 20 52 65 6e 65 77 28 |).#defin|e Renew(|
|00000d30| 76 2c 6e 2c 74 29 20 28 | 76 20 3d 20 28 74 2a 29 |v,n,t) (|v = (t*)|
|00000d40| 73 61 66 65 72 65 61 6c | 6c 6f 63 28 28 63 68 61 |safereal|loc((cha|
|00000d50| 72 2a 29 28 76 29 2c 28 | 28 75 6e 73 69 67 6e 65 |r*)(v),(|(unsigne|
|00000d60| 64 20 6c 6f 6e 67 29 28 | 6e 29 2a 73 69 7a 65 6f |d long)(|n)*sizeo|
|00000d70| 66 28 74 29 29 29 29 0d | 23 64 65 66 69 6e 65 20 |f(t)))).|#define |
|00000d80| 52 65 6e 65 77 63 28 76 | 2c 6e 2c 74 2c 63 29 20 |Renewc(v|,n,t,c) |
|00000d90| 28 76 20 3d 20 28 63 2a | 29 73 61 66 65 72 65 61 |(v = (c*|)saferea|
|00000da0| 6c 6c 6f 63 28 28 63 68 | 61 72 2a 29 28 76 29 2c |lloc((ch|ar*)(v),|
|00000db0| 28 28 75 6e 73 69 67 6e | 65 64 20 6c 6f 6e 67 29 |((unsign|ed long)|
|00000dc0| 28 6e 29 2a 73 69 7a 65 | 6f 66 28 74 29 29 29 29 |(n)*size|of(t))))|
|00000dd0| 0d 23 65 6e 64 69 66 20 | 2f 2a 20 4d 53 44 4f 53 |.#endif |/* MSDOS|
|00000de0| 20 2a 2f 0d 23 64 65 66 | 69 6e 65 20 53 61 66 65 | */.#def|ine Safe|
|00000df0| 66 72 65 65 28 64 29 20 | 73 61 66 65 66 72 65 65 |free(d) |safefree|
|00000e00| 28 28 63 68 61 72 2a 29 | 64 29 0d 23 64 65 66 69 |((char*)|d).#defi|
|00000e10| 6e 65 20 53 74 72 5f 6e | 65 77 28 78 2c 6c 65 6e |ne Str_n|ew(x,len|
|00000e20| 29 20 73 74 72 5f 6e 65 | 77 28 6c 65 6e 29 0d 23 |) str_ne|w(len).#|
|00000e30| 65 6c 73 65 20 2f 2a 20 | 4c 45 41 4b 54 45 53 54 |else /* |LEAKTEST|
|00000e40| 20 2a 2f 0d 63 68 61 72 | 20 2a 73 61 66 65 78 6d | */.char| *safexm|
|00000e50| 61 6c 6c 6f 63 28 29 3b | 0d 63 68 61 72 20 2a 73 |alloc();|.char *s|
|00000e60| 61 66 65 78 72 65 61 6c | 6c 6f 63 28 29 3b 0d 76 |afexreal|loc();.v|
|00000e70| 6f 69 64 20 73 61 66 65 | 78 66 72 65 65 28 29 3b |oid safe|xfree();|
|00000e80| 0d 23 64 65 66 69 6e 65 | 20 4e 65 77 28 78 2c 76 |.#define| New(x,v|
|00000e90| 2c 6e 2c 74 29 20 20 28 | 76 20 3d 20 28 74 2a 29 |,n,t)  (|v = (t*)|
|00000ea0| 73 61 66 65 78 6d 61 6c | 6c 6f 63 28 78 2c 28 4d |safexmal|loc(x,(M|
|00000eb0| 45 4d 5f 53 49 5a 45 29 | 28 28 6e 29 20 2a 20 73 |EM_SIZE)|((n) * s|
|00000ec0| 69 7a 65 6f 66 28 74 29 | 29 29 29 0d 23 64 65 66 |izeof(t)|))).#def|
|00000ed0| 69 6e 65 20 4e 65 77 63 | 28 78 2c 76 2c 6e 2c 74 |ine Newc|(x,v,n,t|
|00000ee0| 2c 63 29 20 20 28 76 20 | 3d 20 28 63 2a 29 73 61 |,c)  (v |= (c*)sa|
|00000ef0| 66 65 78 6d 61 6c 6c 6f | 63 28 78 2c 28 4d 45 4d |fexmallo|c(x,(MEM|
|00000f00| 5f 53 49 5a 45 29 28 28 | 6e 29 20 2a 20 73 69 7a |_SIZE)((|n) * siz|
|00000f10| 65 6f 66 28 74 29 29 29 | 29 0d 23 64 65 66 69 6e |eof(t)))|).#defin|
|00000f20| 65 20 4e 65 77 7a 28 78 | 2c 76 2c 6e 2c 74 29 20 |e Newz(x|,v,n,t) |
|00000f30| 28 76 20 3d 20 28 74 2a | 29 73 61 66 65 78 6d 61 |(v = (t*|)safexma|
|00000f40| 6c 6c 6f 63 28 78 2c 28 | 4d 45 4d 5f 53 49 5a 45 |lloc(x,(|MEM_SIZE|
|00000f50| 29 28 28 6e 29 20 2a 20 | 73 69 7a 65 6f 66 28 74 |)((n) * |sizeof(t|
|00000f60| 29 29 29 29 2c 20 5c 0d | 20 20 20 20 6d 65 6d 7a |)))), \.|    memz|
|00000f70| 65 72 6f 28 28 63 68 61 | 72 2a 29 28 76 29 2c 20 |ero((cha|r*)(v), |
|00000f80| 28 6e 29 20 2a 20 73 69 | 7a 65 6f 66 28 74 29 29 |(n) * si|zeof(t))|
|00000f90| 0d 23 64 65 66 69 6e 65 | 20 52 65 6e 65 77 28 76 |.#define| Renew(v|
|00000fa0| 2c 6e 2c 74 29 20 28 76 | 20 3d 20 28 74 2a 29 73 |,n,t) (v| = (t*)s|
|00000fb0| 61 66 65 78 72 65 61 6c | 6c 6f 63 28 28 63 68 61 |afexreal|loc((cha|
|00000fc0| 72 2a 29 28 76 29 2c 28 | 4d 45 4d 5f 53 49 5a 45 |r*)(v),(|MEM_SIZE|
|00000fd0| 29 28 28 6e 29 2a 73 69 | 7a 65 6f 66 28 74 29 29 |)((n)*si|zeof(t))|
|00000fe0| 29 29 0d 23 64 65 66 69 | 6e 65 20 52 65 6e 65 77 |)).#defi|ne Renew|
|00000ff0| 63 28 76 2c 6e 2c 74 2c | 63 29 20 28 76 20 3d 20 |c(v,n,t,|c) (v = |
|00001000| 28 63 2a 29 73 61 66 65 | 78 72 65 61 6c 6c 6f 63 |(c*)safe|xrealloc|
|00001010| 28 28 63 68 61 72 2a 29 | 28 76 29 2c 28 4d 45 4d |((char*)|(v),(MEM|
|00001020| 5f 53 49 5a 45 29 28 28 | 6e 29 2a 73 69 7a 65 6f |_SIZE)((|n)*sizeo|
|00001030| 66 28 74 29 29 29 29 0d | 23 64 65 66 69 6e 65 20 |f(t)))).|#define |
|00001040| 53 61 66 65 66 72 65 65 | 28 64 29 20 73 61 66 65 |Safefree|(d) safe|
|00001050| 78 66 72 65 65 28 28 63 | 68 61 72 2a 29 64 29 0d |xfree((c|har*)d).|
|00001060| 23 64 65 66 69 6e 65 20 | 53 74 72 5f 6e 65 77 28 |#define |Str_new(|
|00001070| 78 2c 6c 65 6e 29 20 73 | 74 72 5f 6e 65 77 28 78 |x,len) s|tr_new(x|
|00001080| 2c 6c 65 6e 29 0d 23 64 | 65 66 69 6e 65 20 4d 41 |,len).#d|efine MA|
|00001090| 58 58 43 4f 55 4e 54 20 | 31 32 30 30 0d 6c 6f 6e |XXCOUNT |1200.lon|
|000010a0| 67 20 78 63 6f 75 6e 74 | 5b 4d 41 58 58 43 4f 55 |g xcount|[MAXXCOU|
|000010b0| 4e 54 5d 3b 0d 6c 6f 6e | 67 20 6c 61 73 74 78 63 |NT];.lon|g lastxc|
|000010c0| 6f 75 6e 74 5b 4d 41 58 | 58 43 4f 55 4e 54 5d 3b |ount[MAX|XCOUNT];|
|000010d0| 0d 23 65 6e 64 69 66 20 | 2f 2a 20 4c 45 41 4b 54 |.#endif |/* LEAKT|
|000010e0| 45 53 54 20 2a 2f 0d 23 | 69 66 6e 64 65 66 20 52 |EST */.#|ifndef R|
|000010f0| 45 53 4f 4c 56 45 5f 4d | 41 43 5f 43 4f 4e 46 4c |ESOLVE_M|AC_CONFL|
|00001100| 49 43 54 53 0d 23 64 65 | 66 69 6e 65 20 4d 6f 76 |ICTS.#de|fine Mov|
|00001110| 65 28 73 2c 64 2c 6e 2c | 74 29 20 28 76 6f 69 64 |e(s,d,n,|t) (void|
|00001120| 29 6d 65 6d 6d 6f 76 65 | 28 28 63 68 61 72 2a 29 |)memmove|((char*)|
|00001130| 28 64 29 2c 28 63 68 61 | 72 2a 29 28 73 29 2c 20 |(d),(cha|r*)(s), |
|00001140| 28 6e 29 20 2a 20 73 69 | 7a 65 6f 66 28 74 29 29 |(n) * si|zeof(t))|
|00001150| 0d 23 65 6e 64 69 66 0d | 23 64 65 66 69 6e 65 20 |.#endif.|#define |
|00001160| 43 6f 70 79 28 73 2c 64 | 2c 6e 2c 74 29 20 28 76 |Copy(s,d|,n,t) (v|
|00001170| 6f 69 64 29 6d 65 6d 63 | 70 79 28 28 63 68 61 72 |oid)memc|py((char|
|00001180| 2a 29 28 64 29 2c 28 63 | 68 61 72 2a 29 28 73 29 |*)(d),(c|har*)(s)|
|00001190| 2c 20 28 6e 29 20 2a 20 | 73 69 7a 65 6f 66 28 74 |, (n) * |sizeof(t|
|000011a0| 29 29 0d 23 64 65 66 69 | 6e 65 20 5a 65 72 6f 28 |)).#defi|ne Zero(|
|000011b0| 64 2c 6e 2c 74 29 20 28 | 76 6f 69 64 29 6d 65 6d |d,n,t) (|void)mem|
|000011c0| 7a 65 72 6f 28 28 63 68 | 61 72 2a 29 28 64 29 2c |zero((ch|ar*)(d),|
|000011d0| 20 28 6e 29 20 2a 20 73 | 69 7a 65 6f 66 28 74 29 | (n) * s|izeof(t)|
|000011e0| 29 0d 23 65 6c 73 65 20 | 2f 2a 20 6c 69 6e 74 20 |).#else |/* lint |
|000011f0| 2a 2f 0d 23 64 65 66 69 | 6e 65 20 4e 65 77 28 78 |*/.#defi|ne New(x|
|00001200| 2c 76 2c 6e 2c 73 29 20 | 28 76 20 3d 20 4e 75 6c |,v,n,s) |(v = Nul|
|00001210| 6c 28 73 20 2a 29 29 0d | 23 64 65 66 69 6e 65 20 |l(s *)).|#define |
|00001220| 4e 65 77 63 28 78 2c 76 | 2c 6e 2c 73 2c 63 29 20 |Newc(x,v|,n,s,c) |
|00001230| 28 76 20 3d 20 4e 75 6c | 6c 28 73 20 2a 29 29 0d |(v = Nul|l(s *)).|
|00001240| 23 64 65 66 69 6e 65 20 | 4e 65 77 7a 28 78 2c 76 |#define |Newz(x,v|
|00001250| 2c 6e 2c 73 29 20 28 76 | 20 3d 20 4e 75 6c 6c 28 |,n,s) (v| = Null(|
|00001260| 73 20 2a 29 29 0d 23 64 | 65 66 69 6e 65 20 52 65 |s *)).#d|efine Re|
|00001270| 6e 65 77 28 76 2c 6e 2c | 73 29 20 28 76 20 3d 20 |new(v,n,|s) (v = |
|00001280| 4e 75 6c 6c 28 73 20 2a | 29 29 0d 23 64 65 66 69 |Null(s *|)).#defi|
|00001290| 6e 65 20 4d 6f 76 65 28 | 73 2c 64 2c 6e 2c 74 29 |ne Move(|s,d,n,t)|
|000012a0| 0d 23 64 65 66 69 6e 65 | 20 43 6f 70 79 28 73 2c |.#define| Copy(s,|
|000012b0| 64 2c 6e 2c 74 29 0d 23 | 64 65 66 69 6e 65 20 5a |d,n,t).#|define Z|
|000012c0| 65 72 6f 28 64 2c 6e 2c | 74 29 0d 23 64 65 66 69 |ero(d,n,|t).#defi|
|000012d0| 6e 65 20 53 61 66 65 66 | 72 65 65 28 64 29 20 64 |ne Safef|ree(d) d|
|000012e0| 20 3d 20 64 0d 23 65 6e | 64 69 66 20 2f 2a 20 6c | = d.#en|dif /* l|
|000012f0| 69 6e 74 20 2a 2f 0d 0d | 23 69 66 64 65 66 20 53 |int */..|#ifdef S|
|00001300| 54 52 55 43 54 43 4f 50 | 59 0d 23 64 65 66 69 6e |TRUCTCOP|Y.#defin|
|00001310| 65 20 53 74 72 75 63 74 | 43 6f 70 79 28 73 2c 64 |e Struct|Copy(s,d|
|00001320| 2c 74 29 20 2a 28 28 74 | 2a 29 28 64 29 29 20 3d |,t) *((t|*)(d)) =|
|00001330| 20 2a 28 28 74 2a 29 28 | 73 29 29 0d 23 65 6c 73 | *((t*)(|s)).#els|
|00001340| 65 0d 23 64 65 66 69 6e | 65 20 53 74 72 75 63 74 |e.#defin|e Struct|
|00001350| 43 6f 70 79 28 73 2c 64 | 2c 74 29 20 43 6f 70 79 |Copy(s,d|,t) Copy|
|00001360| 28 73 2c 64 2c 31 2c 74 | 29 0d 23 65 6e 64 69 66 |(s,d,1,t|).#endif|
|00001370| 0d 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001380| 00 00 01 00 00 00 01 6e | 00 00 00 6e 00 00 00 3e |.......n|...n...>|
|00001390| 64 65 6c 69 6d 5b 64 6c | 65 76 65 6c 5d 20 3d 20 |delim[dl|evel] = |
|000013a0| 27 3a 27 3b 0d 09 69 66 | 20 28 2b 2b 64 6c 65 76 |':';..if| (++dlev|
|000013b0| 07 68 61 6e 64 79 2e 68 | 02 00 00 00 54 45 58 54 |.handy.h|....TEXT|
|000013c0| 4d 50 53 20 00 00 00 d0 | 01 00 00 00 00 00 74 f8 |MPS ....|......t.|
|000013d0| 00 00 54 45 58 54 4d 50 | 53 20 00 00 00 d0 01 00 |..TEXTMP|S ......|
|000013e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013f0| 00 00 a6 ea b2 cd 00 00 | 12 f1 00 00 01 ac 20 3c |........|...... <|
|00001400| 3d 20 65 64 2d 3e 6d 61 | 78 61 72 67 3b 20 65 64 |= ed->ma|xarg; ed|
|00001410| 2d 3e 61 6e 75 6d 2b 2b | 29 20 7b 0d 09 65 64 2d |->anum++|) {..ed-|
|00001420| 3e 61 72 67 66 6c 61 67 | 73 20 3d 20 65 64 2d 3e |>argflag|s = ed->|
|00001430| 61 72 67 5b 65 64 2d 3e | 61 6e 75 6d 5d 2e 61 72 |arg[ed->|anum].ar|
|00001440| 67 5f 66 6c 61 67 73 3b | 0d 09 65 64 2d 3e 61 72 |g_flags;|..ed->ar|
|00001450| 67 74 79 70 65 20 3d 20 | 65 64 2d 3e 61 72 67 5b |gtype = |ed->arg[|
|00001460| 65 64 2d 3e 61 6e 75 6d | 5d 2e 61 72 67 5f 74 79 |ed->anum|].arg_ty|
|00001470| 70 65 3b 0d 09 65 64 2d | 3e 61 72 67 70 74 72 20 |pe;..ed-|>argptr |
|00001480| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 2f 30 36 |...H..Mo|naco./06|
|00001490| 2f 30 38 20 31 33 3a 32 | 33 3a 31 37 20 24 0d 20 |/08 13:2|3:17 $. |
|000014a0| 2a 0d 20 2a 20 20 00 06 | 00 03 00 50 00 20 01 dd |*. *  ..|...P. ..|
|000014b0| 02 3d 00 50 00 20 01 dd | 02 3d a6 eb 93 7d 00 00 |.=.P. ..|.=...}..|
|000014c0| 0a 75 00 00 0a 79 00 00 | 09 78 01 00 00 00 00 1e |.u...y..|.x......|
|000014d0| 00 50 00 20 01 dd 02 3d | 00 50 00 20 01 dd 02 3d |.P. ...=|.P. ...=|
|000014e0| 00 00 09 78 00 00 00 00 | 00 00 00 00 00 00 00 00 |...x....|........|
|000014f0| 01 00 00 00 01 6e 00 00 | 00 6e 00 00 00 3e 00 49 |.....n..|.n...>.I|
|00001500| aa 30 16 68 00 00 00 1c | 00 3e 00 00 4d 50 53 52 |.0.h....|.>..MPSR|
|00001510| 00 01 00 0a 03 ed ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00001520| 03 f0 ff ff 00 00 00 4c | 00 4f d9 64 00 00 00 00 |.......L|.O.d....|
|00001530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+