/ MacFormat 1996 Christmas / macformat-045.iso / Shareware Plus / Developers / enteract-377 / enteract-377.sit / EnterAct Stuff / hAWK project / AWK Source / DEBUG.C

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 07 44 45 42 55 47 2e | 43 00 00 00 00 00 00 00 |..DEBUG.|C.......|
|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 54 4f 50 | 43 01 00 00 00 00 00 00 |.TEXTTOP|C.......|
|00000050| 00 00 00 00 00 2b 80 00 | 00 02 b2 ab 1f e8 12 ab |.....+..|........|
|00000060| 1f e8 12 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 7c e1 00 00 |........|....|...|
|00000080| 2f 2a 0d 20 2a 20 64 65 | 62 75 67 2e 63 20 2d 2d |/*. * de|bug.c --|
|00000090| 20 56 61 72 69 6f 75 73 | 20 64 65 62 75 67 67 69 | Various| debuggi|
|000000a0| 6e 67 20 72 6f 75 74 69 | 6e 65 73 20 0d 20 2a 2f |ng routi|nes . */|
|000000b0| 0d 2f 2a 20 41 74 20 70 | 72 65 73 65 6e 74 2c 20 |./* At p|resent, |
|000000c0| 74 68 65 20 4d 61 63 20 | 76 65 72 73 69 6f 6e 20 |the Mac |version |
|000000d0| 64 6f 65 73 20 6e 6f 74 | 20 73 75 70 70 6f 72 74 |does not| support|
|000000e0| 20 74 68 65 20 44 45 42 | 55 47 20 6f 70 74 69 6f | the DEB|UG optio|
|000000f0| 6e 2e 20 54 68 69 73 20 | 66 69 6c 65 20 69 73 20 |n. This |file is |
|00000100| 73 74 69 6c 6c 20 69 6e | 20 74 68 65 20 6f 72 69 |still in| the ori|
|00000110| 67 69 6e 61 6c 0d 75 6e | 69 78 2f 4d 53 44 4f 53 |ginal.un|ix/MSDOS|
|00000120| 20 66 6f 72 6d 2e 0d 2a | 2f 0d 2f 2a 20 0d 20 2a | form..*|/./* . *|
|00000130| 20 43 6f 70 79 72 69 67 | 68 74 20 28 43 29 20 31 | Copyrig|ht (C) 1|
|00000140| 39 38 36 2c 20 31 39 38 | 38 2c 20 31 39 38 39 20 |986, 198|8, 1989 |
|00000150| 74 68 65 20 46 72 65 65 | 20 53 6f 66 74 77 61 72 |the Free| Softwar|
|00000160| 65 20 46 6f 75 6e 64 61 | 74 69 6f 6e 2c 20 49 6e |e Founda|tion, In|
|00000170| 63 2e 0d 20 2a 20 0d 20 | 2a 20 54 68 69 73 20 66 |c.. * . |* This f|
|00000180| 69 6c 65 20 69 73 20 70 | 61 72 74 20 6f 66 20 47 |ile is p|art of G|
|00000190| 41 57 4b 2c 20 74 68 65 | 20 47 4e 55 20 69 6d 70 |AWK, the| GNU imp|
|000001a0| 6c 65 6d 65 6e 74 61 74 | 69 6f 6e 20 6f 66 20 74 |lementat|ion of t|
|000001b0| 68 65 0d 20 2a 20 41 57 | 4b 20 50 72 6f 67 61 6d |he. * AW|K Progam|
|000001c0| 6d 69 6e 67 20 4c 61 6e | 67 75 61 67 65 2e 0d 20 |ming Lan|guage.. |
|000001d0| 2a 20 0d 20 2a 20 47 41 | 57 4b 20 69 73 20 66 72 |* . * GA|WK is fr|
|000001e0| 65 65 20 73 6f 66 74 77 | 61 72 65 3b 20 79 6f 75 |ee softw|are; you|
|000001f0| 20 63 61 6e 20 72 65 64 | 69 73 74 72 69 62 75 74 | can red|istribut|
|00000200| 65 20 69 74 20 61 6e 64 | 2f 6f 72 20 6d 6f 64 69 |e it and|/or modi|
|00000210| 66 79 0d 20 2a 20 69 74 | 20 75 6e 64 65 72 20 74 |fy. * it| under t|
|00000220| 68 65 20 74 65 72 6d 73 | 20 6f 66 20 74 68 65 20 |he terms| of the |
|00000230| 47 4e 55 20 47 65 6e 65 | 72 61 6c 20 50 75 62 6c |GNU Gene|ral Publ|
|00000240| 69 63 20 4c 69 63 65 6e | 73 65 20 61 73 20 70 75 |ic Licen|se as pu|
|00000250| 62 6c 69 73 68 65 64 20 | 62 79 0d 20 2a 20 74 68 |blished |by. * th|
|00000260| 65 20 46 72 65 65 20 53 | 6f 66 74 77 61 72 65 20 |e Free S|oftware |
|00000270| 46 6f 75 6e 64 61 74 69 | 6f 6e 3b 20 65 69 74 68 |Foundati|on; eith|
|00000280| 65 72 20 76 65 72 73 69 | 6f 6e 20 31 2c 20 6f 72 |er versi|on 1, or|
|00000290| 20 28 61 74 20 79 6f 75 | 72 20 6f 70 74 69 6f 6e | (at you|r option|
|000002a0| 29 0d 20 2a 20 61 6e 79 | 20 6c 61 74 65 72 20 76 |). * any| later v|
|000002b0| 65 72 73 69 6f 6e 2e 0d | 20 2a 20 0d 20 2a 20 47 |ersion..| * . * G|
|000002c0| 41 57 4b 20 69 73 20 64 | 69 73 74 72 69 62 75 74 |AWK is d|istribut|
|000002d0| 65 64 20 69 6e 20 74 68 | 65 20 68 6f 70 65 20 74 |ed in th|e hope t|
|000002e0| 68 61 74 20 69 74 20 77 | 69 6c 6c 20 62 65 20 75 |hat it w|ill be u|
|000002f0| 73 65 66 75 6c 2c 0d 20 | 2a 20 62 75 74 20 57 49 |seful,. |* but WI|
|00000300| 54 48 4f 55 54 20 41 4e | 59 20 57 41 52 52 41 4e |THOUT AN|Y WARRAN|
|00000310| 54 59 3b 20 77 69 74 68 | 6f 75 74 20 65 76 65 6e |TY; with|out even|
|00000320| 20 74 68 65 20 69 6d 70 | 6c 69 65 64 20 77 61 72 | the imp|lied war|
|00000330| 72 61 6e 74 79 20 6f 66 | 0d 20 2a 20 4d 45 52 43 |ranty of|. * MERC|
|00000340| 48 41 4e 54 41 42 49 4c | 49 54 59 20 6f 72 20 46 |HANTABIL|ITY or F|
|00000350| 49 54 4e 45 53 53 20 46 | 4f 52 20 41 20 50 41 52 |ITNESS F|OR A PAR|
|00000360| 54 49 43 55 4c 41 52 20 | 50 55 52 50 4f 53 45 2e |TICULAR |PURPOSE.|
|00000370| 20 20 53 65 65 20 74 68 | 65 0d 20 2a 20 47 4e 55 |  See th|e. * GNU|
|00000380| 20 47 65 6e 65 72 61 6c | 20 50 75 62 6c 69 63 20 | General| Public |
|00000390| 4c 69 63 65 6e 73 65 20 | 66 6f 72 20 6d 6f 72 65 |License |for more|
|000003a0| 20 64 65 74 61 69 6c 73 | 2e 0d 20 2a 20 0d 20 2a | details|.. * . *|
|000003b0| 20 59 6f 75 20 73 68 6f | 75 6c 64 20 68 61 76 65 | You sho|uld have|
|000003c0| 20 72 65 63 65 69 76 65 | 64 20 61 20 63 6f 70 79 | receive|d a copy|
|000003d0| 20 6f 66 20 74 68 65 20 | 47 4e 55 20 47 65 6e 65 | of the |GNU Gene|
|000003e0| 72 61 6c 20 50 75 62 6c | 69 63 20 4c 69 63 65 6e |ral Publ|ic Licen|
|000003f0| 73 65 0d 20 2a 20 61 6c | 6f 6e 67 20 77 69 74 68 |se. * al|ong with|
|00000400| 20 47 41 57 4b 3b 20 73 | 65 65 20 74 68 65 20 66 | GAWK; s|ee the f|
|00000410| 69 6c 65 20 43 4f 50 59 | 49 4e 47 2e 20 20 49 66 |ile COPY|ING.  If|
|00000420| 20 6e 6f 74 2c 20 77 72 | 69 74 65 20 74 6f 0d 20 | not, wr|ite to. |
|00000430| 2a 20 74 68 65 20 46 72 | 65 65 20 53 6f 66 74 77 |* the Fr|ee Softw|
|00000440| 61 72 65 20 46 6f 75 6e | 64 61 74 69 6f 6e 2c 20 |are Foun|dation, |
|00000450| 36 37 35 20 4d 61 73 73 | 20 41 76 65 2c 20 43 61 |675 Mass| Ave, Ca|
|00000460| 6d 62 72 69 64 67 65 2c | 20 4d 41 20 30 32 31 33 |mbridge,| MA 0213|
|00000470| 39 2c 20 55 53 41 2e 0d | 20 2a 2f 0d 2f 2a 2a 2a |9, USA..| */./***|
|00000480| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 4e 4f 54 45 20 57 41 |********|*NOTE WA|
|00000490| 52 4e 49 4e 47 20 4f 48 | 47 4f 53 48 20 4c 4f 4f |RNING OH|GOSH LOO|
|000004a0| 4b 4f 55 54 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |KOUT****|********|
|000004b0| 2a 2a 2a 0d 0d 54 68 69 | 73 20 69 73 20 74 68 65 |***..Thi|s is the|
|000004c0| 20 6f 72 69 67 69 6e 61 | 6c 20 75 6e 69 78 2f 49 | origina|l unix/I|
|000004d0| 42 4d 20 66 69 6c 65 2c | 20 4e 4f 54 20 4d 4f 44 |BM file,| NOT MOD|
|000004e0| 49 46 49 45 44 20 46 4f | 52 20 4d 41 43 49 4e 54 |IFIED FO|R MACINT|
|000004f0| 4f 53 48 2e 0d 49 74 20 | 69 73 20 6e 6f 74 2c 20 |OSH..It |is not, |
|00000500| 69 6e 20 69 74 73 20 70 | 72 65 73 65 6e 74 20 66 |in its p|resent f|
|00000510| 6f 72 6d 2c 20 73 75 69 | 74 61 62 6c 65 20 66 6f |orm, sui|table fo|
|00000520| 72 20 69 6e 63 6c 75 73 | 69 6f 6e 20 69 6e 20 68 |r inclus|ion in h|
|00000530| 41 57 4b 2d 61 73 2d 61 | 2d 63 6f 64 65 2d 72 65 |AWK-as-a|-code-re|
|00000540| 73 6f 75 72 63 65 2e 0d | 0d 2a 2a 2a 2a 2a 2a 2a |source..|.*******|
|00000550| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000560| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000570| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2f 0d 23 69 6e 63 |********|**/.#inc|
|00000580| 6c 75 64 65 20 22 41 57 | 4b 2e 48 22 0d 0d 23 69 |lude "AW|K.H"..#i|
|00000590| 66 64 65 66 20 44 45 42 | 55 47 0d 0d 65 78 74 65 |fdef DEB|UG..exte|
|000005a0| 72 6e 20 4e 4f 44 45 20 | 2a 2a 66 69 65 6c 64 73 |rn NODE |**fields|
|000005b0| 5f 61 72 72 3b 0d 0d 0d | 2f 2a 20 54 68 69 73 20 |_arr;...|/* This |
|000005c0| 69 73 20 61 6c 6c 20 64 | 65 62 75 67 67 69 6e 67 |is all d|ebugging|
|000005d0| 20 73 74 75 66 66 2e 20 | 20 49 67 6e 6f 72 65 20 | stuff. | Ignore |
|000005e0| 69 74 20 61 6e 64 20 6d | 61 79 62 65 20 69 74 27 |it and m|aybe it'|
|000005f0| 6c 6c 20 67 6f 20 61 77 | 61 79 2e 20 2a 2f 0d 0d |ll go aw|ay. */..|
|00000600| 2f 2a 0d 20 2a 20 53 6f | 6d 65 20 6f 66 20 69 74 |/*. * So|me of it|
|00000610| 20 63 6f 75 6c 64 20 62 | 65 20 74 75 72 6e 65 64 | could b|e turned|
|00000620| 20 69 6e 74 6f 20 61 20 | 72 65 61 6c 6c 79 20 63 | into a |really c|
|00000630| 75 74 65 20 74 72 61 63 | 65 20 63 6f 6d 6d 61 6e |ute trac|e comman|
|00000640| 64 2c 20 69 66 20 61 6e | 79 6f 6e 65 0d 20 2a 20 |d, if an|yone. * |
|00000650| 77 61 6e 74 73 20 74 6f | 2e 20 20 0d 20 2a 2f 0d |wants to|.  . */.|
|00000660| 63 68 61 72 20 2a 6e 6e | 61 6d 65 73 5b 5d 20 3d |char *nn|ames[] =|
|00000670| 20 7b 0d 09 22 69 6c 6c | 65 67 61 6c 22 2c 20 22 | {.."ill|egal", "|
|00000680| 74 69 6d 65 73 22 2c 20 | 22 71 75 6f 74 69 65 6e |times", |"quotien|
|00000690| 74 22 2c 20 22 6d 6f 64 | 22 2c 20 22 70 6c 75 73 |t", "mod|", "plus|
|000006a0| 22 2c 0d 09 22 6d 69 6e | 75 73 22 2c 20 22 63 6f |",.."min|us", "co|
|000006b0| 6e 64 5f 70 61 69 72 22 | 2c 20 22 73 75 62 73 63 |nd_pair"|, "subsc|
|000006c0| 72 69 70 74 22 2c 20 22 | 63 6f 6e 63 61 74 22 2c |ript", "|concat",|
|000006d0| 20 22 65 78 70 22 2c 0d | 09 2f 2a 20 31 30 20 2a | "exp",.|./* 10 *|
|000006e0| 2f 0d 09 22 70 72 65 69 | 6e 63 72 65 6d 65 6e 74 |/.."prei|ncrement|
|000006f0| 22 2c 20 22 70 72 65 64 | 65 63 72 65 6d 65 6e 74 |", "pred|ecrement|
|00000700| 22 2c 20 22 70 6f 73 74 | 69 6e 63 72 65 6d 65 6e |", "post|incremen|
|00000710| 74 22 2c 20 22 70 6f 73 | 74 64 65 63 72 65 6d 65 |t", "pos|tdecreme|
|00000720| 6e 74 22 2c 0d 09 22 75 | 6e 61 72 79 5f 6d 69 6e |nt",.."u|nary_min|
|00000730| 75 73 22 2c 0d 09 22 66 | 69 65 6c 64 5f 73 70 65 |us",.."f|ield_spe|
|00000740| 63 22 2c 20 22 61 73 73 | 69 67 6e 22 2c 20 22 61 |c", "ass|ign", "a|
|00000750| 73 73 69 67 6e 5f 74 69 | 6d 65 73 22 2c 20 22 61 |ssign_ti|mes", "a|
|00000760| 73 73 69 67 6e 5f 71 75 | 6f 74 69 65 6e 74 22 2c |ssign_qu|otient",|
|00000770| 20 22 61 73 73 69 67 6e | 5f 6d 6f 64 22 2c 0d 09 | "assign|_mod",..|
|00000780| 2f 2a 20 32 30 20 2a 2f | 0d 09 22 61 73 73 69 67 |/* 20 */|.."assig|
|00000790| 6e 5f 70 6c 75 73 22 2c | 20 22 61 73 73 69 67 6e |n_plus",| "assign|
|000007a0| 5f 6d 69 6e 75 73 22 2c | 20 22 61 73 73 69 67 6e |_minus",| "assign|
|000007b0| 5f 65 78 70 22 2c 20 22 | 61 6e 64 22 2c 20 22 6f |_exp", "|and", "o|
|000007c0| 72 22 2c 0d 09 22 65 71 | 75 61 6c 22 2c 20 22 6e |r",.."eq|ual", "n|
|000007d0| 6f 74 65 71 75 61 6c 22 | 2c 20 22 6c 65 73 73 22 |otequal"|, "less"|
|000007e0| 2c 20 22 67 72 65 61 74 | 65 72 22 2c 20 22 6c 65 |, "great|er", "le|
|000007f0| 71 22 2c 0d 09 2f 2a 20 | 33 30 20 2a 2f 0d 09 22 |q",../* |30 */.."|
|00000800| 67 65 71 22 2c 20 22 6d | 61 74 63 68 22 2c 20 22 |geq", "m|atch", "|
|00000810| 6e 6f 6d 61 74 63 68 22 | 2c 20 22 6e 6f 74 22 2c |nomatch"|, "not",|
|00000820| 20 22 72 75 6c 65 5f 6c | 69 73 74 22 2c 0d 09 22 | "rule_l|ist",.."|
|00000830| 72 75 6c 65 5f 6e 6f 64 | 65 22 2c 20 22 73 74 61 |rule_nod|e", "sta|
|00000840| 74 65 6d 65 6e 74 5f 6c | 69 73 74 22 2c 20 22 69 |tement_l|ist", "i|
|00000850| 66 5f 62 72 61 6e 63 68 | 65 73 22 2c 20 22 65 78 |f_branch|es", "ex|
|00000860| 70 72 65 73 73 69 6f 6e | 5f 6c 69 73 74 22 2c 0d |pression|_list",.|
|00000870| 09 22 70 61 72 61 6d 5f | 6c 69 73 74 22 2c 0d 09 |."param_|list",..|
|00000880| 2f 2a 20 34 30 20 2a 2f | 0d 09 22 4b 5f 69 66 22 |/* 40 */|.."K_if"|
|00000890| 2c 20 22 4b 5f 77 68 69 | 6c 65 22 2c 20 22 4b 5f |, "K_whi|le", "K_|
|000008a0| 66 6f 72 22 2c 20 22 4b | 5f 61 72 72 61 79 66 6f |for", "K|_arrayfo|
|000008b0| 72 22 2c 20 22 4b 5f 62 | 72 65 61 6b 22 2c 0d 09 |r", "K_b|reak",..|
|000008c0| 22 4b 5f 63 6f 6e 74 69 | 6e 75 65 22 2c 20 22 4b |"K_conti|nue", "K|
|000008d0| 5f 70 72 69 6e 74 22 2c | 20 22 4b 5f 70 72 69 6e |_print",| "K_prin|
|000008e0| 74 66 22 2c 20 22 4b 5f | 6e 65 78 74 22 2c 20 22 |tf", "K_|next", "|
|000008f0| 4b 5f 65 78 69 74 22 2c | 0d 09 2f 2a 20 35 30 20 |K_exit",|../* 50 |
|00000900| 2a 2f 0d 09 22 4b 5f 64 | 6f 22 2c 20 22 4b 5f 72 |*/.."K_d|o", "K_r|
|00000910| 65 74 75 72 6e 22 2c 20 | 22 4b 5f 64 65 6c 65 74 |eturn", |"K_delet|
|00000920| 65 22 2c 20 22 4b 5f 67 | 65 74 6c 69 6e 65 22 2c |e", "K_g|etline",|
|00000930| 20 22 4b 5f 66 75 6e 63 | 74 69 6f 6e 22 2c 0d 09 | "K_func|tion",..|
|00000940| 22 72 65 64 69 72 65 63 | 74 5f 6f 75 74 70 75 74 |"redirec|t_output|
|00000950| 22 2c 20 22 72 65 64 69 | 72 65 63 74 5f 61 70 70 |", "redi|rect_app|
|00000960| 65 6e 64 22 2c 20 22 72 | 65 64 69 72 65 63 74 5f |end", "r|edirect_|
|00000970| 70 69 70 65 22 2c 0d 09 | 22 72 65 64 69 72 65 63 |pipe",..|"redirec|
|00000980| 74 5f 70 69 70 65 69 6e | 22 2c 20 22 72 65 64 69 |t_pipein|", "redi|
|00000990| 72 65 63 74 5f 69 6e 70 | 75 74 22 2c 0d 09 2f 2a |rect_inp|ut",../*|
|000009a0| 20 36 30 20 2a 2f 0d 09 | 22 76 61 72 22 2c 20 22 | 60 */..|"var", "|
|000009b0| 76 61 72 5f 61 72 72 61 | 79 22 2c 20 22 76 61 6c |var_arra|y", "val|
|000009c0| 22 2c 20 22 62 75 69 6c | 74 69 6e 22 2c 20 22 6c |", "buil|tin", "l|
|000009d0| 69 6e 65 5f 72 61 6e 67 | 65 22 2c 0d 09 22 69 6e |ine_rang|e",.."in|
|000009e0| 5f 61 72 72 61 79 22 2c | 20 22 66 75 6e 63 22 2c |_array",| "func",|
|000009f0| 20 22 66 75 6e 63 5f 63 | 61 6c 6c 22 2c 20 22 63 | "func_c|all", "c|
|00000a00| 6f 6e 64 5f 65 78 70 22 | 2c 20 22 72 65 67 65 78 |ond_exp"|, "regex|
|00000a10| 22 2c 0d 09 2f 2a 20 37 | 30 20 2a 2f 0d 09 22 68 |",../* 7|0 */.."h|
|00000a20| 61 73 68 6e 6f 64 65 22 | 2c 20 22 61 68 61 73 68 |ashnode"|, "ahash|
|00000a30| 22 0d 7d 3b 0d 0d 70 74 | 72 65 65 28 6e 29 0d 4e |".};..pt|ree(n).N|
|00000a40| 4f 44 45 20 2a 6e 3b 0d | 7b 0d 09 70 72 69 6e 74 |ODE *n;.|{..print|
|00000a50| 5f 70 61 72 73 65 5f 74 | 72 65 65 28 6e 29 3b 0d |_parse_t|ree(n);.|
|00000a60| 7d 0d 0d 70 74 28 29 0d | 7b 0d 09 6c 6f 6e 67 20 |}..pt().|{..long |
|00000a70| 78 3b 0d 0d 09 28 76 6f | 69 64 29 20 73 63 61 6e |x;...(vo|id) scan|
|00000a80| 66 28 22 25 78 22 2c 20 | 26 78 29 3b 0d 09 70 72 |f("%x", |&x);..pr|
|00000a90| 69 6e 74 66 28 22 30 78 | 25 78 5c 6e 22 2c 20 78 |intf("0x|%x\n", x|
|00000aa0| 29 3b 0d 09 70 72 69 6e | 74 5f 70 61 72 73 65 5f |);..prin|t_parse_|
|00000ab0| 74 72 65 65 28 28 4e 4f | 44 45 20 2a 29 20 78 29 |tree((NO|DE *) x)|
|00000ac0| 3b 0d 09 66 66 6c 75 73 | 68 28 73 74 64 6f 75 74 |;..fflus|h(stdout|
|00000ad0| 29 3b 0d 7d 0d 0d 73 74 | 61 74 69 63 20 64 65 70 |);.}..st|atic dep|
|00000ae0| 74 68 20 3d 20 30 3b 0d | 0d 70 72 69 6e 74 5f 70 |th = 0;.|.print_p|
|00000af0| 61 72 73 65 5f 74 72 65 | 65 28 70 74 72 29 0d 4e |arse_tre|e(ptr).N|
|00000b00| 4f 44 45 20 2a 70 74 72 | 3b 0d 7b 0d 09 69 66 20 |ODE *ptr|;.{..if |
|00000b10| 28 21 70 74 72 29 20 7b | 0d 09 09 70 72 69 6e 74 |(!ptr) {|...print|
|00000b20| 66 28 22 4e 55 4c 4c 5c | 6e 22 29 3b 0d 09 09 72 |f("NULL\|n");...r|
|00000b30| 65 74 75 72 6e 3b 0d 09 | 7d 0d 09 69 66 20 28 28 |eturn;..|}..if ((|
|00000b40| 73 68 6f 72 74 29 20 28 | 70 74 72 2d 3e 74 79 70 |short) (|ptr->typ|
|00000b50| 65 29 20 3c 20 30 20 7c | 7c 20 28 73 68 6f 72 74 |e) < 0 ||| (short|
|00000b60| 29 20 28 70 74 72 2d 3e | 74 79 70 65 29 20 3e 20 |) (ptr->|type) > |
|00000b70| 73 69 7a 65 6f 66 28 6e | 6e 61 6d 65 73 29 20 2f |sizeof(n|names) /|
|00000b80| 20 73 69 7a 65 6f 66 28 | 6e 6e 61 6d 65 73 5b 30 | sizeof(|nnames[0|
|00000b90| 5d 29 29 20 7b 0d 09 09 | 70 72 69 6e 74 66 28 22 |])) {...|printf("|
|00000ba0| 28 30 78 25 78 20 54 79 | 70 65 20 25 64 3f 3f 29 |(0x%x Ty|pe %d??)|
|00000bb0| 5c 6e 22 2c 20 70 74 72 | 2c 20 70 74 72 2d 3e 74 |\n", ptr|, ptr->t|
|00000bc0| 79 70 65 29 3b 0d 09 09 | 72 65 74 75 72 6e 3b 0d |ype);...|return;.|
|00000bd0| 09 7d 0d 09 70 72 69 6e | 74 66 28 22 28 25 64 29 |.}..prin|tf("(%d)|
|00000be0| 25 2a 73 22 2c 20 64 65 | 70 74 68 2c 20 64 65 70 |%*s", de|pth, dep|
|00000bf0| 74 68 2c 20 22 22 29 3b | 0d 09 73 77 69 74 63 68 |th, "");|..switch|
|00000c00| 20 28 28 73 68 6f 72 74 | 29 20 70 74 72 2d 3e 74 | ((short|) ptr->t|
|00000c10| 79 70 65 29 20 7b 0d 09 | 63 61 73 65 20 28 73 68 |ype) {..|case (sh|
|00000c20| 6f 72 74 29 20 4e 6f 64 | 65 5f 76 61 6c 3a 0d 09 |ort) Nod|e_val:..|
|00000c30| 09 70 72 69 6e 74 66 28 | 22 28 30 78 25 78 20 56 |.printf(|"(0x%x V|
|00000c40| 61 6c 75 65 20 22 2c 20 | 70 74 72 29 3b 0d 09 09 |alue ", |ptr);...|
|00000c50| 69 66 20 28 70 74 72 2d | 3e 66 6c 61 67 73 26 53 |if (ptr-|>flags&S|
|00000c60| 54 52 29 0d 09 09 09 70 | 72 69 6e 74 66 28 22 73 |TR)....p|rintf("s|
|00000c70| 74 72 3a 20 5c 22 25 2e | 2a 73 5c 22 20 22 2c 20 |tr: \"%.|*s\" ", |
|00000c80| 70 74 72 2d 3e 73 74 6c | 65 6e 2c 20 70 74 72 2d |ptr->stl|en, ptr-|
|00000c90| 3e 73 74 70 74 72 29 3b | 0d 09 09 69 66 20 28 70 |>stptr);|...if (p|
|00000ca0| 74 72 2d 3e 66 6c 61 67 | 73 26 4e 55 4d 29 0d 09 |tr->flag|s&NUM)..|
|00000cb0| 09 09 70 72 69 6e 74 66 | 28 22 6e 75 6d 3a 20 25 |..printf|("num: %|
|00000cc0| 67 22 2c 20 70 74 72 2d | 3e 6e 75 6d 62 72 29 3b |g", ptr-|>numbr);|
|00000cd0| 0d 09 09 70 72 69 6e 74 | 66 28 22 29 5c 6e 22 29 |...print|f(")\n")|
|00000ce0| 3b 0d 09 09 72 65 74 75 | 72 6e 3b 0d 09 63 61 73 |;...retu|rn;..cas|
|00000cf0| 65 20 28 73 68 6f 72 74 | 29 20 4e 6f 64 65 5f 76 |e (short|) Node_v|
|00000d00| 61 72 5f 61 72 72 61 79 | 3a 0d 09 09 7b 0d 09 09 |ar_array|:...{...|
|00000d10| 73 74 72 75 63 74 20 73 | 65 61 72 63 68 20 2a 6c |struct s|earch *l|
|00000d20| 3b 0d 0d 09 09 70 72 69 | 6e 74 66 28 22 28 30 78 |;....pri|ntf("(0x|
|00000d30| 25 78 20 41 72 72 61 79 | 29 5c 6e 22 2c 20 70 74 |%x Array|)\n", pt|
|00000d40| 72 29 3b 0d 09 09 66 6f | 72 20 28 6c 20 3d 20 61 |r);...fo|r (l = a|
|00000d50| 73 73 6f 63 5f 73 63 61 | 6e 28 70 74 72 29 3b 20 |ssoc_sca|n(ptr); |
|00000d60| 6c 3b 20 6c 20 3d 20 61 | 73 73 6f 63 5f 6e 65 78 |l; l = a|ssoc_nex|
|00000d70| 74 28 6c 29 29 20 7b 0d | 09 09 09 70 72 69 6e 74 |t(l)) {.|...print|
|00000d80| 66 28 22 5c 74 69 6e 64 | 65 78 3a 20 22 29 3b 0d |f("\tind|ex: ");.|
|00000d90| 09 09 09 70 72 69 6e 74 | 5f 70 61 72 73 65 5f 74 |...print|_parse_t|
|00000da0| 72 65 65 28 6c 2d 3e 72 | 65 74 76 61 6c 29 3b 0d |ree(l->r|etval);.|
|00000db0| 09 09 09 70 72 69 6e 74 | 66 28 22 5c 74 76 61 6c |...print|f("\tval|
|00000dc0| 75 65 3a 20 22 29 3b 0d | 09 09 09 70 72 69 6e 74 |ue: ");.|...print|
|00000dd0| 5f 70 61 72 73 65 5f 74 | 72 65 65 28 2a 61 73 73 |_parse_t|ree(*ass|
|00000de0| 6f 63 5f 6c 6f 6f 6b 75 | 70 28 70 74 72 2c 20 6c |oc_looku|p(ptr, l|
|00000df0| 2d 3e 72 65 74 76 61 6c | 29 29 3b 0d 09 09 09 70 |->retval|));....p|
|00000e00| 72 69 6e 74 66 28 22 5c | 6e 22 29 3b 0d 09 09 7d |rintf("\|n");...}|
|00000e10| 0d 09 09 72 65 74 75 72 | 6e 3b 0d 09 09 7d 0d 09 |...retur|n;...}..|
|00000e20| 63 61 73 65 20 4e 6f 64 | 65 5f 70 61 72 61 6d 5f |case Nod|e_param_|
|00000e30| 6c 69 73 74 3a 0d 09 09 | 70 72 69 6e 74 66 28 22 |list:...|printf("|
|00000e40| 28 30 78 25 78 20 4c 6f | 63 61 6c 20 76 61 72 69 |(0x%x Lo|cal vari|
|00000e50| 61 62 6c 65 20 25 73 29 | 5c 6e 22 2c 20 70 74 72 |able %s)|\n", ptr|
|00000e60| 2c 20 70 74 72 2d 3e 70 | 61 72 61 6d 29 3b 0d 09 |, ptr->p|aram);..|
|00000e70| 09 69 66 20 28 70 74 72 | 2d 3e 72 6e 6f 64 65 29 |.if (ptr|->rnode)|
|00000e80| 0d 09 09 09 70 72 69 6e | 74 5f 70 61 72 73 65 5f |....prin|t_parse_|
|00000e90| 74 72 65 65 28 70 74 72 | 2d 3e 72 6e 6f 64 65 29 |tree(ptr|->rnode)|
|00000ea0| 3b 0d 09 09 72 65 74 75 | 72 6e 3b 0d 09 63 61 73 |;...retu|rn;..cas|
|00000eb0| 65 20 4e 6f 64 65 5f 72 | 65 67 65 78 3a 0d 09 09 |e Node_r|egex:...|
|00000ec0| 70 72 69 6e 74 66 28 22 | 28 30 78 25 78 20 52 65 |printf("|(0x%x Re|
|00000ed0| 67 75 6c 61 72 20 65 78 | 70 72 65 73 73 69 6f 6e |gular ex|pression|
|00000ee0| 20 25 73 5c 6e 22 2c 20 | 70 74 72 2c 20 70 74 72 | %s\n", |ptr, ptr|
|00000ef0| 2d 3e 72 65 5f 74 65 78 | 74 29 3b 0d 09 09 72 65 |->re_tex|t);...re|
|00000f00| 74 75 72 6e 3b 0d 09 7d | 0d 09 69 66 20 28 70 74 |turn;..}|..if (pt|
|00000f10| 72 2d 3e 6c 6e 6f 64 65 | 29 0d 09 09 70 72 69 6e |r->lnode|)...prin|
|00000f20| 74 66 28 22 30 78 25 78 | 20 3d 20 6c 65 66 74 3c |tf("0x%x| = left<|
|00000f30| 2d 2d 22 2c 20 70 74 72 | 2d 3e 6c 6e 6f 64 65 29 |--", ptr|->lnode)|
|00000f40| 3b 0d 09 70 72 69 6e 74 | 66 28 22 28 30 78 25 78 |;..print|f("(0x%x|
|00000f50| 20 25 73 2e 25 64 29 22 | 2c 20 70 74 72 2c 20 6e | %s.%d)"|, ptr, n|
|00000f60| 6e 61 6d 65 73 5b 28 73 | 68 6f 72 74 29 20 28 70 |names[(s|hort) (p|
|00000f70| 74 72 2d 3e 74 79 70 65 | 29 5d 2c 20 70 74 72 2d |tr->type|)], ptr-|
|00000f80| 3e 74 79 70 65 29 3b 0d | 09 69 66 20 28 70 74 72 |>type);.|.if (ptr|
|00000f90| 2d 3e 72 6e 6f 64 65 29 | 0d 09 09 70 72 69 6e 74 |->rnode)|...print|
|00000fa0| 66 28 22 2d 2d 3e 72 69 | 67 68 74 20 3d 20 30 78 |f("-->ri|ght = 0x|
|00000fb0| 25 78 22 2c 20 70 74 72 | 2d 3e 72 6e 6f 64 65 29 |%x", ptr|->rnode)|
|00000fc0| 3b 0d 09 70 72 69 6e 74 | 66 28 22 5c 6e 22 29 3b |;..print|f("\n");|
|00000fd0| 0d 09 64 65 70 74 68 2b | 2b 3b 0d 09 69 66 20 28 |..depth+|+;..if (|
|00000fe0| 70 74 72 2d 3e 6c 6e 6f | 64 65 29 0d 09 09 70 72 |ptr->lno|de)...pr|
|00000ff0| 69 6e 74 5f 70 61 72 73 | 65 5f 74 72 65 65 28 70 |int_pars|e_tree(p|
|00001000| 74 72 2d 3e 6c 6e 6f 64 | 65 29 3b 0d 09 73 77 69 |tr->lnod|e);..swi|
|00001010| 74 63 68 20 28 28 73 68 | 6f 72 74 29 20 70 74 72 |tch ((sh|ort) ptr|
|00001020| 2d 3e 74 79 70 65 29 20 | 7b 0d 09 63 61 73 65 20 |->type) |{..case |
|00001030| 28 73 68 6f 72 74 29 20 | 4e 6f 64 65 5f 6c 69 6e |(short) |Node_lin|
|00001040| 65 5f 72 61 6e 67 65 3a | 0d 09 63 61 73 65 20 28 |e_range:|..case (|
|00001050| 73 68 6f 72 74 29 20 4e | 6f 64 65 5f 6d 61 74 63 |short) N|ode_matc|
|00001060| 68 3a 0d 09 63 61 73 65 | 20 28 73 68 6f 72 74 29 |h:..case| (short)|
|00001070| 20 4e 6f 64 65 5f 6e 6f | 6d 61 74 63 68 3a 0d 09 | Node_no|match:..|
|00001080| 09 62 72 65 61 6b 3b 0d | 09 63 61 73 65 20 28 73 |.break;.|.case (s|
|00001090| 68 6f 72 74 29 20 4e 6f | 64 65 5f 62 75 69 6c 74 |hort) No|de_built|
|000010a0| 69 6e 3a 0d 09 09 70 72 | 69 6e 74 66 28 22 42 75 |in:...pr|intf("Bu|
|000010b0| 69 6c 74 69 6e 3a 20 25 | 64 5c 6e 22 2c 20 70 74 |iltin: %|d\n", pt|
|000010c0| 72 2d 3e 70 72 6f 63 29 | 3b 0d 09 09 62 72 65 61 |r->proc)|;...brea|
|000010d0| 6b 3b 0d 09 63 61 73 65 | 20 28 73 68 6f 72 74 29 |k;..case| (short)|
|000010e0| 20 4e 6f 64 65 5f 4b 5f | 66 6f 72 3a 0d 09 63 61 | Node_K_|for:..ca|
|000010f0| 73 65 20 28 73 68 6f 72 | 74 29 20 4e 6f 64 65 5f |se (shor|t) Node_|
|00001100| 4b 5f 61 72 72 61 79 66 | 6f 72 3a 0d 09 09 70 72 |K_arrayf|or:...pr|
|00001110| 69 6e 74 66 28 22 28 25 | 73 3a 29 5c 6e 22 2c 20 |intf("(%|s:)\n", |
|00001120| 6e 6e 61 6d 65 73 5b 28 | 73 68 6f 72 74 29 20 28 |nnames[(|short) (|
|00001130| 70 74 72 2d 3e 74 79 70 | 65 29 5d 29 3b 0d 09 09 |ptr->typ|e)]);...|
|00001140| 70 72 69 6e 74 5f 70 61 | 72 73 65 5f 74 72 65 65 |print_pa|rse_tree|
|00001150| 28 70 74 72 2d 3e 66 6f | 72 6c 6f 6f 70 2d 3e 69 |(ptr->fo|rloop->i|
|00001160| 6e 69 74 29 3b 0d 09 09 | 70 72 69 6e 74 66 28 22 |nit);...|printf("|
|00001170| 6c 6f 6f 70 69 6e 67 3a | 5c 6e 22 29 3b 0d 09 09 |looping:|\n");...|
|00001180| 70 72 69 6e 74 5f 70 61 | 72 73 65 5f 74 72 65 65 |print_pa|rse_tree|
|00001190| 28 70 74 72 2d 3e 66 6f | 72 6c 6f 6f 70 2d 3e 63 |(ptr->fo|rloop->c|
|000011a0| 6f 6e 64 29 3b 0d 09 09 | 70 72 69 6e 74 66 28 22 |ond);...|printf("|
|000011b0| 64 6f 69 6e 67 3a 5c 6e | 22 29 3b 0d 09 09 70 72 |doing:\n|");...pr|
|000011c0| 69 6e 74 5f 70 61 72 73 | 65 5f 74 72 65 65 28 70 |int_pars|e_tree(p|
|000011d0| 74 72 2d 3e 66 6f 72 6c | 6f 6f 70 2d 3e 69 6e 63 |tr->forl|oop->inc|
|000011e0| 72 29 3b 0d 09 09 62 72 | 65 61 6b 3b 0d 09 64 65 |r);...br|eak;..de|
|000011f0| 66 61 75 6c 74 3a 0d 09 | 09 69 66 20 28 70 74 72 |fault:..|.if (ptr|
|00001200| 2d 3e 72 6e 6f 64 65 29 | 0d 09 09 09 70 72 69 6e |->rnode)|....prin|
|00001210| 74 5f 70 61 72 73 65 5f | 74 72 65 65 28 70 74 72 |t_parse_|tree(ptr|
|00001220| 2d 3e 72 6e 6f 64 65 29 | 3b 0d 09 09 62 72 65 61 |->rnode)|;...brea|
|00001230| 6b 3b 0d 09 7d 0d 09 2d | 2d 64 65 70 74 68 3b 0d |k;..}..-|-depth;.|
|00001240| 7d 0d 0d 0d 2f 2a 0d 20 | 2a 20 70 72 69 6e 74 20 |}.../*. |* print |
|00001250| 6f 75 74 20 61 6c 6c 20 | 74 68 65 20 76 61 72 69 |out all |the vari|
|00001260| 61 62 6c 65 73 20 69 6e | 20 74 68 65 20 77 6f 72 |ables in| the wor|
|00001270| 6c 64 20 0d 20 2a 2f 0d | 0d 64 75 6d 70 5f 76 61 |ld . */.|.dump_va|
|00001280| 72 73 28 29 0d 7b 0d 09 | 72 65 67 69 73 74 65 72 |rs().{..|register|
|00001290| 20 73 68 6f 72 74 20 6e | 3b 0d 09 72 65 67 69 73 | short n|;..regis|
|000012a0| 74 65 72 20 4e 4f 44 45 | 20 2a 62 75 63 3b 0d 0d |ter NODE| *buc;..|
|000012b0| 23 69 66 64 65 66 20 6e | 6f 74 64 65 66 0d 09 70 |#ifdef n|otdef..p|
|000012c0| 72 69 6e 74 66 28 22 46 | 69 65 6c 64 73 3a 22 29 |rintf("F|ields:")|
|000012d0| 3b 0d 09 64 75 6d 70 5f | 66 69 65 6c 64 73 28 29 |;..dump_|fields()|
|000012e0| 3b 0d 23 65 6e 64 69 66 | 0d 09 70 72 69 6e 74 66 |;.#endif|..printf|
|000012f0| 28 22 56 61 72 73 3a 5c | 6e 22 29 3b 0d 09 66 6f |("Vars:\|n");..fo|
|00001300| 72 20 28 6e 20 3d 20 30 | 3b 20 6e 20 3c 20 48 41 |r (n = 0|; n < HA|
|00001310| 53 48 53 49 5a 45 3b 20 | 6e 2b 2b 29 20 7b 0d 09 |SHSIZE; |n++) {..|
|00001320| 09 66 6f 72 20 28 62 75 | 63 20 3d 20 76 61 72 69 |.for (bu|c = vari|
|00001330| 61 62 6c 65 73 5b 6e 5d | 3b 20 62 75 63 3b 20 62 |ables[n]|; buc; b|
|00001340| 75 63 20 3d 20 62 75 63 | 2d 3e 68 6e 65 78 74 29 |uc = buc|->hnext)|
|00001350| 20 7b 0d 09 09 09 70 72 | 69 6e 74 66 28 22 27 25 | {....pr|intf("'%|
|00001360| 2e 2a 73 27 3a 20 22 2c | 20 62 75 63 2d 3e 68 6c |.*s': ",| buc->hl|
|00001370| 65 6e 67 74 68 2c 20 62 | 75 63 2d 3e 68 6e 61 6d |ength, b|uc->hnam|
|00001380| 65 29 3b 0d 09 09 09 70 | 72 69 6e 74 5f 70 61 72 |e);....p|rint_par|
|00001390| 73 65 5f 74 72 65 65 28 | 62 75 63 2d 3e 68 76 61 |se_tree(|buc->hva|
|000013a0| 6c 75 65 29 3b 0d 09 09 | 7d 0d 09 7d 0d 09 70 72 |lue);...|}..}..pr|
|000013b0| 69 6e 74 66 28 22 45 6e | 64 5c 6e 22 29 3b 0d 7d |intf("En|d\n");.}|
|000013c0| 0d 0d 23 69 66 64 65 66 | 20 6e 6f 74 64 65 66 0d |..#ifdef| notdef.|
|000013d0| 64 75 6d 70 5f 66 69 65 | 6c 64 73 28 29 0d 7b 0d |dump_fie|lds().{.|
|000013e0| 09 72 65 67 69 73 74 65 | 72 20 4e 4f 44 45 20 2a |.registe|r NODE *|
|000013f0| 2a 70 3b 0d 09 72 65 67 | 69 73 74 65 72 20 73 68 |*p;..reg|ister sh|
|00001400| 6f 72 74 20 6e 3b 0d 0d | 09 70 72 69 6e 74 66 28 |ort n;..|.printf(|
|00001410| 22 25 64 20 66 69 65 6c | 64 73 5c 6e 22 2c 20 66 |"%d fiel|ds\n", f|
|00001420| 5f 61 72 72 5f 73 69 7a | 29 3b 0d 09 66 6f 72 20 |_arr_siz|);..for |
|00001430| 28 6e 20 3d 20 30 2c 20 | 70 20 3d 20 26 66 69 65 |(n = 0, |p = &fie|
|00001440| 6c 64 73 5f 61 72 72 5b | 30 5d 3b 20 6e 20 3c 20 |lds_arr[|0]; n < |
|00001450| 66 5f 61 72 72 5f 73 69 | 7a 3b 20 6e 2b 2b 2c 20 |f_arr_si|z; n++, |
|00001460| 70 2b 2b 29 20 7b 0d 09 | 09 70 72 69 6e 74 66 28 |p++) {..|.printf(|
|00001470| 22 24 25 64 20 69 73 20 | 27 22 2c 20 6e 29 3b 0d |"$%d is |'", n);.|
|00001480| 09 09 70 72 69 6e 74 5f | 73 69 6d 70 6c 65 28 2a |..print_|simple(*|
|00001490| 70 2c 20 73 74 64 6f 75 | 74 29 3b 0d 09 09 70 72 |p, stdou|t);...pr|
|000014a0| 69 6e 74 66 28 22 27 5c | 6e 22 29 3b 0d 09 7d 0d |intf("'\|n");..}.|
|000014b0| 7d 0d 23 65 6e 64 69 66 | 0d 0d 2f 2a 20 56 41 52 |}.#endif|../* VAR|
|000014c0| 41 52 47 53 31 20 2a 2f | 0d 70 72 69 6e 74 5f 64 |ARGS1 */|.print_d|
|000014d0| 65 62 75 67 28 73 74 72 | 2c 20 6e 29 0d 63 68 61 |ebug(str|, n).cha|
|000014e0| 72 20 2a 73 74 72 3b 0d | 7b 0d 09 65 78 74 65 72 |r *str;.|{..exter|
|000014f0| 6e 20 73 68 6f 72 74 20 | 64 65 62 75 67 67 69 6e |n short |debuggin|
|00001500| 67 3b 0d 0d 09 69 66 20 | 28 64 65 62 75 67 67 69 |g;...if |(debuggi|
|00001510| 6e 67 29 0d 09 09 70 72 | 69 6e 74 66 28 22 25 73 |ng)...pr|intf("%s|
|00001520| 3a 30 78 25 78 5c 6e 22 | 2c 20 73 74 72 2c 20 6e |:0x%x\n"|, str, n|
|00001530| 29 3b 0d 7d 0d 0d 73 68 | 6f 72 74 20 69 6e 64 65 |);.}..sh|ort inde|
|00001540| 6e 74 20 3d 20 30 3b 0d | 0d 70 72 69 6e 74 5f 61 |nt = 0;.|.print_a|
|00001550| 5f 6e 6f 64 65 28 70 74 | 72 29 0d 4e 4f 44 45 20 |_node(pt|r).NODE |
|00001560| 2a 70 74 72 3b 0d 7b 0d | 09 4e 4f 44 45 20 2a 70 |*ptr;.{.|.NODE *p|
|00001570| 31 3b 0d 09 63 68 61 72 | 20 2a 73 74 72 2c 20 2a |1;..char| *str, *|
|00001580| 73 74 72 32 3b 0d 09 73 | 68 6f 72 74 20 6e 3b 0d |str2;..s|hort n;.|
|00001590| 09 4e 4f 44 45 20 2a 62 | 75 63 3b 0d 0d 09 69 66 |.NODE *b|uc;...if|
|000015a0| 20 28 21 70 74 72 29 0d | 09 09 72 65 74 75 72 6e | (!ptr).|..return|
|000015b0| 3b 09 09 2f 2a 20 64 6f | 6e 27 74 20 70 72 69 6e |;../* do|n't prin|
|000015c0| 74 20 6e 75 6c 6c 20 70 | 74 72 73 20 2a 2f 0d 09 |t null p|trs */..|
|000015d0| 73 77 69 74 63 68 20 28 | 70 74 72 2d 3e 74 79 70 |switch (|ptr->typ|
|000015e0| 65 29 20 7b 0d 09 63 61 | 73 65 20 4e 6f 64 65 5f |e) {..ca|se Node_|
|000015f0| 76 61 6c 3a 0d 09 09 69 | 66 20 28 70 74 72 2d 3e |val:...i|f (ptr->|
|00001600| 66 6c 61 67 73 26 4e 55 | 4d 29 0d 09 09 09 70 72 |flags&NU|M)....pr|
|00001610| 69 6e 74 66 28 22 25 67 | 22 2c 20 70 74 72 2d 3e |intf("%g|", ptr->|
|00001620| 6e 75 6d 62 72 29 3b 0d | 09 09 65 6c 73 65 0d 09 |numbr);.|..else..|
|00001630| 09 09 70 72 69 6e 74 66 | 28 22 5c 22 25 2e 2a 73 |..printf|("\"%.*s|
|00001640| 5c 22 22 2c 20 70 74 72 | 2d 3e 73 74 6c 65 6e 2c |\"", ptr|->stlen,|
|00001650| 20 70 74 72 2d 3e 73 74 | 70 74 72 29 3b 0d 09 09 | ptr->st|ptr);...|
|00001660| 72 65 74 75 72 6e 3b 0d | 09 63 61 73 65 20 4e 6f |return;.|.case No|
|00001670| 64 65 5f 74 69 6d 65 73 | 3a 0d 09 09 73 74 72 20 |de_times|:...str |
|00001680| 3d 20 22 2a 22 3b 0d 09 | 09 67 6f 74 6f 20 70 72 |= "*";..|.goto pr|
|00001690| 5f 74 77 6f 6f 70 3b 0d | 09 63 61 73 65 20 4e 6f |_twoop;.|.case No|
|000016a0| 64 65 5f 71 75 6f 74 69 | 65 6e 74 3a 0d 09 09 73 |de_quoti|ent:...s|
|000016b0| 74 72 20 3d 20 22 2f 22 | 3b 0d 09 09 67 6f 74 6f |tr = "/"|;...goto|
|000016c0| 20 70 72 5f 74 77 6f 6f | 70 3b 0d 09 63 61 73 65 | pr_twoo|p;..case|
|000016d0| 20 4e 6f 64 65 5f 6d 6f | 64 3a 0d 09 09 73 74 72 | Node_mo|d:...str|
|000016e0| 20 3d 20 22 25 22 3b 0d | 09 09 67 6f 74 6f 20 70 | = "%";.|..goto p|
|000016f0| 72 5f 74 77 6f 6f 70 3b | 0d 09 63 61 73 65 20 4e |r_twoop;|..case N|
|00001700| 6f 64 65 5f 70 6c 75 73 | 3a 0d 09 09 73 74 72 20 |ode_plus|:...str |
|00001710| 3d 20 22 2b 22 3b 0d 09 | 09 67 6f 74 6f 20 70 72 |= "+";..|.goto pr|
|00001720| 5f 74 77 6f 6f 70 3b 0d | 09 63 61 73 65 20 4e 6f |_twoop;.|.case No|
|00001730| 64 65 5f 6d 69 6e 75 73 | 3a 0d 09 09 73 74 72 20 |de_minus|:...str |
|00001740| 3d 20 22 2d 22 3b 0d 09 | 09 67 6f 74 6f 20 70 72 |= "-";..|.goto pr|
|00001750| 5f 74 77 6f 6f 70 3b 0d | 09 63 61 73 65 20 4e 6f |_twoop;.|.case No|
|00001760| 64 65 5f 65 78 70 3a 0d | 09 09 73 74 72 20 3d 20 |de_exp:.|..str = |
|00001770| 22 5e 22 3b 0d 09 09 67 | 6f 74 6f 20 70 72 5f 74 |"^";...g|oto pr_t|
|00001780| 77 6f 6f 70 3b 0d 09 63 | 61 73 65 20 4e 6f 64 65 |woop;..c|ase Node|
|00001790| 5f 63 6f 6e 63 61 74 3a | 0d 09 09 73 74 72 20 3d |_concat:|...str =|
|000017a0| 20 22 20 22 3b 0d 09 09 | 67 6f 74 6f 20 70 72 5f | " ";...|goto pr_|
|000017b0| 74 77 6f 6f 70 3b 0d 09 | 63 61 73 65 20 4e 6f 64 |twoop;..|case Nod|
|000017c0| 65 5f 61 73 73 69 67 6e | 3a 0d 09 09 73 74 72 20 |e_assign|:...str |
|000017d0| 3d 20 22 3d 22 3b 0d 09 | 09 67 6f 74 6f 20 70 72 |= "=";..|.goto pr|
|000017e0| 5f 74 77 6f 6f 70 3b 0d | 09 63 61 73 65 20 4e 6f |_twoop;.|.case No|
|000017f0| 64 65 5f 61 73 73 69 67 | 6e 5f 74 69 6d 65 73 3a |de_assig|n_times:|
|00001800| 0d 09 09 73 74 72 20 3d | 20 22 2a 3d 22 3b 0d 09 |...str =| "*=";..|
|00001810| 09 67 6f 74 6f 20 70 72 | 5f 74 77 6f 6f 70 3b 0d |.goto pr|_twoop;.|
|00001820| 09 63 61 73 65 20 4e 6f | 64 65 5f 61 73 73 69 67 |.case No|de_assig|
|00001830| 6e 5f 71 75 6f 74 69 65 | 6e 74 3a 0d 09 09 73 74 |n_quotie|nt:...st|
|00001840| 72 20 3d 20 22 2f 3d 22 | 3b 0d 09 09 67 6f 74 6f |r = "/="|;...goto|
|00001850| 20 70 72 5f 74 77 6f 6f | 70 3b 0d 09 63 61 73 65 | pr_twoo|p;..case|
|00001860| 20 4e 6f 64 65 5f 61 73 | 73 69 67 6e 5f 6d 6f 64 | Node_as|sign_mod|
|00001870| 3a 0d 09 09 73 74 72 20 | 3d 20 22 25 3d 22 3b 0d |:...str |= "%=";.|
|00001880| 09 09 67 6f 74 6f 20 70 | 72 5f 74 77 6f 6f 70 3b |..goto p|r_twoop;|
|00001890| 0d 09 63 61 73 65 20 4e | 6f 64 65 5f 61 73 73 69 |..case N|ode_assi|
|000018a0| 67 6e 5f 70 6c 75 73 3a | 0d 09 09 73 74 72 20 3d |gn_plus:|...str =|
|000018b0| 20 22 2b 3d 22 3b 0d 09 | 09 67 6f 74 6f 20 70 72 | "+=";..|.goto pr|
|000018c0| 5f 74 77 6f 6f 70 3b 0d | 09 63 61 73 65 20 4e 6f |_twoop;.|.case No|
|000018d0| 64 65 5f 61 73 73 69 67 | 6e 5f 6d 69 6e 75 73 3a |de_assig|n_minus:|
|000018e0| 0d 09 09 73 74 72 20 3d | 20 22 2d 3d 22 3b 0d 09 |...str =| "-=";..|
|000018f0| 09 67 6f 74 6f 20 70 72 | 5f 74 77 6f 6f 70 3b 0d |.goto pr|_twoop;.|
|00001900| 09 63 61 73 65 20 4e 6f | 64 65 5f 61 73 73 69 67 |.case No|de_assig|
|00001910| 6e 5f 65 78 70 3a 0d 09 | 09 73 74 72 20 3d 20 22 |n_exp:..|.str = "|
|00001920| 5e 3d 22 3b 0d 09 09 67 | 6f 74 6f 20 70 72 5f 74 |^=";...g|oto pr_t|
|00001930| 77 6f 6f 70 3b 0d 09 63 | 61 73 65 20 4e 6f 64 65 |woop;..c|ase Node|
|00001940| 5f 61 6e 64 3a 0d 09 09 | 73 74 72 20 3d 20 22 26 |_and:...|str = "&|
|00001950| 26 22 3b 0d 09 09 67 6f | 74 6f 20 70 72 5f 74 77 |&";...go|to pr_tw|
|00001960| 6f 6f 70 3b 0d 09 63 61 | 73 65 20 4e 6f 64 65 5f |oop;..ca|se Node_|
|00001970| 6f 72 3a 0d 09 09 73 74 | 72 20 3d 20 22 7c 7c 22 |or:...st|r = "||"|
|00001980| 3b 0d 09 09 67 6f 74 6f | 20 70 72 5f 74 77 6f 6f |;...goto| pr_twoo|
|00001990| 70 3b 0d 09 63 61 73 65 | 20 4e 6f 64 65 5f 65 71 |p;..case| Node_eq|
|000019a0| 75 61 6c 3a 0d 09 09 73 | 74 72 20 3d 20 22 3d 3d |ual:...s|tr = "==|
|000019b0| 22 3b 0d 09 09 67 6f 74 | 6f 20 70 72 5f 74 77 6f |";...got|o pr_two|
|000019c0| 6f 70 3b 0d 09 63 61 73 | 65 20 4e 6f 64 65 5f 6e |op;..cas|e Node_n|
|000019d0| 6f 74 65 71 75 61 6c 3a | 0d 09 09 73 74 72 20 3d |otequal:|...str =|
|000019e0| 20 22 21 3d 22 3b 0d 09 | 09 67 6f 74 6f 20 70 72 | "!=";..|.goto pr|
|000019f0| 5f 74 77 6f 6f 70 3b 0d | 09 63 61 73 65 20 4e 6f |_twoop;.|.case No|
|00001a00| 64 65 5f 6c 65 73 73 3a | 0d 09 09 73 74 72 20 3d |de_less:|...str =|
|00001a10| 20 22 3c 22 3b 0d 09 09 | 67 6f 74 6f 20 70 72 5f | "<";...|goto pr_|
|00001a20| 74 77 6f 6f 70 3b 0d 09 | 63 61 73 65 20 4e 6f 64 |twoop;..|case Nod|
|00001a30| 65 5f 67 72 65 61 74 65 | 72 3a 0d 09 09 73 74 72 |e_greate|r:...str|
|00001a40| 20 3d 20 22 3e 22 3b 0d | 09 09 67 6f 74 6f 20 70 | = ">";.|..goto p|
|00001a50| 72 5f 74 77 6f 6f 70 3b | 0d 09 63 61 73 65 20 4e |r_twoop;|..case N|
|00001a60| 6f 64 65 5f 6c 65 71 3a | 0d 09 09 73 74 72 20 3d |ode_leq:|...str =|
|00001a70| 20 22 3c 3d 22 3b 0d 09 | 09 67 6f 74 6f 20 70 72 | "<=";..|.goto pr|
|00001a80| 5f 74 77 6f 6f 70 3b 0d | 09 63 61 73 65 20 4e 6f |_twoop;.|.case No|
|00001a90| 64 65 5f 67 65 71 3a 0d | 09 09 73 74 72 20 3d 20 |de_geq:.|..str = |
|00001aa0| 22 3e 3d 22 3b 0d 09 09 | 67 6f 74 6f 20 70 72 5f |">=";...|goto pr_|
|00001ab0| 74 77 6f 6f 70 3b 0d 0d | 70 72 5f 74 77 6f 6f 70 |twoop;..|pr_twoop|
|00001ac0| 3a 0d 09 09 70 72 69 6e | 74 5f 61 5f 6e 6f 64 65 |:...prin|t_a_node|
|00001ad0| 28 70 74 72 2d 3e 6c 6e | 6f 64 65 29 3b 0d 09 09 |(ptr->ln|ode);...|
|00001ae0| 70 72 69 6e 74 66 28 22 | 25 73 22 2c 20 73 74 72 |printf("|%s", str|
|00001af0| 29 3b 0d 09 09 70 72 69 | 6e 74 5f 61 5f 6e 6f 64 |);...pri|nt_a_nod|
|00001b00| 65 28 70 74 72 2d 3e 72 | 6e 6f 64 65 29 3b 0d 09 |e(ptr->r|node);..|
|00001b10| 09 72 65 74 75 72 6e 3b | 0d 0d 09 63 61 73 65 20 |.return;|...case |
|00001b20| 4e 6f 64 65 5f 6e 6f 74 | 3a 0d 09 09 73 74 72 20 |Node_not|:...str |
|00001b30| 3d 20 22 21 22 3b 0d 09 | 09 73 74 72 32 20 3d 20 |= "!";..|.str2 = |
|00001b40| 22 22 3b 0d 09 09 67 6f | 74 6f 20 70 72 5f 6f 6e |"";...go|to pr_on|
|00001b50| 65 6f 70 3b 0d 09 63 61 | 73 65 20 4e 6f 64 65 5f |eop;..ca|se Node_|
|00001b60| 66 69 65 6c 64 5f 73 70 | 65 63 3a 0d 09 09 73 74 |field_sp|ec:...st|
|00001b70| 72 20 3d 20 22 24 28 22 | 3b 0d 09 09 73 74 72 32 |r = "$("|;...str2|
|00001b80| 20 3d 20 22 29 22 3b 0d | 09 09 67 6f 74 6f 20 70 | = ")";.|..goto p|
|00001b90| 72 5f 6f 6e 65 6f 70 3b | 0d 09 63 61 73 65 20 4e |r_oneop;|..case N|
|00001ba0| 6f 64 65 5f 70 6f 73 74 | 69 6e 63 72 65 6d 65 6e |ode_post|incremen|
|00001bb0| 74 3a 0d 09 09 73 74 72 | 20 3d 20 22 22 3b 0d 09 |t:...str| = "";..|
|00001bc0| 09 73 74 72 32 20 3d 20 | 22 2b 2b 22 3b 0d 09 09 |.str2 = |"++";...|
|00001bd0| 67 6f 74 6f 20 70 72 5f | 6f 6e 65 6f 70 3b 0d 09 |goto pr_|oneop;..|
|00001be0| 63 61 73 65 20 4e 6f 64 | 65 5f 70 6f 73 74 64 65 |case Nod|e_postde|
|00001bf0| 63 72 65 6d 65 6e 74 3a | 0d 09 09 73 74 72 20 3d |crement:|...str =|
|00001c00| 20 22 22 3b 0d 09 09 73 | 74 72 32 20 3d 20 22 2d | "";...s|tr2 = "-|
|00001c10| 2d 22 3b 0d 09 09 67 6f | 74 6f 20 70 72 5f 6f 6e |-";...go|to pr_on|
|00001c20| 65 6f 70 3b 0d 09 63 61 | 73 65 20 4e 6f 64 65 5f |eop;..ca|se Node_|
|00001c30| 70 72 65 69 6e 63 72 65 | 6d 65 6e 74 3a 0d 09 09 |preincre|ment:...|
|00001c40| 73 74 72 20 3d 20 22 2b | 2b 22 3b 0d 09 09 73 74 |str = "+|+";...st|
|00001c50| 72 32 20 3d 20 22 22 3b | 0d 09 09 67 6f 74 6f 20 |r2 = "";|...goto |
|00001c60| 70 72 5f 6f 6e 65 6f 70 | 3b 0d 09 63 61 73 65 20 |pr_oneop|;..case |
|00001c70| 4e 6f 64 65 5f 70 72 65 | 64 65 63 72 65 6d 65 6e |Node_pre|decremen|
|00001c80| 74 3a 0d 09 09 73 74 72 | 20 3d 20 22 2d 2d 22 3b |t:...str| = "--";|
|00001c90| 0d 09 09 73 74 72 32 20 | 3d 20 22 22 3b 0d 09 09 |...str2 |= "";...|
|00001ca0| 67 6f 74 6f 20 70 72 5f | 6f 6e 65 6f 70 3b 0d 70 |goto pr_|oneop;.p|
|00001cb0| 72 5f 6f 6e 65 6f 70 3a | 0d 09 09 70 72 69 6e 74 |r_oneop:|...print|
|00001cc0| 66 28 73 74 72 29 3b 0d | 09 09 70 72 69 6e 74 5f |f(str);.|..print_|
|00001cd0| 61 5f 6e 6f 64 65 28 70 | 74 72 2d 3e 73 75 62 6e |a_node(p|tr->subn|
|00001ce0| 6f 64 65 29 3b 0d 09 09 | 70 72 69 6e 74 66 28 73 |ode);...|printf(s|
|00001cf0| 74 72 32 29 3b 0d 09 09 | 72 65 74 75 72 6e 3b 0d |tr2);...|return;.|
|00001d00| 0d 09 63 61 73 65 20 4e | 6f 64 65 5f 65 78 70 72 |..case N|ode_expr|
|00001d10| 65 73 73 69 6f 6e 5f 6c | 69 73 74 3a 0d 09 09 70 |ession_l|ist:...p|
|00001d20| 72 69 6e 74 5f 61 5f 6e | 6f 64 65 28 70 74 72 2d |rint_a_n|ode(ptr-|
|00001d30| 3e 6c 6e 6f 64 65 29 3b | 0d 09 09 69 66 20 28 70 |>lnode);|...if (p|
|00001d40| 74 72 2d 3e 72 6e 6f 64 | 65 29 20 7b 0d 09 09 09 |tr->rnod|e) {....|
|00001d50| 70 72 69 6e 74 66 28 22 | 2c 22 29 3b 0d 09 09 09 |printf("|,");....|
|00001d60| 70 72 69 6e 74 5f 61 5f | 6e 6f 64 65 28 70 74 72 |print_a_|node(ptr|
|00001d70| 2d 3e 72 6e 6f 64 65 29 | 3b 0d 09 09 7d 0d 09 09 |->rnode)|;...}...|
|00001d80| 72 65 74 75 72 6e 3b 0d | 0d 09 63 61 73 65 20 4e |return;.|..case N|
|00001d90| 6f 64 65 5f 76 61 72 3a | 0d 09 09 66 6f 72 20 28 |ode_var:|...for (|
|00001da0| 6e 20 3d 20 30 3b 20 6e | 20 3c 20 48 41 53 48 53 |n = 0; n| < HASHS|
|00001db0| 49 5a 45 3b 20 6e 2b 2b | 29 20 7b 0d 09 09 09 66 |IZE; n++|) {....f|
|00001dc0| 6f 72 20 28 62 75 63 20 | 3d 20 76 61 72 69 61 62 |or (buc |= variab|
|00001dd0| 6c 65 73 5b 6e 5d 3b 20 | 62 75 63 3b 20 62 75 63 |les[n]; |buc; buc|
|00001de0| 20 3d 20 62 75 63 2d 3e | 68 6e 65 78 74 29 20 7b | = buc->|hnext) {|
|00001df0| 0d 09 09 09 09 69 66 20 | 28 62 75 63 2d 3e 68 76 |.....if |(buc->hv|
|00001e00| 61 6c 75 65 20 3d 3d 20 | 70 74 72 29 20 7b 0d 09 |alue == |ptr) {..|
|00001e10| 09 09 09 09 70 72 69 6e | 74 66 28 22 25 2e 2a 73 |....prin|tf("%.*s|
|00001e20| 22 2c 20 62 75 63 2d 3e | 68 6c 65 6e 67 74 68 2c |", buc->|hlength,|
|00001e30| 20 62 75 63 2d 3e 68 6e | 61 6d 65 29 3b 0d 09 09 | buc->hn|ame);...|
|00001e40| 09 09 09 6e 20 3d 20 48 | 41 53 48 53 49 5a 45 3b |...n = H|ASHSIZE;|
|00001e50| 0d 09 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |......br|eak;....|
|00001e60| 09 7d 0d 09 09 09 7d 0d | 09 09 7d 0d 09 09 72 65 |.}....}.|..}...re|
|00001e70| 74 75 72 6e 3b 0d 09 63 | 61 73 65 20 4e 6f 64 65 |turn;..c|ase Node|
|00001e80| 5f 73 75 62 73 63 72 69 | 70 74 3a 0d 09 09 70 72 |_subscri|pt:...pr|
|00001e90| 69 6e 74 5f 61 5f 6e 6f | 64 65 28 70 74 72 2d 3e |int_a_no|de(ptr->|
|00001ea0| 6c 6e 6f 64 65 29 3b 0d | 09 09 70 72 69 6e 74 66 |lnode);.|..printf|
|00001eb0| 28 22 5b 22 29 3b 0d 09 | 09 70 72 69 6e 74 5f 61 |("[");..|.print_a|
|00001ec0| 5f 6e 6f 64 65 28 70 74 | 72 2d 3e 72 6e 6f 64 65 |_node(pt|r->rnode|
|00001ed0| 29 3b 0d 09 09 70 72 69 | 6e 74 66 28 22 5d 22 29 |);...pri|ntf("]")|
|00001ee0| 3b 0d 09 09 72 65 74 75 | 72 6e 3b 0d 09 63 61 73 |;...retu|rn;..cas|
|00001ef0| 65 20 4e 6f 64 65 5f 62 | 75 69 6c 74 69 6e 3a 0d |e Node_b|uiltin:.|
|00001f00| 09 09 70 72 69 6e 74 66 | 28 22 73 6f 6d 65 5f 62 |..printf|("some_b|
|00001f10| 75 69 6c 74 69 6e 28 22 | 29 3b 0d 09 09 70 72 69 |uiltin("|);...pri|
|00001f20| 6e 74 5f 61 5f 6e 6f 64 | 65 28 70 74 72 2d 3e 73 |nt_a_nod|e(ptr->s|
|00001f30| 75 62 6e 6f 64 65 29 3b | 0d 09 09 70 72 69 6e 74 |ubnode);|...print|
|00001f40| 66 28 22 29 22 29 3b 0d | 09 09 72 65 74 75 72 6e |f(")");.|..return|
|00001f50| 3b 0d 0d 09 63 61 73 65 | 20 4e 6f 64 65 5f 73 74 |;...case| Node_st|
|00001f60| 61 74 65 6d 65 6e 74 5f | 6c 69 73 74 3a 0d 09 09 |atement_|list:...|
|00001f70| 70 72 69 6e 74 66 28 22 | 7b 5c 6e 22 29 3b 0d 09 |printf("|{\n");..|
|00001f80| 09 69 6e 64 65 6e 74 2b | 2b 3b 0d 09 09 66 6f 72 |.indent+|+;...for|
|00001f90| 20 28 6e 20 3d 20 69 6e | 64 65 6e 74 3b 20 6e 3b | (n = in|dent; n;|
|00001fa0| 20 2d 2d 6e 29 0d 09 09 | 09 70 72 69 6e 74 66 28 | --n)...|.printf(|
|00001fb0| 22 20 20 22 29 3b 0d 09 | 09 77 68 69 6c 65 20 28 |"  ");..|.while (|
|00001fc0| 70 74 72 29 20 7b 0d 09 | 09 09 70 72 69 6e 74 5f |ptr) {..|..print_|
|00001fd0| 6d 61 79 62 65 5f 73 65 | 6d 69 28 70 74 72 2d 3e |maybe_se|mi(ptr->|
|00001fe0| 6c 6e 6f 64 65 29 3b 0d | 09 09 09 69 66 20 28 70 |lnode);.|...if (p|
|00001ff0| 74 72 2d 3e 72 6e 6f 64 | 65 29 0d 09 09 09 09 66 |tr->rnod|e).....f|
|00002000| 6f 72 20 28 6e 20 3d 20 | 69 6e 64 65 6e 74 3b 20 |or (n = |indent; |
|00002010| 6e 3b 20 2d 2d 6e 29 0d | 09 09 09 09 09 70 72 69 |n; --n).|.....pri|
|00002020| 6e 74 66 28 22 20 20 22 | 29 3b 0d 09 09 09 70 74 |ntf("  "|);....pt|
|00002030| 72 20 3d 20 70 74 72 2d | 3e 72 6e 6f 64 65 3b 0d |r = ptr-|>rnode;.|
|00002040| 09 09 7d 0d 09 09 2d 2d | 69 6e 64 65 6e 74 3b 0d |..}...--|indent;.|
|00002050| 09 09 66 6f 72 20 28 6e | 20 3d 20 69 6e 64 65 6e |..for (n| = inden|
|00002060| 74 3b 20 6e 3b 20 2d 2d | 6e 29 0d 09 09 09 70 72 |t; n; --|n)....pr|
|00002070| 69 6e 74 66 28 22 20 20 | 22 29 3b 0d 09 09 70 72 |intf("  |");...pr|
|00002080| 69 6e 74 66 28 22 7d 5c | 6e 22 29 3b 0d 09 09 66 |intf("}\|n");...f|
|00002090| 6f 72 20 28 6e 20 3d 20 | 69 6e 64 65 6e 74 3b 20 |or (n = |indent; |
|000020a0| 6e 3b 20 2d 2d 6e 29 0d | 09 09 09 70 72 69 6e 74 |n; --n).|...print|
|000020b0| 66 28 22 20 20 22 29 3b | 0d 09 09 72 65 74 75 72 |f("  ");|...retur|
|000020c0| 6e 3b 0d 0d 09 63 61 73 | 65 20 4e 6f 64 65 5f 4b |n;...cas|e Node_K|
|000020d0| 5f 69 66 3a 0d 09 09 70 | 72 69 6e 74 66 28 22 69 |_if:...p|rintf("i|
|000020e0| 66 28 22 29 3b 0d 09 09 | 70 72 69 6e 74 5f 61 5f |f(");...|print_a_|
|000020f0| 6e 6f 64 65 28 70 74 72 | 2d 3e 6c 6e 6f 64 65 29 |node(ptr|->lnode)|
|00002100| 3b 0d 09 09 70 72 69 6e | 74 66 28 22 29 20 22 29 |;...prin|tf(") ")|
|00002110| 3b 0d 09 09 70 74 72 20 | 3d 20 70 74 72 2d 3e 72 |;...ptr |= ptr->r|
|00002120| 6e 6f 64 65 3b 0d 09 09 | 69 66 20 28 70 74 72 2d |node;...|if (ptr-|
|00002130| 3e 6c 6e 6f 64 65 2d 3e | 74 79 70 65 20 3d 3d 20 |>lnode->|type == |
|00002140| 4e 6f 64 65 5f 73 74 61 | 74 65 6d 65 6e 74 5f 6c |Node_sta|tement_l|
|00002150| 69 73 74 29 20 7b 0d 09 | 09 09 70 72 69 6e 74 66 |ist) {..|..printf|
|00002160| 28 22 7b 5c 6e 22 29 3b | 0d 09 09 09 69 6e 64 65 |("{\n");|....inde|
|00002170| 6e 74 2b 2b 3b 0d 09 09 | 09 66 6f 72 20 28 70 31 |nt++;...|.for (p1|
|00002180| 20 3d 20 70 74 72 2d 3e | 6c 6e 6f 64 65 3b 20 70 | = ptr->|lnode; p|
|00002190| 31 3b 20 70 31 20 3d 20 | 70 31 2d 3e 72 6e 6f 64 |1; p1 = |p1->rnod|
|000021a0| 65 29 20 7b 0d 09 09 09 | 09 66 6f 72 20 28 6e 20 |e) {....|.for (n |
|000021b0| 3d 20 69 6e 64 65 6e 74 | 3b 20 6e 3b 20 2d 2d 6e |= indent|; n; --n|
|000021c0| 29 0d 09 09 09 09 09 70 | 72 69 6e 74 66 28 22 20 |)......p|rintf(" |
|000021d0| 20 22 29 3b 0d 09 09 09 | 09 70 72 69 6e 74 5f 6d | ");....|.print_m|
|000021e0| 61 79 62 65 5f 73 65 6d | 69 28 70 31 2d 3e 6c 6e |aybe_sem|i(p1->ln|
|000021f0| 6f 64 65 29 3b 0d 09 09 | 09 7d 0d 09 09 09 2d 2d |ode);...|.}....--|
|00002200| 69 6e 64 65 6e 74 3b 0d | 09 09 09 66 6f 72 20 28 |indent;.|...for (|
|00002210| 6e 20 3d 20 69 6e 64 65 | 6e 74 3b 20 6e 3b 20 2d |n = inde|nt; n; -|
|00002220| 2d 6e 29 0d 09 09 09 09 | 70 72 69 6e 74 66 28 22 |-n).....|printf("|
|00002230| 20 20 22 29 3b 0d 09 09 | 09 69 66 20 28 70 74 72 |  ");...|.if (ptr|
|00002240| 2d 3e 72 6e 6f 64 65 29 | 20 7b 0d 09 09 09 09 70 |->rnode)| {.....p|
|00002250| 72 69 6e 74 66 28 22 7d | 20 65 6c 73 65 20 22 29 |rintf("}| else ")|
|00002260| 3b 0d 09 09 09 7d 20 65 | 6c 73 65 20 7b 0d 09 09 |;....} e|lse {...|
|00002270| 09 09 70 72 69 6e 74 66 | 28 22 7d 5c 6e 22 29 3b |..printf|("}\n");|
|00002280| 0d 09 09 09 09 72 65 74 | 75 72 6e 3b 0d 09 09 09 |.....ret|urn;....|
|00002290| 7d 0d 09 09 7d 20 65 6c | 73 65 20 7b 0d 09 09 09 |}...} el|se {....|
|000022a0| 70 72 69 6e 74 5f 6d 61 | 79 62 65 5f 73 65 6d 69 |print_ma|ybe_semi|
|000022b0| 28 70 74 72 2d 3e 6c 6e | 6f 64 65 29 3b 0d 09 09 |(ptr->ln|ode);...|
|000022c0| 09 69 66 20 28 70 74 72 | 2d 3e 72 6e 6f 64 65 29 |.if (ptr|->rnode)|
|000022d0| 20 7b 0d 09 09 09 09 66 | 6f 72 20 28 6e 20 3d 20 | {.....f|or (n = |
|000022e0| 69 6e 64 65 6e 74 3b 20 | 6e 3b 20 2d 2d 6e 29 0d |indent; |n; --n).|
|000022f0| 09 09 09 09 09 70 72 69 | 6e 74 66 28 22 20 20 22 |.....pri|ntf("  "|
|00002300| 29 3b 0d 09 09 09 09 70 | 72 69 6e 74 66 28 22 65 |);.....p|rintf("e|
|00002310| 6c 73 65 20 22 29 3b 0d | 09 09 09 7d 20 65 6c 73 |lse ");.|...} els|
|00002320| 65 0d 09 09 09 09 72 65 | 74 75 72 6e 3b 0d 09 09 |e.....re|turn;...|
|00002330| 7d 0d 09 09 69 66 20 28 | 21 70 74 72 2d 3e 72 6e |}...if (|!ptr->rn|
|00002340| 6f 64 65 29 0d 09 09 09 | 72 65 74 75 72 6e 3b 0d |ode)....|return;.|
|00002350| 09 09 64 65 61 6c 5f 77 | 69 74 68 5f 63 75 72 6c |..deal_w|ith_curl|
|00002360| 73 28 70 74 72 2d 3e 72 | 6e 6f 64 65 29 3b 0d 09 |s(ptr->r|node);..|
|00002370| 09 72 65 74 75 72 6e 3b | 0d 0d 09 63 61 73 65 20 |.return;|...case |
|00002380| 4e 6f 64 65 5f 4b 5f 77 | 68 69 6c 65 3a 0d 09 09 |Node_K_w|hile:...|
|00002390| 70 72 69 6e 74 66 28 22 | 77 68 69 6c 65 28 22 29 |printf("|while(")|
|000023a0| 3b 0d 09 09 70 72 69 6e | 74 5f 61 5f 6e 6f 64 65 |;...prin|t_a_node|
|000023b0| 28 70 74 72 2d 3e 6c 6e | 6f 64 65 29 3b 0d 09 09 |(ptr->ln|ode);...|
|000023c0| 70 72 69 6e 74 66 28 22 | 29 20 22 29 3b 0d 09 09 |printf("|) ");...|
|000023d0| 64 65 61 6c 5f 77 69 74 | 68 5f 63 75 72 6c 73 28 |deal_wit|h_curls(|
|000023e0| 70 74 72 2d 3e 72 6e 6f | 64 65 29 3b 0d 09 09 72 |ptr->rno|de);...r|
|000023f0| 65 74 75 72 6e 3b 0d 0d | 09 63 61 73 65 20 4e 6f |eturn;..|.case No|
|00002400| 64 65 5f 4b 5f 64 6f 3a | 0d 09 09 70 72 69 6e 74 |de_K_do:|...print|
|00002410| 66 28 22 64 6f 20 22 29 | 3b 0d 09 09 64 65 61 6c |f("do ")|;...deal|
|00002420| 5f 77 69 74 68 5f 63 75 | 72 6c 73 28 70 74 72 2d |_with_cu|rls(ptr-|
|00002430| 3e 72 6e 6f 64 65 29 3b | 0d 09 09 70 72 69 6e 74 |>rnode);|...print|
|00002440| 66 28 22 77 68 69 6c 65 | 28 22 29 3b 0d 09 09 70 |f("while|(");...p|
|00002450| 72 69 6e 74 5f 61 5f 6e | 6f 64 65 28 70 74 72 2d |rint_a_n|ode(ptr-|
|00002460| 3e 6c 6e 6f 64 65 29 3b | 0d 09 09 70 72 69 6e 74 |>lnode);|...print|
|00002470| 66 28 22 29 20 22 29 3b | 0d 09 09 72 65 74 75 72 |f(") ");|...retur|
|00002480| 6e 3b 0d 0d 09 63 61 73 | 65 20 4e 6f 64 65 5f 4b |n;...cas|e Node_K|
|00002490| 5f 66 6f 72 3a 0d 09 09 | 70 72 69 6e 74 66 28 22 |_for:...|printf("|
|000024a0| 66 6f 72 28 22 29 3b 0d | 09 09 70 72 69 6e 74 5f |for(");.|..print_|
|000024b0| 61 5f 6e 6f 64 65 28 70 | 74 72 2d 3e 66 6f 72 6c |a_node(p|tr->forl|
|000024c0| 6f 6f 70 2d 3e 69 6e 69 | 74 29 3b 0d 09 09 70 72 |oop->ini|t);...pr|
|000024d0| 69 6e 74 66 28 22 3b 22 | 29 3b 0d 09 09 70 72 69 |intf(";"|);...pri|
|000024e0| 6e 74 5f 61 5f 6e 6f 64 | 65 28 70 74 72 2d 3e 66 |nt_a_nod|e(ptr->f|
|000024f0| 6f 72 6c 6f 6f 70 2d 3e | 63 6f 6e 64 29 3b 0d 09 |orloop->|cond);..|
|00002500| 09 70 72 69 6e 74 66 28 | 22 3b 22 29 3b 0d 09 09 |.printf(|";");...|
|00002510| 70 72 69 6e 74 5f 61 5f | 6e 6f 64 65 28 70 74 72 |print_a_|node(ptr|
|00002520| 2d 3e 66 6f 72 6c 6f 6f | 70 2d 3e 69 6e 63 72 29 |->forloo|p->incr)|
|00002530| 3b 0d 09 09 70 72 69 6e | 74 66 28 22 29 20 22 29 |;...prin|tf(") ")|
|00002540| 3b 0d 09 09 64 65 61 6c | 5f 77 69 74 68 5f 63 75 |;...deal|_with_cu|
|00002550| 72 6c 73 28 70 74 72 2d | 3e 66 6f 72 73 75 62 29 |rls(ptr-|>forsub)|
|00002560| 3b 0d 09 09 72 65 74 75 | 72 6e 3b 0d 09 63 61 73 |;...retu|rn;..cas|
|00002570| 65 20 4e 6f 64 65 5f 4b | 5f 61 72 72 61 79 66 6f |e Node_K|_arrayfo|
|00002580| 72 3a 0d 09 09 70 72 69 | 6e 74 66 28 22 66 6f 72 |r:...pri|ntf("for|
|00002590| 28 22 29 3b 0d 09 09 70 | 72 69 6e 74 5f 61 5f 6e |(");...p|rint_a_n|
|000025a0| 6f 64 65 28 70 74 72 2d | 3e 66 6f 72 6c 6f 6f 70 |ode(ptr-|>forloop|
|000025b0| 2d 3e 69 6e 69 74 29 3b | 0d 09 09 70 72 69 6e 74 |->init);|...print|
|000025c0| 66 28 22 20 69 6e 20 22 | 29 3b 0d 09 09 70 72 69 |f(" in "|);...pri|
|000025d0| 6e 74 5f 61 5f 6e 6f 64 | 65 28 70 74 72 2d 3e 66 |nt_a_nod|e(ptr->f|
|000025e0| 6f 72 6c 6f 6f 70 2d 3e | 69 6e 63 72 29 3b 0d 09 |orloop->|incr);..|
|000025f0| 09 70 72 69 6e 74 66 28 | 22 29 20 22 29 3b 0d 09 |.printf(|") ");..|
|00002600| 09 64 65 61 6c 5f 77 69 | 74 68 5f 63 75 72 6c 73 |.deal_wi|th_curls|
|00002610| 28 70 74 72 2d 3e 66 6f | 72 73 75 62 29 3b 0d 09 |(ptr->fo|rsub);..|
|00002620| 09 72 65 74 75 72 6e 3b | 0d 0d 09 63 61 73 65 20 |.return;|...case |
|00002630| 4e 6f 64 65 5f 4b 5f 70 | 72 69 6e 74 66 3a 0d 09 |Node_K_p|rintf:..|
|00002640| 09 70 72 69 6e 74 66 28 | 22 70 72 69 6e 74 66 28 |.printf(|"printf(|
|00002650| 22 29 3b 0d 09 09 70 72 | 69 6e 74 5f 61 5f 6e 6f |");...pr|int_a_no|
|00002660| 64 65 28 70 74 72 2d 3e | 6c 6e 6f 64 65 29 3b 0d |de(ptr->|lnode);.|
|00002670| 09 09 70 72 69 6e 74 66 | 28 22 29 22 29 3b 0d 09 |..printf|(")");..|
|00002680| 09 72 65 74 75 72 6e 3b | 0d 09 63 61 73 65 20 4e |.return;|..case N|
|00002690| 6f 64 65 5f 4b 5f 70 72 | 69 6e 74 3a 0d 09 09 70 |ode_K_pr|int:...p|
|000026a0| 72 69 6e 74 66 28 22 70 | 72 69 6e 74 28 22 29 3b |rintf("p|rint(");|
|000026b0| 0d 09 09 70 72 69 6e 74 | 5f 61 5f 6e 6f 64 65 28 |...print|_a_node(|
|000026c0| 70 74 72 2d 3e 6c 6e 6f | 64 65 29 3b 0d 09 09 70 |ptr->lno|de);...p|
|000026d0| 72 69 6e 74 66 28 22 29 | 22 29 3b 0d 09 09 72 65 |rintf(")|");...re|
|000026e0| 74 75 72 6e 3b 0d 09 63 | 61 73 65 20 4e 6f 64 65 |turn;..c|ase Node|
|000026f0| 5f 4b 5f 6e 65 78 74 3a | 0d 09 09 70 72 69 6e 74 |_K_next:|...print|
|00002700| 66 28 22 6e 65 78 74 22 | 29 3b 0d 09 09 72 65 74 |f("next"|);...ret|
|00002710| 75 72 6e 3b 0d 09 63 61 | 73 65 20 4e 6f 64 65 5f |urn;..ca|se Node_|
|00002720| 4b 5f 62 72 65 61 6b 3a | 0d 09 09 70 72 69 6e 74 |K_break:|...print|
|00002730| 66 28 22 62 72 65 61 6b | 22 29 3b 0d 09 09 72 65 |f("break|");...re|
|00002740| 74 75 72 6e 3b 0d 09 63 | 61 73 65 20 4e 6f 64 65 |turn;..c|ase Node|
|00002750| 5f 4b 5f 64 65 6c 65 74 | 65 3a 0d 09 09 70 72 69 |_K_delet|e:...pri|
|00002760| 6e 74 66 28 22 64 65 6c | 65 74 65 20 22 29 3b 0d |ntf("del|ete ");.|
|00002770| 09 09 70 72 69 6e 74 5f | 61 5f 6e 6f 64 65 28 70 |..print_|a_node(p|
|00002780| 74 72 2d 3e 6c 6e 6f 64 | 65 29 3b 0d 09 09 72 65 |tr->lnod|e);...re|
|00002790| 74 75 72 6e 3b 0d 09 63 | 61 73 65 20 4e 6f 64 65 |turn;..c|ase Node|
|000027a0| 5f 66 75 6e 63 3a 0d 09 | 09 70 72 69 6e 74 66 28 |_func:..|.printf(|
|000027b0| 22 66 75 6e 63 74 69 6f | 6e 20 25 73 20 28 22 2c |"functio|n %s (",|
|000027c0| 20 70 74 72 2d 3e 6c 6e | 6f 64 65 2d 3e 70 61 72 | ptr->ln|ode->par|
|000027d0| 61 6d 29 3b 0d 09 09 69 | 66 20 28 70 74 72 2d 3e |am);...i|f (ptr->|
|000027e0| 6c 6e 6f 64 65 2d 3e 72 | 6e 6f 64 65 29 0d 09 09 |lnode->r|node)...|
|000027f0| 09 70 72 69 6e 74 5f 61 | 5f 6e 6f 64 65 28 70 74 |.print_a|_node(pt|
|00002800| 72 2d 3e 6c 6e 6f 64 65 | 2d 3e 72 6e 6f 64 65 29 |r->lnode|->rnode)|
|00002810| 3b 0d 09 09 70 72 69 6e | 74 66 28 22 29 5c 6e 22 |;...prin|tf(")\n"|
|00002820| 29 3b 0d 09 09 70 72 69 | 6e 74 5f 61 5f 6e 6f 64 |);...pri|nt_a_nod|
|00002830| 65 28 70 74 72 2d 3e 72 | 6e 6f 64 65 29 3b 0d 09 |e(ptr->r|node);..|
|00002840| 09 72 65 74 75 72 6e 3b | 0d 09 63 61 73 65 20 4e |.return;|..case N|
|00002850| 6f 64 65 5f 70 61 72 61 | 6d 5f 6c 69 73 74 3a 0d |ode_para|m_list:.|
|00002860| 09 09 70 72 69 6e 74 66 | 28 22 25 73 22 2c 20 70 |..printf|("%s", p|
|00002870| 74 72 2d 3e 70 61 72 61 | 6d 29 3b 0d 09 09 69 66 |tr->para|m);...if|
|00002880| 20 28 70 74 72 2d 3e 72 | 6e 6f 64 65 29 20 7b 0d | (ptr->r|node) {.|
|00002890| 09 09 09 70 72 69 6e 74 | 66 28 22 2c 20 22 29 3b |...print|f(", ");|
|000028a0| 0d 09 09 09 70 72 69 6e | 74 5f 61 5f 6e 6f 64 65 |....prin|t_a_node|
|000028b0| 28 70 74 72 2d 3e 72 6e | 6f 64 65 29 3b 0d 09 09 |(ptr->rn|ode);...|
|000028c0| 7d 0d 09 09 72 65 74 75 | 72 6e 3b 0d 09 64 65 66 |}...retu|rn;..def|
|000028d0| 61 75 6c 74 3a 0d 09 09 | 70 72 69 6e 74 5f 70 61 |ault:...|print_pa|
|000028e0| 72 73 65 5f 74 72 65 65 | 28 70 74 72 29 3b 0d 09 |rse_tree|(ptr);..|
|000028f0| 09 72 65 74 75 72 6e 3b | 0d 09 7d 0d 7d 0d 0d 70 |.return;|..}.}..p|
|00002900| 72 69 6e 74 5f 6d 61 79 | 62 65 5f 73 65 6d 69 28 |rint_may|be_semi(|
|00002910| 70 74 72 29 0d 4e 4f 44 | 45 20 2a 70 74 72 3b 0d |ptr).NOD|E *ptr;.|
|00002920| 7b 0d 09 70 72 69 6e 74 | 5f 61 5f 6e 6f 64 65 28 |{..print|_a_node(|
|00002930| 70 74 72 29 3b 0d 09 73 | 77 69 74 63 68 20 28 70 |ptr);..s|witch (p|
|00002940| 74 72 2d 3e 74 79 70 65 | 29 20 7b 0d 09 63 61 73 |tr->type|) {..cas|
|00002950| 65 20 4e 6f 64 65 5f 4b | 5f 69 66 3a 0d 09 63 61 |e Node_K|_if:..ca|
|00002960| 73 65 20 4e 6f 64 65 5f | 4b 5f 66 6f 72 3a 0d 09 |se Node_|K_for:..|
|00002970| 63 61 73 65 20 4e 6f 64 | 65 5f 4b 5f 61 72 72 61 |case Nod|e_K_arra|
|00002980| 79 66 6f 72 3a 0d 09 63 | 61 73 65 20 4e 6f 64 65 |yfor:..c|ase Node|
|00002990| 5f 73 74 61 74 65 6d 65 | 6e 74 5f 6c 69 73 74 3a |_stateme|nt_list:|
|000029a0| 0d 09 09 62 72 65 61 6b | 3b 0d 09 64 65 66 61 75 |...break|;..defau|
|000029b0| 6c 74 3a 0d 09 09 70 72 | 69 6e 74 66 28 22 3b 5c |lt:...pr|intf(";\|
|000029c0| 6e 22 29 3b 0d 09 09 62 | 72 65 61 6b 3b 0d 09 7d |n");...b|reak;..}|
|000029d0| 0d 7d 0d 0d 64 65 61 6c | 5f 77 69 74 68 5f 63 75 |.}..deal|_with_cu|
|000029e0| 72 6c 73 28 70 74 72 29 | 0d 4e 4f 44 45 20 2a 70 |rls(ptr)|.NODE *p|
|000029f0| 74 72 3b 0d 7b 0d 09 73 | 68 6f 72 74 20 6e 3b 0d |tr;.{..s|hort n;.|
|00002a00| 0d 09 69 66 20 28 70 74 | 72 2d 3e 74 79 70 65 20 |..if (pt|r->type |
|00002a10| 3d 3d 20 4e 6f 64 65 5f | 73 74 61 74 65 6d 65 6e |== Node_|statemen|
|00002a20| 74 5f 6c 69 73 74 29 20 | 7b 0d 09 09 70 72 69 6e |t_list) |{...prin|
|00002a30| 74 66 28 22 7b 5c 6e 22 | 29 3b 0d 09 09 69 6e 64 |tf("{\n"|);...ind|
|00002a40| 65 6e 74 2b 2b 3b 0d 09 | 09 77 68 69 6c 65 20 28 |ent++;..|.while (|
|00002a50| 70 74 72 29 20 7b 0d 09 | 09 09 66 6f 72 20 28 6e |ptr) {..|..for (n|
|00002a60| 20 3d 20 69 6e 64 65 6e | 74 3b 20 6e 3b 20 2d 2d | = inden|t; n; --|
|00002a70| 6e 29 0d 09 09 09 09 70 | 72 69 6e 74 66 28 22 20 |n).....p|rintf(" |
|00002a80| 20 22 29 3b 0d 09 09 09 | 70 72 69 6e 74 5f 6d 61 | ");....|print_ma|
|00002a90| 79 62 65 5f 73 65 6d 69 | 28 70 74 72 2d 3e 6c 6e |ybe_semi|(ptr->ln|
|00002aa0| 6f 64 65 29 3b 0d 09 09 | 09 70 74 72 20 3d 20 70 |ode);...|.ptr = p|
|00002ab0| 74 72 2d 3e 72 6e 6f 64 | 65 3b 0d 09 09 7d 0d 09 |tr->rnod|e;...}..|
|00002ac0| 09 2d 2d 69 6e 64 65 6e | 74 3b 0d 09 09 66 6f 72 |.--inden|t;...for|
|00002ad0| 20 28 6e 20 3d 20 69 6e | 64 65 6e 74 3b 20 6e 3b | (n = in|dent; n;|
|00002ae0| 20 2d 2d 6e 29 0d 09 09 | 09 70 72 69 6e 74 66 28 | --n)...|.printf(|
|00002af0| 22 20 20 22 29 3b 0d 09 | 09 70 72 69 6e 74 66 28 |"  ");..|.printf(|
|00002b00| 22 7d 5c 6e 22 29 3b 0d | 09 7d 20 65 6c 73 65 20 |"}\n");.|.} else |
|00002b10| 7b 0d 09 09 70 72 69 6e | 74 5f 6d 61 79 62 65 5f |{...prin|t_maybe_|
|00002b20| 73 65 6d 69 28 70 74 72 | 29 3b 0d 09 7d 0d 7d 0d |semi(ptr|);..}.}.|
|00002b30| 0d 4e 4f 44 45 20 2a 0d | 64 6f 5f 70 72 76 61 72 |.NODE *.|do_prvar|
|00002b40| 73 28 29 0d 7b 0d 09 64 | 75 6d 70 5f 76 61 72 73 |s().{..d|ump_vars|
|00002b50| 28 29 3b 0d 09 72 65 74 | 75 72 6e 20 4e 6e 75 6c |();..ret|urn Nnul|
|00002b60| 6c 5f 73 74 72 69 6e 67 | 3b 0d 7d 0d 0d 4e 4f 44 |l_string|;.}..NOD|
|00002b70| 45 20 2a 0d 64 6f 5f 62 | 70 28 29 0d 7b 0d 09 72 |E *.do_b|p().{..r|
|00002b80| 65 74 75 72 6e 20 4e 6e | 75 6c 6c 5f 73 74 72 69 |eturn Nn|ull_stri|
|00002b90| 6e 67 3b 0d 7d 0d 0d 23 | 65 6e 64 69 66 0d 0d 23 |ng;.}..#|endif..#|
|00002ba0| 69 66 64 65 66 20 4d 45 | 4d 44 45 42 55 47 0d 0d |ifdef ME|MDEBUG..|
|00002bb0| 23 75 6e 64 65 66 20 66 | 72 65 65 0d 65 78 74 65 |#undef f|ree.exte|
|00002bc0| 72 6e 20 76 6f 69 64 20 | 66 72 65 65 28 29 3b 0d |rn void |free();.|
|00002bd0| 0d 76 6f 69 64 0d 64 6f | 5f 66 72 65 65 28 73 29 |.void.do|_free(s)|
|00002be0| 0d 63 68 61 72 20 2a 73 | 3b 0d 7b 0d 09 66 72 65 |.char *s|;.{..fre|
|00002bf0| 65 28 73 29 3b 0d 7d 0d | 0d 23 65 6e 64 69 66 0d |e(s);.}.|.#endif.|
|00002c00| 00 00 01 00 00 00 02 1c | 00 00 01 1c 00 00 00 96 |........|........|
|00002c10| 6e 74 66 28 22 7b 5c 6e | 22 29 3b 0d 09 09 69 6e |ntf("{\n|");...in|
|00002c20| 64 65 6e 74 2b 2b 3b 0d | 09 09 77 68 69 6c 65 20 |dent++;.|..while |
|00002c30| 07 44 45 42 55 47 2e 43 | 02 00 00 00 54 45 58 54 |.DEBUG.C|....TEXT|
|00002c40| 54 4f 50 43 01 00 00 98 | 00 db 00 00 00 00 2e b7 |TOPC....|........|
|00002c50| 00 00 54 45 58 54 54 4f | 50 43 01 00 00 98 00 db |..TEXTTO|PC......|
|00002c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c70| 00 00 a4 3c af 74 00 00 | 2b 80 00 00 02 b2 3e 6c |...<.t..|+.....>l|
|00002c80| 6e 6f 64 65 29 3b 0d 09 | 09 09 70 74 72 20 3d 20 |node);..|..ptr = |
|00002c90| 70 74 72 2d 3e 72 6e 6f | 64 65 3b 0d 09 09 7d 0d |ptr->rno|de;...}.|
|00002ca0| 09 09 2d 2d 69 6e 64 65 | 6e 74 3b 0d 09 09 66 6f |..--inde|nt;...fo|
|00002cb0| 72 20 28 6e 20 3d 20 69 | 6e 64 65 6e 74 3b 20 6e |r (n = i|ndent; n|
|00002cc0| 3b 20 2d 2d 6e 29 0d 09 | 09 09 70 72 69 6e 74 66 |; --n)..|..printf|
|00002cd0| 28 22 20 20 22 29 3b 0d | 09 09 70 72 69 6e 74 66 |("  ");.|..printf|
|00002ce0| 28 22 7d 5c 6e 22 29 3b | 0d 09 7d 20 65 6c 73 65 |("}\n");|..} else|
|00002cf0| 20 7b 0d 09 09 70 72 69 | 6e 74 5f 6d 61 79 62 65 | {...pri|nt_maybe|
|00002d00| 00 00 00 02 00 00 00 00 | 00 04 00 03 00 10 00 00 |........|........|
|00002d10| 00 e8 00 0c 00 00 29 54 | 00 00 29 63 0f 64 65 61 |......)T|..)c.dea|
|00002d20| 6c 5f 77 69 74 68 5f 63 | 75 72 6c 73 00 00 2a f4 |l_with_c|urls..*.|
|00002d30| 00 00 2a f9 05 64 6f 5f | 62 70 00 00 2b 56 00 00 |..*..do_|bp..+V..|
|00002d40| 2b 5d 07 64 6f 5f 66 72 | 65 65 00 00 2a b8 00 00 |+].do_fr|ee..*...|
|00002d50| 2a c1 09 64 6f 5f 70 72 | 76 61 72 73 00 00 13 50 |*..do_pr|vars...P|
|00002d60| 00 00 13 5b 0b 64 75 6d | 70 5f 66 69 65 6c 64 73 |...[.dum|p_fields|
|00002d70| 00 00 11 f9 00 00 12 02 | 09 64 75 6d 70 5f 76 61 |........|.dump_va|
|00002d80| 72 73 00 00 14 c9 00 00 | 14 d5 0d 70 72 69 6e 74 |rs......|...print|
|00002d90| 5f 61 5f 6e 6f 64 65 00 | 00 00 14 49 00 00 14 54 |_a_node.|...I...T|
|00002da0| 0b 70 72 69 6e 74 5f 64 | 65 62 75 67 00 00 28 7f |.print_d|ebug..(.|
|00002db0| 00 00 28 8f 11 70 72 69 | 6e 74 5f 6d 61 79 62 65 |..(..pri|nt_maybe|
|00002dc0| 5f 73 65 6d 69 00 00 00 | 0a 69 00 00 0a 79 11 70 |_semi...|.i...y.p|
|00002dd0| 72 69 6e 74 5f 70 61 72 | 73 65 5f 74 72 65 65 00 |rint_par|se_tree.|
|00002de0| 00 00 09 e3 00 00 09 e5 | 03 70 74 00 00 00 09 b6 |........|.pt.....|
|00002df0| 00 00 09 bb 05 70 74 72 | 65 65 00 00 00 0a 00 09 |.....ptr|ee......|
|00002e00| 06 47 65 6e 65 76 61 00 | 00 00 00 04 ab 1f a1 c2 |.Geneva.|........|
|00002e10| 00 00 00 08 00 32 00 04 | 01 2c 01 e0 00 00 01 00 |.....2..|.,......|
|00002e20| 00 00 02 1c 00 00 01 1c | 00 00 00 96 00 ad c5 d4 |........|........|
|00002e30| 13 1a 00 00 00 1c 00 96 | 00 05 45 51 45 44 00 00 |........|..EQED..|
|00002e40| 00 32 45 54 41 42 00 00 | 00 3e 4d 50 53 52 00 00 |.2ETAB..|.>MPSR..|
|00002e50| 00 4a 45 46 4e 54 00 00 | 00 56 4a 41 47 5a 00 00 |.JEFNT..|.VJAGZ..|
|00002e60| 00 62 57 53 49 5a 00 00 | 00 6e 03 eb ff ff 00 00 |.bWSIZ..|.n......|
|00002e70| 00 00 00 00 00 00 03 ec | ff ff 00 00 00 06 00 ad |........|........|
|00002e80| c3 5c 03 ef ff ff 00 00 | 00 0e 00 ad c3 48 03 eb |.\......|.....H..|
|00002e90| ff ff 00 00 00 fa 00 ad | c3 58 03 ed ff ff 00 00 |........|.X......|
|00002ea0| 01 08 00 ad c3 38 03 ee | ff ff 00 00 01 10 00 ad |.....8..|........|
|00002eb0| c3 40 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.@......|........|
|00002ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+