home *** CD-ROM | disk | FTP | other *** search
view JSON data
|
view as text
|
open on a Mac
|
open on a PC
This file was processed as: SHell self-extracting ARchive
(archive/shar).
You can browse this item here: part07
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| Newsgroup Content (archive/news)
| magic
| Supported |
| 100%
| dexvert
| SHell self-extracting ARchive (archive/shar)
| magic
| Supported |
| 100%
| dexvert
| Internet Message Format (text/imf)
| magic
| Supported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| news, ASCII text
| default
| |
| 100%
| checkBytes
| Printable ASCII
| default
| |
| 100%
| dexmagic
| PrintFox/Pagefox WEAK
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| siegfried
| fmt/329 Shell Archive Format
| default
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
| |
| 100%
| xdgMime
| message/news
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 50 61 74 68 3a 20 75 75 | 6e 65 74 21 72 73 0a 46 |Path: uu|net!rs.F|
|00000010| 72 6f 6d 3a 20 72 73 40 | 75 75 6e 65 74 2e 55 55 |rom: rs@|uunet.UU|
|00000020| 2e 4e 45 54 20 28 52 69 | 63 68 20 53 61 6c 7a 29 |.NET (Ri|ch Salz)|
|00000030| 0a 4e 65 77 73 67 72 6f | 75 70 73 3a 20 63 6f 6d |.Newsgro|ups: com|
|00000040| 70 2e 73 6f 75 72 63 65 | 73 2e 75 6e 69 78 0a 53 |p.source|s.unix.S|
|00000050| 75 62 6a 65 63 74 3a 20 | 76 31 30 69 30 37 31 3a |ubject: |v10i071:|
|00000060| 20 20 50 61 73 63 61 6c | 20 74 6f 20 43 20 74 72 | Pascal| to C tr|
|00000070| 61 6e 73 6c 61 74 6f 72 | 2c 20 50 61 72 74 30 37 |anslator|, Part07|
|00000080| 2f 31 32 0a 4d 65 73 73 | 61 67 65 2d 49 44 3a 20 |/12.Mess|age-ID: |
|00000090| 3c 37 32 32 40 75 75 6e | 65 74 2e 55 55 2e 4e 45 |<722@uun|et.UU.NE|
|000000a0| 54 3e 0a 44 61 74 65 3a | 20 32 38 20 4a 75 6c 20 |T>.Date:| 28 Jul |
|000000b0| 38 37 20 31 39 3a 33 35 | 3a 35 36 20 47 4d 54 0a |87 19:35|:56 GMT.|
|000000c0| 4f 72 67 61 6e 69 7a 61 | 74 69 6f 6e 3a 20 55 55 |Organiza|tion: UU|
|000000d0| 4e 45 54 20 43 6f 6d 6d | 75 6e 69 63 61 74 69 6f |NET Comm|unicatio|
|000000e0| 6e 73 20 53 65 72 76 69 | 63 65 73 2c 20 41 72 6c |ns Servi|ces, Arl|
|000000f0| 69 6e 67 74 6f 6e 2c 20 | 56 41 0a 4c 69 6e 65 73 |ington, |VA.Lines|
|00000100| 3a 20 31 35 34 36 0a 41 | 70 70 72 6f 76 65 64 3a |: 1546.A|pproved:|
|00000110| 20 72 73 40 75 75 6e 65 | 74 2e 55 55 2e 4e 45 54 | rs@uune|t.UU.NET|
|00000120| 0a 0a 53 75 62 6d 69 74 | 74 65 64 2d 62 79 3a 20 |..Submit|ted-by: |
|00000130| 50 65 72 20 42 65 72 67 | 73 74 65 6e 20 3c 6d 63 |Per Berg|sten <mc|
|00000140| 76 61 78 21 65 6e 65 61 | 21 63 68 61 6c 6d 65 72 |vax!enea|!chalmer|
|00000150| 73 21 68 6f 6c 74 65 63 | 21 70 65 72 62 3e 0a 50 |s!holtec|!perb>.P|
|00000160| 6f 73 74 69 6e 67 2d 6e | 75 6d 62 65 72 3a 20 56 |osting-n|umber: V|
|00000170| 6f 6c 75 6d 65 20 31 30 | 2c 20 49 73 73 75 65 20 |olume 10|, Issue |
|00000180| 37 31 0a 41 72 63 68 69 | 76 65 2d 6e 61 6d 65 3a |71.Archi|ve-name:|
|00000190| 20 70 74 6f 63 2f 50 61 | 72 74 30 37 0a 0a 23 21 | ptoc/Pa|rt07..#!|
|000001a0| 20 2f 62 69 6e 2f 73 68 | 0a 23 20 54 68 69 73 20 | /bin/sh|.# This |
|000001b0| 69 73 20 61 20 73 68 65 | 6c 6c 20 61 72 63 68 69 |is a she|ll archi|
|000001c0| 76 65 2e 20 20 52 65 6d | 6f 76 65 20 61 6e 79 74 |ve. Rem|ove anyt|
|000001d0| 68 69 6e 67 20 62 65 66 | 6f 72 65 20 74 68 69 73 |hing bef|ore this|
|000001e0| 20 6c 69 6e 65 2c 20 74 | 68 65 6e 20 75 6e 70 61 | line, t|hen unpa|
|000001f0| 63 6b 0a 23 20 69 74 20 | 62 79 20 73 61 76 69 6e |ck.# it |by savin|
|00000200| 67 20 69 74 20 69 6e 74 | 6f 20 61 20 66 69 6c 65 |g it int|o a file|
|00000210| 20 61 6e 64 20 74 79 70 | 69 6e 67 20 22 73 68 20 | and typ|ing "sh |
|00000220| 66 69 6c 65 22 2e 20 20 | 54 6f 20 6f 76 65 72 77 |file". |To overw|
|00000230| 72 69 74 65 20 65 78 69 | 73 74 69 6e 67 0a 23 20 |rite exi|sting.# |
|00000240| 66 69 6c 65 73 2c 20 74 | 79 70 65 20 22 73 68 20 |files, t|ype "sh |
|00000250| 66 69 6c 65 20 2d 63 22 | 2e 20 20 59 6f 75 20 63 |file -c"|. You c|
|00000260| 61 6e 20 61 6c 73 6f 20 | 66 65 65 64 20 74 68 69 |an also |feed thi|
|00000270| 73 20 61 73 20 73 74 61 | 6e 64 61 72 64 20 69 6e |s as sta|ndard in|
|00000280| 70 75 74 20 76 69 61 0a | 23 20 75 6e 73 68 61 72 |put via.|# unshar|
|00000290| 2c 20 6f 72 20 62 79 20 | 74 79 70 69 6e 67 20 22 |, or by |typing "|
|000002a0| 73 68 20 3c 66 69 6c 65 | 22 2c 20 65 2e 67 2e 2e |sh <file|", e.g..|
|000002b0| 20 20 49 66 20 74 68 69 | 73 20 61 72 63 68 69 76 | If thi|s archiv|
|000002c0| 65 20 69 73 20 63 6f 6d | 70 6c 65 74 65 2c 20 79 |e is com|plete, y|
|000002d0| 6f 75 0a 23 20 77 69 6c | 6c 20 73 65 65 20 74 68 |ou.# wil|l see th|
|000002e0| 65 20 66 6f 6c 6c 6f 77 | 69 6e 67 20 6d 65 73 73 |e follow|ing mess|
|000002f0| 61 67 65 20 61 74 20 74 | 68 65 20 65 6e 64 3a 0a |age at t|he end:.|
|00000300| 23 09 09 22 45 6e 64 20 | 6f 66 20 61 72 63 68 69 |#.."End |of archi|
|00000310| 76 65 20 37 20 28 6f 66 | 20 31 32 29 2e 22 0a 23 |ve 7 (of| 12).".#|
|00000320| 20 43 6f 6e 74 65 6e 74 | 73 3a 20 20 70 74 63 2e | Content|s: ptc.|
|00000330| 63 2e 35 0a 50 41 54 48 | 3d 2f 62 69 6e 3a 2f 75 |c.5.PATH|=/bin:/u|
|00000340| 73 72 2f 62 69 6e 3a 2f | 75 73 72 2f 75 63 62 20 |sr/bin:/|usr/ucb |
|00000350| 3b 20 65 78 70 6f 72 74 | 20 50 41 54 48 0a 69 66 |; export| PATH.if|
|00000360| 20 74 65 73 74 20 2d 66 | 20 27 70 74 63 2e 63 2e | test -f| 'ptc.c.|
|00000370| 35 27 20 2d 61 20 22 24 | 7b 31 7d 22 20 21 3d 20 |5' -a "$|{1}" != |
|00000380| 22 2d 63 22 20 3b 20 74 | 68 65 6e 20 0a 20 20 65 |"-c" ; t|hen . e|
|00000390| 63 68 6f 20 73 68 61 72 | 3a 20 57 69 6c 6c 20 6e |cho shar|: Will n|
|000003a0| 6f 74 20 63 6c 6f 62 62 | 65 72 20 65 78 69 73 74 |ot clobb|er exist|
|000003b0| 69 6e 67 20 66 69 6c 65 | 20 5c 22 27 70 74 63 2e |ing file| \"'ptc.|
|000003c0| 63 2e 35 27 5c 22 0a 65 | 6c 73 65 0a 65 63 68 6f |c.5'\".e|lse.echo|
|000003d0| 20 73 68 61 72 3a 20 45 | 78 74 72 61 63 74 69 6e | shar: E|xtractin|
|000003e0| 67 20 5c 22 27 70 74 63 | 2e 63 2e 35 27 5c 22 20 |g \"'ptc|.c.5'\" |
|000003f0| 5c 28 33 39 36 36 35 20 | 63 68 61 72 61 63 74 65 |\(39665 |characte|
|00000400| 72 73 5c 29 0a 73 65 64 | 20 22 73 2f 5e 58 2f 2f |rs\).sed| "s/^X//|
|00000410| 22 20 3e 27 70 74 63 2e | 63 2e 35 27 20 3c 3c 27 |" >'ptc.|c.5' <<'|
|00000420| 45 4e 44 5f 4f 46 5f 46 | 49 4c 45 27 0a 58 20 76 |END_OF_F|ILE'.X v|
|00000430| 6f 69 64 0a 58 65 65 78 | 70 72 28 74 70 29 0a 58 |oid.Xeex|pr(tp).X|
|00000440| 09 74 72 65 65 70 74 72 | 09 74 70 3b 0a 58 7b 0a |.treeptr|.tp;.X{.|
|00000450| 58 09 74 72 65 65 70 74 | 72 09 74 71 3b 0a 58 09 |X.treept|r.tq;.X.|
|00000460| 62 6f 6f 6c 65 61 6e 09 | 66 6c 61 67 3b 0a 58 0a |boolean.|flag;.X.|
|00000470| 58 09 28 2a 47 32 30 30 | 5f 64 6f 6e 65 61 72 72 |X.(*G200|_donearr|
|00000480| 29 20 3d 20 66 61 6c 73 | 65 3b 0a 58 09 69 66 20 |) = fals|e;.X.if |
|00000490| 28 4d 65 6d 62 65 72 28 | 28 75 6e 73 69 67 6e 65 |(Member(|(unsigne|
|000004a0| 64 29 28 74 70 2d 3e 74 | 74 29 2c 20 43 6f 6e 73 |d)(tp->t|t), Cons|
|000004b0| 65 74 5b 31 34 34 5d 29 | 29 20 7b 0a 58 09 09 74 |et[144])|) {.X..t|
|000004c0| 71 20 3d 20 74 79 70 65 | 6f 66 28 74 70 2d 3e 55 |q = type|of(tp->U|
|000004d0| 2e 56 34 31 2e 74 65 78 | 70 6c 29 3b 0a 58 09 09 |.V41.tex|pl);.X..|
|000004e0| 69 66 20 28 28 4d 65 6d | 62 65 72 28 28 75 6e 73 |if ((Mem|ber((uns|
|000004f0| 69 67 6e 65 64 29 28 74 | 71 2d 3e 74 74 29 2c 20 |igned)(t|q->tt), |
|00000500| 43 6f 6e 73 65 74 5b 31 | 34 35 5d 29 29 20 7c 7c |Conset[1|45])) |||
|00000510| 20 28 74 71 20 3d 3d 20 | 74 79 70 6e 6f 64 73 2e | (tq == |typnods.|
|00000520| 41 5b 28 69 6e 74 29 28 | 74 73 65 74 29 5d 29 29 |A[(int)(|tset)]))|
|00000530| 20 7b 0a 58 09 09 09 73 | 77 69 74 63 68 20 28 74 | {.X...s|witch (t|
|00000540| 70 2d 3e 74 74 29 20 7b | 0a 58 09 09 09 20 20 63 |p->tt) {|.X... c|
|00000550| 61 73 65 20 6e 70 6c 75 | 73 3a 0a 58 09 09 09 09 |ase nplu|s:.X....|
|00000560| 28 2a 47 31 39 36 5f 73 | 65 74 75 73 65 64 29 20 |(*G196_s|etused) |
|00000570| 3d 20 74 72 75 65 3b 0a | 58 09 09 09 09 75 73 65 |= true;.|X....use|
|00000580| 75 6e 69 6f 6e 20 3d 20 | 74 72 75 65 3b 0a 58 09 |union = |true;.X.|
|00000590| 09 09 09 28 76 6f 69 64 | 29 66 70 72 69 6e 74 66 |...(void|)fprintf|
|000005a0| 28 6f 75 74 70 75 74 2e | 66 70 2c 20 22 55 6e 69 |(output.|fp, "Uni|
|000005b0| 6f 6e 22 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |on"), Pu|tl(outpu|
|000005c0| 74 2c 20 30 29 3b 0a 58 | 09 09 09 09 62 72 65 61 |t, 0);.X|....brea|
|000005d0| 6b 20 3b 0a 58 09 09 09 | 20 20 63 61 73 65 20 6e |k ;.X...| case n|
|000005e0| 6d 69 6e 75 73 3a 0a 58 | 09 09 09 09 28 2a 47 31 |minus:.X|....(*G1|
|000005f0| 39 36 5f 73 65 74 75 73 | 65 64 29 20 3d 20 74 72 |96_setus|ed) = tr|
|00000600| 75 65 3b 0a 58 09 09 09 | 09 75 73 65 64 69 66 66 |ue;.X...|.usediff|
|00000610| 20 3d 20 74 72 75 65 3b | 0a 58 09 09 09 09 28 76 | = true;|.X....(v|
|00000620| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|00000630| 75 74 2e 66 70 2c 20 22 | 44 69 66 66 22 29 2c 20 |ut.fp, "|Diff"), |
|00000640| 50 75 74 6c 28 6f 75 74 | 70 75 74 2c 20 30 29 3b |Putl(out|put, 0);|
|00000650| 0a 58 09 09 09 09 62 72 | 65 61 6b 20 3b 0a 58 09 |.X....br|eak ;.X.|
|00000660| 09 09 20 20 63 61 73 65 | 20 6e 6d 75 6c 3a 0a 58 |.. case| nmul:.X|
|00000670| 09 09 09 09 28 2a 47 31 | 39 36 5f 73 65 74 75 73 |....(*G1|96_setus|
|00000680| 65 64 29 20 3d 20 74 72 | 75 65 3b 0a 58 09 09 09 |ed) = tr|ue;.X...|
|00000690| 09 75 73 65 69 6e 74 72 | 20 3d 20 74 72 75 65 3b |.useintr| = true;|
|000006a0| 0a 58 09 09 09 09 28 76 | 6f 69 64 29 66 70 72 69 |.X....(v|oid)fpri|
|000006b0| 6e 74 66 28 6f 75 74 70 | 75 74 2e 66 70 2c 20 22 |ntf(outp|ut.fp, "|
|000006c0| 49 6e 74 65 72 22 29 2c | 20 50 75 74 6c 28 6f 75 |Inter"),| Putl(ou|
|000006d0| 74 70 75 74 2c 20 30 29 | 3b 0a 58 09 09 09 09 62 |tput, 0)|;.X....b|
|000006e0| 72 65 61 6b 20 3b 0a 58 | 09 09 09 20 20 63 61 73 |reak ;.X|... cas|
|000006f0| 65 20 6e 65 71 3a 0a 58 | 09 09 09 09 75 73 65 73 |e neq:.X|....uses|
|00000700| 65 71 20 3d 20 74 72 75 | 65 3b 0a 58 09 09 09 09 |eq = tru|e;.X....|
|00000710| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00000720| 74 70 75 74 2e 66 70 2c | 20 22 45 71 22 29 2c 20 |tput.fp,| "Eq"), |
|00000730| 50 75 74 6c 28 6f 75 74 | 70 75 74 2c 20 30 29 3b |Putl(out|put, 0);|
|00000740| 0a 58 09 09 09 09 62 72 | 65 61 6b 20 3b 0a 58 09 |.X....br|eak ;.X.|
|00000750| 09 09 20 20 63 61 73 65 | 20 6e 6e 65 3a 0a 58 09 |.. case| nne:.X.|
|00000760| 09 09 09 75 73 65 73 6e | 65 20 3d 20 74 72 75 65 |...usesn|e = true|
|00000770| 3b 0a 58 09 09 09 09 28 | 76 6f 69 64 29 66 70 72 |;.X....(|void)fpr|
|00000780| 69 6e 74 66 28 6f 75 74 | 70 75 74 2e 66 70 2c 20 |intf(out|put.fp, |
|00000790| 22 4e 65 22 29 2c 20 50 | 75 74 6c 28 6f 75 74 70 |"Ne"), P|utl(outp|
|000007a0| 75 74 2c 20 30 29 3b 0a | 58 09 09 09 09 62 72 65 |ut, 0);.|X....bre|
|000007b0| 61 6b 20 3b 0a 58 09 09 | 09 20 20 63 61 73 65 20 |ak ;.X..|. case |
|000007c0| 6e 67 65 3a 0a 58 09 09 | 09 09 75 73 65 73 67 65 |nge:.X..|..usesge|
|000007d0| 20 3d 20 74 72 75 65 3b | 0a 58 09 09 09 09 28 76 | = true;|.X....(v|
|000007e0| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|000007f0| 75 74 2e 66 70 2c 20 22 | 47 65 22 29 2c 20 50 75 |ut.fp, "|Ge"), Pu|
|00000800| 74 6c 28 6f 75 74 70 75 | 74 2c 20 30 29 3b 0a 58 |tl(outpu|t, 0);.X|
|00000810| 09 09 09 09 62 72 65 61 | 6b 20 3b 0a 58 09 09 09 |....brea|k ;.X...|
|00000820| 20 20 63 61 73 65 20 6e | 6c 65 3a 0a 58 09 09 09 | case n|le:.X...|
|00000830| 09 75 73 65 73 6c 65 20 | 3d 20 74 72 75 65 3b 0a |.usesle |= true;.|
|00000840| 58 09 09 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |X....(vo|id)fprin|
|00000850| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 4c |tf(outpu|t.fp, "L|
|00000860| 65 22 29 2c 20 50 75 74 | 6c 28 6f 75 74 70 75 74 |e"), Put|l(output|
|00000870| 2c 20 30 29 3b 0a 58 09 | 09 09 09 62 72 65 61 6b |, 0);.X.|...break|
|00000880| 20 3b 0a 58 09 09 09 20 | 20 64 65 66 61 75 6c 74 | ;.X... | default|
|00000890| 3a 0a 58 09 09 09 09 43 | 61 73 65 65 72 72 6f 72 |:.X....C|aseerror|
|000008a0| 28 4c 69 6e 65 29 3b 0a | 58 09 09 09 7d 0a 58 09 |(Line);.|X...}.X.|
|000008b0| 09 09 69 66 20 28 4d 65 | 6d 62 65 72 28 28 75 6e |..if (Me|mber((un|
|000008c0| 73 69 67 6e 65 64 29 28 | 74 70 2d 3e 74 74 29 2c |signed)(|tp->tt),|
|000008d0| 20 43 6f 6e 73 65 74 5b | 31 34 36 5d 29 29 0a 58 | Conset[|146])).X|
|000008e0| 09 09 09 09 28 2a 47 31 | 39 38 5f 64 72 6f 70 73 |....(*G1|98_drops|
|000008f0| 65 74 29 20 3d 20 66 61 | 6c 73 65 3b 0a 58 09 09 |et) = fa|lse;.X..|
|00000900| 09 50 75 74 63 68 72 28 | 27 28 27 2c 20 6f 75 74 |.Putchr(|'(', out|
|00000910| 70 75 74 29 3b 0a 58 09 | 09 09 65 65 78 70 72 28 |put);.X.|..eexpr(|
|00000920| 74 70 2d 3e 55 2e 56 34 | 31 2e 74 65 78 70 6c 29 |tp->U.V4|1.texpl)|
|00000930| 3b 0a 58 09 09 09 69 66 | 20 28 74 71 2d 3e 74 74 |;.X...if| (tq->tt|
|00000940| 20 3d 3d 20 6e 73 65 74 | 6f 66 29 0a 58 09 09 09 | == nset|of).X...|
|00000950| 09 28 76 6f 69 64 29 66 | 70 72 69 6e 74 66 28 6f |.(void)f|printf(o|
|00000960| 75 74 70 75 74 2e 66 70 | 2c 20 22 2e 53 22 29 2c |utput.fp|, ".S"),|
|00000970| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00000980| 3b 0a 58 09 09 09 28 76 | 6f 69 64 29 66 70 72 69 |;.X...(v|oid)fpri|
|00000990| 6e 74 66 28 6f 75 74 70 | 75 74 2e 66 70 2c 20 22 |ntf(outp|ut.fp, "|
|000009a0| 2c 20 22 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |, "), Pu|tl(outpu|
|000009b0| 74 2c 20 30 29 3b 0a 58 | 09 09 09 65 65 78 70 72 |t, 0);.X|...eexpr|
|000009c0| 28 74 70 2d 3e 55 2e 56 | 34 31 2e 74 65 78 70 72 |(tp->U.V|41.texpr|
|000009d0| 29 3b 0a 58 09 09 09 74 | 71 20 3d 20 74 79 70 65 |);.X...t|q = type|
|000009e0| 6f 66 28 74 70 2d 3e 55 | 2e 56 34 31 2e 74 65 78 |of(tp->U|.V41.tex|
|000009f0| 70 72 29 3b 0a 58 09 09 | 09 69 66 20 28 74 71 2d |pr);.X..|.if (tq-|
|00000a00| 3e 74 74 20 3d 3d 20 6e | 73 65 74 6f 66 29 0a 58 |>tt == n|setof).X|
|00000a10| 09 09 09 09 28 76 6f 69 | 64 29 66 70 72 69 6e 74 |....(voi|d)fprint|
|00000a20| 66 28 6f 75 74 70 75 74 | 2e 66 70 2c 20 22 2e 53 |f(output|.fp, ".S|
|00000a30| 22 29 2c 20 50 75 74 6c | 28 6f 75 74 70 75 74 2c |"), Putl|(output,|
|00000a40| 20 30 29 3b 0a 58 09 09 | 09 50 75 74 63 68 72 28 | 0);.X..|.Putchr(|
|00000a50| 27 29 27 2c 20 6f 75 74 | 70 75 74 29 3b 0a 58 09 |')', out|put);.X.|
|00000a60| 09 09 67 6f 74 6f 20 4c | 39 39 39 3b 0a 58 09 09 |..goto L|999;.X..|
|00000a70| 7d 0a 58 09 7d 0a 58 09 | 69 66 20 28 4d 65 6d 62 |}.X.}.X.|if (Memb|
|00000a80| 65 72 28 28 75 6e 73 69 | 67 6e 65 64 29 28 74 70 |er((unsi|gned)(tp|
|00000a90| 2d 3e 74 74 29 2c 20 43 | 6f 6e 73 65 74 5b 31 34 |->tt), C|onset[14|
|00000aa0| 37 5d 29 29 20 7b 0a 58 | 09 09 74 71 20 3d 20 74 |7])) {.X|..tq = t|
|00000ab0| 79 70 65 6f 66 28 74 70 | 2d 3e 55 2e 56 34 31 2e |ypeof(tp|->U.V41.|
|00000ac0| 74 65 78 70 6c 29 3b 0a | 58 09 09 69 66 20 28 74 |texpl);.|X..if (t|
|00000ad0| 71 2d 3e 74 74 20 3d 3d | 20 6e 63 6f 6e 66 61 72 |q->tt ==| nconfar|
|00000ae0| 72 29 0a 58 09 09 09 66 | 61 74 61 6c 28 65 63 6d |r).X...f|atal(ecm|
|00000af0| 70 63 6f 6e 66 29 3b 0a | 58 09 09 69 66 20 28 28 |pconf);.|X..if ((|
|00000b00| 4d 65 6d 62 65 72 28 28 | 75 6e 73 69 67 6e 65 64 |Member((|unsigned|
|00000b10| 29 28 74 71 2d 3e 74 74 | 29 2c 20 43 6f 6e 73 65 |)(tq->tt|), Conse|
|00000b20| 74 5b 31 34 38 5d 29 29 | 20 7c 7c 20 28 74 71 20 |t[148]))| || (tq |
|00000b30| 3d 3d 20 74 79 70 6e 6f | 64 73 2e 41 5b 28 69 6e |== typno|ds.A[(in|
|00000b40| 74 29 28 74 73 74 72 69 | 6e 67 29 5d 29 29 20 7b |t)(tstri|ng)])) {|
|00000b50| 0a 58 09 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |.X...(vo|id)fprin|
|00000b60| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 43 |tf(outpu|t.fp, "C|
|00000b70| 6d 70 73 74 72 28 22 29 | 2c 20 50 75 74 6c 28 6f |mpstr(")|, Putl(o|
|00000b80| 75 74 70 75 74 2c 20 30 | 29 3b 0a 58 09 09 09 65 |utput, 0|);.X...e|
|00000b90| 65 78 70 72 28 74 70 2d | 3e 55 2e 56 34 31 2e 74 |expr(tp-|>U.V41.t|
|00000ba0| 65 78 70 6c 29 3b 0a 58 | 09 09 09 69 66 20 28 74 |expl);.X|...if (t|
|00000bb0| 71 2d 3e 74 74 20 3d 3d | 20 6e 61 72 72 61 79 29 |q->tt ==| narray)|
|00000bc0| 0a 58 09 09 09 09 28 76 | 6f 69 64 29 66 70 72 69 |.X....(v|oid)fpri|
|00000bd0| 6e 74 66 28 6f 75 74 70 | 75 74 2e 66 70 2c 20 22 |ntf(outp|ut.fp, "|
|00000be0| 2e 41 22 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |.A"), Pu|tl(outpu|
|00000bf0| 74 2c 20 30 29 3b 0a 58 | 09 09 09 28 76 6f 69 64 |t, 0);.X|...(void|
|00000c00| 29 66 70 72 69 6e 74 66 | 28 6f 75 74 70 75 74 2e |)fprintf|(output.|
|00000c10| 66 70 2c 20 22 2c 20 22 | 29 2c 20 50 75 74 6c 28 |fp, ", "|), Putl(|
|00000c20| 6f 75 74 70 75 74 2c 20 | 30 29 3b 0a 58 09 09 09 |output, |0);.X...|
|00000c30| 74 71 20 3d 20 74 79 70 | 65 6f 66 28 74 70 2d 3e |tq = typ|eof(tp->|
|00000c40| 55 2e 56 34 31 2e 74 65 | 78 70 72 29 3b 0a 58 09 |U.V41.te|xpr);.X.|
|00000c50| 09 09 69 66 20 28 74 71 | 2d 3e 74 74 20 3d 3d 20 |..if (tq|->tt == |
|00000c60| 6e 63 6f 6e 66 61 72 72 | 29 0a 58 09 09 09 09 66 |nconfarr|).X....f|
|00000c70| 61 74 61 6c 28 65 63 6d | 70 63 6f 6e 66 29 3b 0a |atal(ecm|pconf);.|
|00000c80| 58 09 09 09 65 65 78 70 | 72 28 74 70 2d 3e 55 2e |X...eexp|r(tp->U.|
|00000c90| 56 34 31 2e 74 65 78 70 | 72 29 3b 0a 58 09 09 09 |V41.texp|r);.X...|
|00000ca0| 69 66 20 28 74 71 2d 3e | 74 74 20 3d 3d 20 6e 61 |if (tq->|tt == na|
|00000cb0| 72 72 61 79 29 0a 58 09 | 09 09 09 28 76 6f 69 64 |rray).X.|...(void|
|00000cc0| 29 66 70 72 69 6e 74 66 | 28 6f 75 74 70 75 74 2e |)fprintf|(output.|
|00000cd0| 66 70 2c 20 22 2e 41 22 | 29 2c 20 50 75 74 6c 28 |fp, ".A"|), Putl(|
|00000ce0| 6f 75 74 70 75 74 2c 20 | 30 29 3b 0a 58 09 09 09 |output, |0);.X...|
|00000cf0| 50 75 74 63 68 72 28 27 | 29 27 2c 20 6f 75 74 70 |Putchr('|)', outp|
|00000d00| 75 74 29 3b 0a 58 09 09 | 09 73 77 69 74 63 68 20 |ut);.X..|.switch |
|00000d10| 28 74 70 2d 3e 74 74 29 | 20 7b 0a 58 09 09 09 20 |(tp->tt)| {.X... |
|00000d20| 20 63 61 73 65 20 6e 65 | 71 3a 0a 58 09 09 09 09 | case ne|q:.X....|
|00000d30| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00000d40| 74 70 75 74 2e 66 70 2c | 20 22 20 3d 3d 20 22 29 |tput.fp,| " == ")|
|00000d50| 2c 20 50 75 74 6c 28 6f | 75 74 70 75 74 2c 20 30 |, Putl(o|utput, 0|
|00000d60| 29 3b 0a 58 09 09 09 09 | 62 72 65 61 6b 20 3b 0a |);.X....|break ;.|
|00000d70| 58 09 09 09 20 20 63 61 | 73 65 20 6e 6e 65 3a 0a |X... ca|se nne:.|
|00000d80| 58 09 09 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |X....(vo|id)fprin|
|00000d90| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 20 |tf(outpu|t.fp, " |
|00000da0| 21 3d 20 22 29 2c 20 50 | 75 74 6c 28 6f 75 74 70 |!= "), P|utl(outp|
|00000db0| 75 74 2c 20 30 29 3b 0a | 58 09 09 09 09 62 72 65 |ut, 0);.|X....bre|
|00000dc0| 61 6b 20 3b 0a 58 09 09 | 09 20 20 63 61 73 65 20 |ak ;.X..|. case |
|00000dd0| 6e 67 74 3a 0a 58 09 09 | 09 09 28 76 6f 69 64 29 |ngt:.X..|..(void)|
|00000de0| 66 70 72 69 6e 74 66 28 | 6f 75 74 70 75 74 2e 66 |fprintf(|output.f|
|00000df0| 70 2c 20 22 20 3e 20 22 | 29 2c 20 50 75 74 6c 28 |p, " > "|), Putl(|
|00000e00| 6f 75 74 70 75 74 2c 20 | 30 29 3b 0a 58 09 09 09 |output, |0);.X...|
|00000e10| 09 62 72 65 61 6b 20 3b | 0a 58 09 09 09 20 20 63 |.break ;|.X... c|
|00000e20| 61 73 65 20 6e 6c 74 3a | 0a 58 09 09 09 09 28 76 |ase nlt:|.X....(v|
|00000e30| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|00000e40| 75 74 2e 66 70 2c 20 22 | 20 3c 20 22 29 2c 20 50 |ut.fp, "| < "), P|
|00000e50| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00000e60| 58 09 09 09 09 62 72 65 | 61 6b 20 3b 0a 58 09 09 |X....bre|ak ;.X..|
|00000e70| 09 20 20 63 61 73 65 20 | 6e 67 65 3a 0a 58 09 09 |. case |nge:.X..|
|00000e80| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|00000e90| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 20 3e 3d 20 |output.f|p, " >= |
|00000ea0| 22 29 2c 20 50 75 74 6c | 28 6f 75 74 70 75 74 2c |"), Putl|(output,|
|00000eb0| 20 30 29 3b 0a 58 09 09 | 09 09 62 72 65 61 6b 20 | 0);.X..|..break |
|00000ec0| 3b 0a 58 09 09 09 20 20 | 63 61 73 65 20 6e 6c 65 |;.X... |case nle|
|00000ed0| 3a 0a 58 09 09 09 09 28 | 76 6f 69 64 29 66 70 72 |:.X....(|void)fpr|
|00000ee0| 69 6e 74 66 28 6f 75 74 | 70 75 74 2e 66 70 2c 20 |intf(out|put.fp, |
|00000ef0| 22 20 3c 3d 20 22 29 2c | 20 50 75 74 6c 28 6f 75 |" <= "),| Putl(ou|
|00000f00| 74 70 75 74 2c 20 30 29 | 3b 0a 58 09 09 09 09 62 |tput, 0)|;.X....b|
|00000f10| 72 65 61 6b 20 3b 0a 58 | 09 09 09 20 20 64 65 66 |reak ;.X|... def|
|00000f20| 61 75 6c 74 3a 0a 58 09 | 09 09 09 43 61 73 65 65 |ault:.X.|...Casee|
|00000f30| 72 72 6f 72 28 4c 69 6e | 65 29 3b 0a 58 09 09 09 |rror(Lin|e);.X...|
|00000f40| 7d 0a 58 09 09 09 50 75 | 74 63 68 72 28 27 30 27 |}.X...Pu|tchr('0'|
|00000f50| 2c 20 6f 75 74 70 75 74 | 29 3b 0a 58 09 09 09 67 |, output|);.X...g|
|00000f60| 6f 74 6f 20 4c 39 39 39 | 3b 0a 58 09 09 7d 0a 58 |oto L999|;.X..}.X|
|00000f70| 09 7d 0a 58 09 73 77 69 | 74 63 68 20 28 74 70 2d |.}.X.swi|tch (tp-|
|00000f80| 3e 74 74 29 20 7b 0a 58 | 09 20 20 63 61 73 65 20 |>tt) {.X|. case |
|00000f90| 6e 65 71 3a 20 20 63 61 | 73 65 20 6e 6e 65 3a 20 |neq: ca|se nne: |
|00000fa0| 20 63 61 73 65 20 6e 6c | 74 3a 20 20 63 61 73 65 | case nl|t: case|
|00000fb0| 20 6e 6c 65 3a 0a 58 09 | 20 20 63 61 73 65 20 6e | nle:.X.| case n|
|00000fc0| 67 74 3a 20 20 63 61 73 | 65 20 6e 67 65 3a 20 20 |gt: cas|e nge: |
|00000fd0| 63 61 73 65 20 6e 6f 72 | 3a 20 20 63 61 73 65 20 |case nor|: case |
|00000fe0| 6e 61 6e 64 3a 0a 58 09 | 20 20 63 61 73 65 20 6e |nand:.X.| case n|
|00000ff0| 70 6c 75 73 3a 20 20 63 | 61 73 65 20 6e 6d 69 6e |plus: c|ase nmin|
|00001000| 75 73 3a 20 20 63 61 73 | 65 20 6e 6d 75 6c 3a 20 |us: cas|e nmul: |
|00001010| 20 63 61 73 65 20 6e 64 | 69 76 3a 0a 58 09 20 20 | case nd|iv:.X. |
|00001020| 63 61 73 65 20 6e 6d 6f | 64 3a 20 20 63 61 73 65 |case nmo|d: case|
|00001030| 20 6e 71 75 6f 74 3a 0a | 58 09 09 66 6c 61 67 20 | nquot:.|X..flag |
|00001040| 3d 20 28 62 6f 6f 6c 65 | 61 6e 29 28 63 70 72 69 |= (boole|an)(cpri|
|00001050| 6f 2e 41 5b 28 69 6e 74 | 29 28 74 70 2d 3e 74 74 |o.A[(int|)(tp->tt|
|00001060| 29 20 2d 20 28 69 6e 74 | 29 28 6e 61 73 73 69 67 |) - (int|)(nassig|
|00001070| 6e 29 5d 20 3e 20 63 70 | 72 69 6f 2e 41 5b 28 69 |n)] > cp|rio.A[(i|
|00001080| 6e 74 29 28 74 70 2d 3e | 55 2e 56 34 31 2e 74 65 |nt)(tp->|U.V41.te|
|00001090| 78 70 6c 2d 3e 74 74 29 | 20 2d 20 28 69 6e 74 29 |xpl->tt)| - (int)|
|000010a0| 28 6e 61 73 73 69 67 6e | 29 5d 29 3b 0a 58 09 09 |(nassign|)]);.X..|
|000010b0| 69 66 20 28 28 4d 65 6d | 62 65 72 28 28 75 6e 73 |if ((Mem|ber((uns|
|000010c0| 69 67 6e 65 64 29 28 74 | 70 2d 3e 74 74 29 2c 20 |igned)(t|p->tt), |
|000010d0| 43 6f 6e 73 65 74 5b 31 | 34 39 5d 29 29 20 26 26 |Conset[1|49])) &&|
|000010e0| 20 21 61 72 69 74 68 65 | 78 70 72 28 74 70 2d 3e | !arithe|xpr(tp->|
|000010f0| 55 2e 56 34 31 2e 74 65 | 78 70 6c 29 29 20 7b 0a |U.V41.te|xpl)) {.|
|00001100| 58 09 09 09 28 76 6f 69 | 64 29 66 70 72 69 6e 74 |X...(voi|d)fprint|
|00001110| 66 28 6f 75 74 70 75 74 | 2e 66 70 2c 20 22 28 69 |f(output|.fp, "(i|
|00001120| 6e 74 29 22 29 2c 20 50 | 75 74 6c 28 6f 75 74 70 |nt)"), P|utl(outp|
|00001130| 75 74 2c 20 30 29 3b 0a | 58 09 09 09 66 6c 61 67 |ut, 0);.|X...flag|
|00001140| 20 3d 20 74 72 75 65 3b | 0a 58 09 09 7d 0a 58 09 | = true;|.X..}.X.|
|00001150| 09 69 66 20 28 66 6c 61 | 67 29 0a 58 09 09 09 50 |.if (fla|g).X...P|
|00001160| 75 74 63 68 72 28 27 28 | 27 2c 20 6f 75 74 70 75 |utchr('(|', outpu|
|00001170| 74 29 3b 0a 58 09 09 65 | 65 78 70 72 28 74 70 2d |t);.X..e|expr(tp-|
|00001180| 3e 55 2e 56 34 31 2e 74 | 65 78 70 6c 29 3b 0a 58 |>U.V41.t|expl);.X|
|00001190| 09 09 69 66 20 28 66 6c | 61 67 29 0a 58 09 09 09 |..if (fl|ag).X...|
|000011a0| 50 75 74 63 68 72 28 27 | 29 27 2c 20 6f 75 74 70 |Putchr('|)', outp|
|000011b0| 75 74 29 3b 0a 58 09 09 | 73 77 69 74 63 68 20 28 |ut);.X..|switch (|
|000011c0| 74 70 2d 3e 74 74 29 20 | 7b 0a 58 09 09 20 20 63 |tp->tt) |{.X.. c|
|000011d0| 61 73 65 20 6e 65 71 3a | 0a 58 09 09 09 28 76 6f |ase neq:|.X...(vo|
|000011e0| 69 64 29 66 70 72 69 6e | 74 66 28 6f 75 74 70 75 |id)fprin|tf(outpu|
|000011f0| 74 2e 66 70 2c 20 22 20 | 3d 3d 20 22 29 2c 20 50 |t.fp, " |== "), P|
|00001200| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00001210| 58 09 09 09 62 72 65 61 | 6b 20 3b 0a 58 09 09 20 |X...brea|k ;.X.. |
|00001220| 20 63 61 73 65 20 6e 6e | 65 3a 0a 58 09 09 09 28 | case nn|e:.X...(|
|00001230| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|00001240| 70 75 74 2e 66 70 2c 20 | 22 20 21 3d 20 22 29 2c |put.fp, |" != "),|
|00001250| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00001260| 3b 0a 58 09 09 09 62 72 | 65 61 6b 20 3b 0a 58 09 |;.X...br|eak ;.X.|
|00001270| 09 20 20 63 61 73 65 20 | 6e 6c 74 3a 0a 58 09 09 |. case |nlt:.X..|
|00001280| 09 28 76 6f 69 64 29 66 | 70 72 69 6e 74 66 28 6f |.(void)f|printf(o|
|00001290| 75 74 70 75 74 2e 66 70 | 2c 20 22 20 3c 20 22 29 |utput.fp|, " < ")|
|000012a0| 2c 20 50 75 74 6c 28 6f | 75 74 70 75 74 2c 20 30 |, Putl(o|utput, 0|
|000012b0| 29 3b 0a 58 09 09 09 62 | 72 65 61 6b 20 3b 0a 58 |);.X...b|reak ;.X|
|000012c0| 09 09 20 20 63 61 73 65 | 20 6e 6c 65 3a 0a 58 09 |.. case| nle:.X.|
|000012d0| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|000012e0| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 20 3c 3d 20 |output.f|p, " <= |
|000012f0| 22 29 2c 20 50 75 74 6c | 28 6f 75 74 70 75 74 2c |"), Putl|(output,|
|00001300| 20 30 29 3b 0a 58 09 09 | 09 62 72 65 61 6b 20 3b | 0);.X..|.break ;|
|00001310| 0a 58 09 09 20 20 63 61 | 73 65 20 6e 67 74 3a 0a |.X.. ca|se ngt:.|
|00001320| 58 09 09 09 28 76 6f 69 | 64 29 66 70 72 69 6e 74 |X...(voi|d)fprint|
|00001330| 66 28 6f 75 74 70 75 74 | 2e 66 70 2c 20 22 20 3e |f(output|.fp, " >|
|00001340| 20 22 29 2c 20 50 75 74 | 6c 28 6f 75 74 70 75 74 | "), Put|l(output|
|00001350| 2c 20 30 29 3b 0a 58 09 | 09 09 62 72 65 61 6b 20 |, 0);.X.|..break |
|00001360| 3b 0a 58 09 09 20 20 63 | 61 73 65 20 6e 67 65 3a |;.X.. c|ase nge:|
|00001370| 0a 58 09 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |.X...(vo|id)fprin|
|00001380| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 20 |tf(outpu|t.fp, " |
|00001390| 3e 3d 20 22 29 2c 20 50 | 75 74 6c 28 6f 75 74 70 |>= "), P|utl(outp|
|000013a0| 75 74 2c 20 30 29 3b 0a | 58 09 09 09 62 72 65 61 |ut, 0);.|X...brea|
|000013b0| 6b 20 3b 0a 58 09 09 20 | 20 63 61 73 65 20 6e 6f |k ;.X.. | case no|
|000013c0| 72 3a 0a 58 09 09 09 28 | 76 6f 69 64 29 66 70 72 |r:.X...(|void)fpr|
|000013d0| 69 6e 74 66 28 6f 75 74 | 70 75 74 2e 66 70 2c 20 |intf(out|put.fp, |
|000013e0| 22 20 7c 7c 20 22 29 2c | 20 50 75 74 6c 28 6f 75 |" || "),| Putl(ou|
|000013f0| 74 70 75 74 2c 20 30 29 | 3b 0a 58 09 09 09 62 72 |tput, 0)|;.X...br|
|00001400| 65 61 6b 20 3b 0a 58 09 | 09 20 20 63 61 73 65 20 |eak ;.X.|. case |
|00001410| 6e 61 6e 64 3a 0a 58 09 | 09 09 28 76 6f 69 64 29 |nand:.X.|..(void)|
|00001420| 66 70 72 69 6e 74 66 28 | 6f 75 74 70 75 74 2e 66 |fprintf(|output.f|
|00001430| 70 2c 20 22 20 26 26 20 | 22 29 2c 20 50 75 74 6c |p, " && |"), Putl|
|00001440| 28 6f 75 74 70 75 74 2c | 20 30 29 3b 0a 58 09 09 |(output,| 0);.X..|
|00001450| 09 62 72 65 61 6b 20 3b | 0a 58 09 09 20 20 63 61 |.break ;|.X.. ca|
|00001460| 73 65 20 6e 70 6c 75 73 | 3a 0a 58 09 09 09 28 76 |se nplus|:.X...(v|
|00001470| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|00001480| 75 74 2e 66 70 2c 20 22 | 20 2b 20 22 29 2c 20 50 |ut.fp, "| + "), P|
|00001490| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|000014a0| 58 09 09 09 62 72 65 61 | 6b 20 3b 0a 58 09 09 20 |X...brea|k ;.X.. |
|000014b0| 20 63 61 73 65 20 6e 6d | 69 6e 75 73 3a 0a 58 09 | case nm|inus:.X.|
|000014c0| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|000014d0| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 20 2d 20 22 |output.f|p, " - "|
|000014e0| 29 2c 20 50 75 74 6c 28 | 6f 75 74 70 75 74 2c 20 |), Putl(|output, |
|000014f0| 30 29 3b 0a 58 09 09 09 | 62 72 65 61 6b 20 3b 0a |0);.X...|break ;.|
|00001500| 58 09 09 20 20 63 61 73 | 65 20 6e 6d 75 6c 3a 0a |X.. cas|e nmul:.|
|00001510| 58 09 09 09 28 76 6f 69 | 64 29 66 70 72 69 6e 74 |X...(voi|d)fprint|
|00001520| 66 28 6f 75 74 70 75 74 | 2e 66 70 2c 20 22 20 2a |f(output|.fp, " *|
|00001530| 20 22 29 2c 20 50 75 74 | 6c 28 6f 75 74 70 75 74 | "), Put|l(output|
|00001540| 2c 20 30 29 3b 0a 58 09 | 09 09 62 72 65 61 6b 20 |, 0);.X.|..break |
|00001550| 3b 0a 58 09 09 20 20 63 | 61 73 65 20 6e 64 69 76 |;.X.. c|ase ndiv|
|00001560| 3a 0a 58 09 09 09 28 76 | 6f 69 64 29 66 70 72 69 |:.X...(v|oid)fpri|
|00001570| 6e 74 66 28 6f 75 74 70 | 75 74 2e 66 70 2c 20 22 |ntf(outp|ut.fp, "|
|00001580| 20 2f 20 22 29 2c 20 50 | 75 74 6c 28 6f 75 74 70 | / "), P|utl(outp|
|00001590| 75 74 2c 20 30 29 3b 0a | 58 09 09 09 62 72 65 61 |ut, 0);.|X...brea|
|000015a0| 6b 20 3b 0a 58 09 09 20 | 20 63 61 73 65 20 6e 6d |k ;.X.. | case nm|
|000015b0| 6f 64 3a 0a 58 09 09 09 | 28 76 6f 69 64 29 66 70 |od:.X...|(void)fp|
|000015c0| 72 69 6e 74 66 28 6f 75 | 74 70 75 74 2e 66 70 2c |rintf(ou|tput.fp,|
|000015d0| 20 22 20 25 25 20 22 29 | 2c 20 50 75 74 6c 28 6f | " %% ")|, Putl(o|
|000015e0| 75 74 70 75 74 2c 20 30 | 29 3b 0a 58 09 09 09 62 |utput, 0|);.X...b|
|000015f0| 72 65 61 6b 20 3b 0a 58 | 09 09 20 20 63 61 73 65 |reak ;.X|.. case|
|00001600| 20 6e 71 75 6f 74 3a 0a | 58 09 09 09 28 76 6f 69 | nquot:.|X...(voi|
|00001610| 64 29 66 70 72 69 6e 74 | 66 28 6f 75 74 70 75 74 |d)fprint|f(output|
|00001620| 2e 66 70 2c 20 22 20 2f | 20 28 28 22 29 2c 20 50 |.fp, " /| (("), P|
|00001630| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00001640| 58 09 09 09 70 72 69 6e | 74 69 64 28 64 65 66 6e |X...prin|tid(defn|
|00001650| 61 6d 73 2e 41 5b 28 69 | 6e 74 29 28 64 72 65 61 |ams.A[(i|nt)(drea|
|00001660| 6c 29 5d 2d 3e 55 2e 56 | 36 2e 6c 69 64 29 3b 0a |l)]->U.V|6.lid);.|
|00001670| 58 09 09 09 50 75 74 63 | 68 72 28 27 29 27 2c 20 |X...Putc|hr(')', |
|00001680| 6f 75 74 70 75 74 29 3b | 0a 58 09 09 09 62 72 65 |output);|.X...bre|
|00001690| 61 6b 20 3b 0a 58 09 09 | 20 20 64 65 66 61 75 6c |ak ;.X..| defaul|
|000016a0| 74 3a 0a 58 09 09 09 43 | 61 73 65 65 72 72 6f 72 |t:.X...C|aseerror|
|000016b0| 28 4c 69 6e 65 29 3b 0a | 58 09 09 7d 0a 58 09 09 |(Line);.|X..}.X..|
|000016c0| 66 6c 61 67 20 3d 20 28 | 62 6f 6f 6c 65 61 6e 29 |flag = (|boolean)|
|000016d0| 28 63 70 72 69 6f 2e 41 | 5b 28 69 6e 74 29 28 74 |(cprio.A|[(int)(t|
|000016e0| 70 2d 3e 74 74 29 20 2d | 20 28 69 6e 74 29 28 6e |p->tt) -| (int)(n|
|000016f0| 61 73 73 69 67 6e 29 5d | 20 3e 20 63 70 72 69 6f |assign)]| > cprio|
|00001700| 2e 41 5b 28 69 6e 74 29 | 28 74 70 2d 3e 55 2e 56 |.A[(int)|(tp->U.V|
|00001710| 34 31 2e 74 65 78 70 72 | 2d 3e 74 74 29 20 2d 20 |41.texpr|->tt) - |
|00001720| 28 69 6e 74 29 28 6e 61 | 73 73 69 67 6e 29 5d 29 |(int)(na|ssign)])|
|00001730| 3b 0a 58 09 09 69 66 20 | 28 28 4d 65 6d 62 65 72 |;.X..if |((Member|
|00001740| 28 28 75 6e 73 69 67 6e | 65 64 29 28 74 70 2d 3e |((unsign|ed)(tp->|
|00001750| 74 74 29 2c 20 43 6f 6e | 73 65 74 5b 31 35 30 5d |tt), Con|set[150]|
|00001760| 29 29 20 26 26 20 21 61 | 72 69 74 68 65 78 70 72 |)) && !a|rithexpr|
|00001770| 28 74 70 2d 3e 55 2e 56 | 34 31 2e 74 65 78 70 72 |(tp->U.V|41.texpr|
|00001780| 29 29 20 7b 0a 58 09 09 | 09 28 76 6f 69 64 29 66 |)) {.X..|.(void)f|
|00001790| 70 72 69 6e 74 66 28 6f | 75 74 70 75 74 2e 66 70 |printf(o|utput.fp|
|000017a0| 2c 20 22 28 69 6e 74 29 | 22 29 2c 20 50 75 74 6c |, "(int)|"), Putl|
|000017b0| 28 6f 75 74 70 75 74 2c | 20 30 29 3b 0a 58 09 09 |(output,| 0);.X..|
|000017c0| 09 66 6c 61 67 20 3d 20 | 74 72 75 65 3b 0a 58 09 |.flag = |true;.X.|
|000017d0| 09 7d 0a 58 09 09 69 66 | 20 28 66 6c 61 67 29 0a |.}.X..if| (flag).|
|000017e0| 58 09 09 09 50 75 74 63 | 68 72 28 27 28 27 2c 20 |X...Putc|hr('(', |
|000017f0| 6f 75 74 70 75 74 29 3b | 0a 58 09 09 65 65 78 70 |output);|.X..eexp|
|00001800| 72 28 74 70 2d 3e 55 2e | 56 34 31 2e 74 65 78 70 |r(tp->U.|V41.texp|
|00001810| 72 29 3b 0a 58 09 09 69 | 66 20 28 66 6c 61 67 29 |r);.X..i|f (flag)|
|00001820| 0a 58 09 09 09 50 75 74 | 63 68 72 28 27 29 27 2c |.X...Put|chr(')',|
|00001830| 20 6f 75 74 70 75 74 29 | 3b 0a 58 09 09 69 66 20 | output)|;.X..if |
|00001840| 28 74 70 2d 3e 74 74 20 | 3d 3d 20 6e 71 75 6f 74 |(tp->tt |== nquot|
|00001850| 29 0a 58 09 09 09 50 75 | 74 63 68 72 28 27 29 27 |).X...Pu|tchr(')'|
|00001860| 2c 20 6f 75 74 70 75 74 | 29 3b 0a 58 09 09 62 72 |, output|);.X..br|
|00001870| 65 61 6b 20 3b 0a 58 09 | 20 20 63 61 73 65 20 6e |eak ;.X.| case n|
|00001880| 75 70 6c 75 73 3a 20 20 | 63 61 73 65 20 6e 75 6d |uplus: |case num|
|00001890| 69 6e 75 73 3a 20 20 63 | 61 73 65 20 6e 6e 6f 74 |inus: c|ase nnot|
|000018a0| 3a 0a 58 09 09 73 77 69 | 74 63 68 20 28 74 70 2d |:.X..swi|tch (tp-|
|000018b0| 3e 74 74 29 20 7b 0a 58 | 09 09 20 20 63 61 73 65 |>tt) {.X|.. case|
|000018c0| 20 6e 75 6d 69 6e 75 73 | 3a 0a 58 09 09 09 50 75 | numinus|:.X...Pu|
|000018d0| 74 63 68 72 28 27 2d 27 | 2c 20 6f 75 74 70 75 74 |tchr('-'|, output|
|000018e0| 29 3b 0a 58 09 09 09 62 | 72 65 61 6b 20 3b 0a 58 |);.X...b|reak ;.X|
|000018f0| 09 09 20 20 63 61 73 65 | 20 6e 6e 6f 74 3a 0a 58 |.. case| nnot:.X|
|00001900| 09 09 09 50 75 74 63 68 | 72 28 27 21 27 2c 20 6f |...Putch|r('!', o|
|00001910| 75 74 70 75 74 29 3b 0a | 58 09 09 09 62 72 65 61 |utput);.|X...brea|
|00001920| 6b 20 3b 0a 58 09 09 20 | 20 63 61 73 65 20 6e 75 |k ;.X.. | case nu|
|00001930| 70 6c 75 73 3a 0a 58 09 | 09 09 62 72 65 61 6b 20 |plus:.X.|..break |
|00001940| 3b 0a 58 09 09 20 20 64 | 65 66 61 75 6c 74 3a 0a |;.X.. d|efault:.|
|00001950| 58 09 09 09 43 61 73 65 | 65 72 72 6f 72 28 4c 69 |X...Case|error(Li|
|00001960| 6e 65 29 3b 0a 58 09 09 | 7d 0a 58 09 09 66 6c 61 |ne);.X..|}.X..fla|
|00001970| 67 20 3d 20 28 62 6f 6f | 6c 65 61 6e 29 28 63 70 |g = (boo|lean)(cp|
|00001980| 72 69 6f 2e 41 5b 28 69 | 6e 74 29 28 74 70 2d 3e |rio.A[(i|nt)(tp->|
|00001990| 74 74 29 20 2d 20 28 69 | 6e 74 29 28 6e 61 73 73 |tt) - (i|nt)(nass|
|000019a0| 69 67 6e 29 5d 20 3e 3d | 20 63 70 72 69 6f 2e 41 |ign)] >=| cprio.A|
|000019b0| 5b 28 69 6e 74 29 28 74 | 70 2d 3e 55 2e 56 34 32 |[(int)(t|p->U.V42|
|000019c0| 2e 74 65 78 70 73 2d 3e | 74 74 29 20 2d 20 28 69 |.texps->|tt) - (i|
|000019d0| 6e 74 29 28 6e 61 73 73 | 69 67 6e 29 5d 29 3b 0a |nt)(nass|ign)]);.|
|000019e0| 58 09 09 69 66 20 28 66 | 6c 61 67 29 0a 58 09 09 |X..if (f|lag).X..|
|000019f0| 09 50 75 74 63 68 72 28 | 27 28 27 2c 20 6f 75 74 |.Putchr(|'(', out|
|00001a00| 70 75 74 29 3b 0a 58 09 | 09 65 65 78 70 72 28 74 |put);.X.|.eexpr(t|
|00001a10| 70 2d 3e 55 2e 56 34 32 | 2e 74 65 78 70 73 29 3b |p->U.V42|.texps);|
|00001a20| 0a 58 09 09 69 66 20 28 | 66 6c 61 67 29 0a 58 09 |.X..if (|flag).X.|
|00001a30| 09 09 50 75 74 63 68 72 | 28 27 29 27 2c 20 6f 75 |..Putchr|(')', ou|
|00001a40| 74 70 75 74 29 3b 0a 58 | 09 09 62 72 65 61 6b 20 |tput);.X|..break |
|00001a50| 3b 0a 58 09 20 20 63 61 | 73 65 20 6e 69 6e 3a 0a |;.X. ca|se nin:.|
|00001a60| 58 09 09 75 73 65 6d 65 | 6d 62 20 3d 20 74 72 75 |X..useme|mb = tru|
|00001a70| 65 3b 0a 58 09 09 28 76 | 6f 69 64 29 66 70 72 69 |e;.X..(v|oid)fpri|
|00001a80| 6e 74 66 28 6f 75 74 70 | 75 74 2e 66 70 2c 20 22 |ntf(outp|ut.fp, "|
|00001a90| 4d 65 6d 62 65 72 28 28 | 75 6e 73 69 67 6e 65 64 |Member((|unsigned|
|00001aa0| 29 28 22 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |)("), Pu|tl(outpu|
|00001ab0| 74 2c 20 30 29 3b 0a 58 | 09 09 65 65 78 70 72 28 |t, 0);.X|..eexpr(|
|00001ac0| 74 70 2d 3e 55 2e 56 34 | 31 2e 74 65 78 70 6c 29 |tp->U.V4|1.texpl)|
|00001ad0| 3b 0a 58 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |;.X..(vo|id)fprin|
|00001ae0| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 29 |tf(outpu|t.fp, ")|
|00001af0| 2c 20 22 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |, "), Pu|tl(outpu|
|00001b00| 74 2c 20 30 29 3b 0a 58 | 09 09 28 2a 47 31 39 38 |t, 0);.X|..(*G198|
|00001b10| 5f 64 72 6f 70 73 65 74 | 29 20 3d 20 74 72 75 65 |_dropset|) = true|
|00001b20| 3b 0a 58 09 09 65 65 78 | 70 72 28 74 70 2d 3e 55 |;.X..eex|pr(tp->U|
|00001b30| 2e 56 34 31 2e 74 65 78 | 70 72 29 3b 0a 58 09 09 |.V41.tex|pr);.X..|
|00001b40| 28 2a 47 31 39 38 5f 64 | 72 6f 70 73 65 74 29 20 |(*G198_d|ropset) |
|00001b50| 3d 20 66 61 6c 73 65 3b | 0a 58 09 09 74 71 20 3d |= false;|.X..tq =|
|00001b60| 20 74 79 70 65 6f 66 28 | 74 70 2d 3e 55 2e 56 34 | typeof(|tp->U.V4|
|00001b70| 31 2e 74 65 78 70 72 29 | 3b 0a 58 09 09 69 66 20 |1.texpr)|;.X..if |
|00001b80| 28 74 71 2d 3e 74 74 20 | 3d 3d 20 6e 73 65 74 6f |(tq->tt |== nseto|
|00001b90| 66 29 0a 58 09 09 09 28 | 76 6f 69 64 29 66 70 72 |f).X...(|void)fpr|
|00001ba0| 69 6e 74 66 28 6f 75 74 | 70 75 74 2e 66 70 2c 20 |intf(out|put.fp, |
|00001bb0| 22 2e 53 22 29 2c 20 50 | 75 74 6c 28 6f 75 74 70 |".S"), P|utl(outp|
|00001bc0| 75 74 2c 20 30 29 3b 0a | 58 09 09 50 75 74 63 68 |ut, 0);.|X..Putch|
|00001bd0| 72 28 27 29 27 2c 20 6f | 75 74 70 75 74 29 3b 0a |r(')', o|utput);.|
|00001be0| 58 09 09 62 72 65 61 6b | 20 3b 0a 58 09 20 20 63 |X..break| ;.X. c|
|00001bf0| 61 73 65 20 6e 61 73 73 | 69 67 6e 3a 0a 58 09 09 |ase nass|ign:.X..|
|00001c00| 74 71 20 3d 20 74 79 70 | 65 6f 66 28 74 70 2d 3e |tq = typ|eof(tp->|
|00001c10| 55 2e 56 32 37 2e 74 72 | 68 73 29 3b 0a 58 09 09 |U.V27.tr|hs);.X..|
|00001c20| 69 66 20 28 74 71 20 3d | 3d 20 74 79 70 6e 6f 64 |if (tq =|= typnod|
|00001c30| 73 2e 41 5b 28 69 6e 74 | 29 28 74 73 74 72 69 6e |s.A[(int|)(tstrin|
|00001c40| 67 29 5d 29 20 7b 0a 58 | 09 09 09 28 76 6f 69 64 |g)]) {.X|...(void|
|00001c50| 29 66 70 72 69 6e 74 66 | 28 6f 75 74 70 75 74 2e |)fprintf|(output.|
|00001c60| 66 70 2c 20 22 25 73 73 | 74 72 6e 63 70 79 28 22 |fp, "%ss|trncpy("|
|00001c70| 2c 20 76 6f 69 64 63 61 | 73 74 29 2c 20 50 75 74 |, voidca|st), Put|
|00001c80| 6c 28 6f 75 74 70 75 74 | 2c 20 30 29 3b 0a 58 09 |l(output|, 0);.X.|
|00001c90| 09 09 65 65 78 70 72 28 | 74 70 2d 3e 55 2e 56 32 |..eexpr(|tp->U.V2|
|00001ca0| 37 2e 74 6c 68 73 29 3b | 0a 58 09 09 09 28 76 6f |7.tlhs);|.X...(vo|
|00001cb0| 69 64 29 66 70 72 69 6e | 74 66 28 6f 75 74 70 75 |id)fprin|tf(outpu|
|00001cc0| 74 2e 66 70 2c 20 22 2e | 41 2c 20 22 29 2c 20 50 |t.fp, ".|A, "), P|
|00001cd0| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00001ce0| 58 09 09 09 65 65 78 70 | 72 28 74 70 2d 3e 55 2e |X...eexp|r(tp->U.|
|00001cf0| 56 32 37 2e 74 72 68 73 | 29 3b 0a 58 09 09 09 28 |V27.trhs|);.X...(|
|00001d00| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|00001d10| 70 75 74 2e 66 70 2c 20 | 22 2c 20 73 69 7a 65 6f |put.fp, |", sizeo|
|00001d20| 66 28 22 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |f("), Pu|tl(outpu|
|00001d30| 74 2c 20 30 29 3b 0a 58 | 09 09 09 65 65 78 70 72 |t, 0);.X|...eexpr|
|00001d40| 28 74 70 2d 3e 55 2e 56 | 32 37 2e 74 6c 68 73 29 |(tp->U.V|27.tlhs)|
|00001d50| 3b 0a 58 09 09 09 28 76 | 6f 69 64 29 66 70 72 69 |;.X...(v|oid)fpri|
|00001d60| 6e 74 66 28 6f 75 74 70 | 75 74 2e 66 70 2c 20 22 |ntf(outp|ut.fp, "|
|00001d70| 2e 41 29 29 22 29 2c 20 | 50 75 74 6c 28 6f 75 74 |.A))"), |Putl(out|
|00001d80| 70 75 74 2c 20 30 29 3b | 0a 58 09 09 7d 20 65 6c |put, 0);|.X..} el|
|00001d90| 73 65 0a 58 09 09 09 69 | 66 20 28 74 71 20 3d 3d |se.X...i|f (tq ==|
|00001da0| 20 74 79 70 6e 6f 64 73 | 2e 41 5b 28 69 6e 74 29 | typnods|.A[(int)|
|00001db0| 28 74 62 6f 6f 6c 65 61 | 6e 29 5d 29 20 7b 0a 58 |(tboolea|n)]) {.X|
|00001dc0| 09 09 09 09 65 65 78 70 | 72 28 74 70 2d 3e 55 2e |....eexp|r(tp->U.|
|00001dd0| 56 32 37 2e 74 6c 68 73 | 29 3b 0a 58 09 09 09 09 |V27.tlhs|);.X....|
|00001de0| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00001df0| 74 70 75 74 2e 66 70 2c | 20 22 20 3d 20 22 29 2c |tput.fp,| " = "),|
|00001e00| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00001e10| 3b 0a 58 09 09 09 09 74 | 71 20 3d 20 74 70 2d 3e |;.X....t|q = tp->|
|00001e20| 55 2e 56 32 37 2e 74 72 | 68 73 3b 0a 58 09 09 09 |U.V27.tr|hs;.X...|
|00001e30| 09 77 68 69 6c 65 20 28 | 74 71 2d 3e 74 74 20 3d |.while (|tq->tt =|
|00001e40| 3d 20 6e 75 70 6c 75 73 | 29 0a 58 09 09 09 09 09 |= nuplus|).X.....|
|00001e50| 74 71 20 3d 20 74 71 2d | 3e 55 2e 56 34 32 2e 74 |tq = tq-|>U.V42.t|
|00001e60| 65 78 70 73 3b 0a 58 09 | 09 09 09 69 66 20 28 4d |exps;.X.|...if (M|
|00001e70| 65 6d 62 65 72 28 28 75 | 6e 73 69 67 6e 65 64 29 |ember((u|nsigned)|
|00001e80| 28 74 71 2d 3e 74 74 29 | 2c 20 43 6f 6e 73 65 74 |(tq->tt)|, Conset|
|00001e90| 5b 31 35 31 5d 29 29 20 | 7b 0a 58 09 09 09 09 09 |[151])) |{.X.....|
|00001ea0| 50 75 74 63 68 72 28 27 | 28 27 2c 20 6f 75 74 70 |Putchr('|(', outp|
|00001eb0| 75 74 29 3b 0a 58 09 09 | 09 09 09 70 72 69 6e 74 |ut);.X..|...print|
|00001ec0| 69 64 28 64 65 66 6e 61 | 6d 73 2e 41 5b 28 69 6e |id(defna|ms.A[(in|
|00001ed0| 74 29 28 64 62 6f 6f 6c | 65 61 6e 29 5d 2d 3e 55 |t)(dbool|ean)]->U|
|00001ee0| 2e 56 36 2e 6c 69 64 29 | 3b 0a 58 09 09 09 09 09 |.V6.lid)|;.X.....|
|00001ef0| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00001f00| 74 70 75 74 2e 66 70 2c | 20 22 29 28 22 29 2c 20 |tput.fp,| ")("), |
|00001f10| 50 75 74 6c 28 6f 75 74 | 70 75 74 2c 20 30 29 3b |Putl(out|put, 0);|
|00001f20| 0a 58 09 09 09 09 09 65 | 65 78 70 72 28 74 71 29 |.X.....e|expr(tq)|
|00001f30| 3b 0a 58 09 09 09 09 09 | 50 75 74 63 68 72 28 27 |;.X.....|Putchr('|
|00001f40| 29 27 2c 20 6f 75 74 70 | 75 74 29 3b 0a 58 09 09 |)', outp|ut);.X..|
|00001f50| 09 09 7d 20 65 6c 73 65 | 0a 58 09 09 09 09 09 65 |..} else|.X.....e|
|00001f60| 65 78 70 72 28 74 71 29 | 3b 0a 58 09 09 09 7d 20 |expr(tq)|;.X...} |
|00001f70| 65 6c 73 65 0a 58 09 09 | 09 09 69 66 20 28 74 71 |else.X..|..if (tq|
|00001f80| 20 3d 3d 20 74 79 70 6e | 6f 64 73 2e 41 5b 28 69 | == typn|ods.A[(i|
|00001f90| 6e 74 29 28 74 6e 69 6c | 29 5d 29 20 7b 0a 58 09 |nt)(tnil|)]) {.X.|
|00001fa0| 09 09 09 09 65 65 78 70 | 72 28 74 70 2d 3e 55 2e |....eexp|r(tp->U.|
|00001fb0| 56 32 37 2e 74 6c 68 73 | 29 3b 0a 58 09 09 09 09 |V27.tlhs|);.X....|
|00001fc0| 09 28 76 6f 69 64 29 66 | 70 72 69 6e 74 66 28 6f |.(void)f|printf(o|
|00001fd0| 75 74 70 75 74 2e 66 70 | 2c 20 22 20 3d 20 28 22 |utput.fp|, " = ("|
|00001fe0| 29 2c 20 50 75 74 6c 28 | 6f 75 74 70 75 74 2c 20 |), Putl(|output, |
|00001ff0| 30 29 3b 0a 58 09 09 09 | 09 09 65 74 79 70 65 64 |0);.X...|..etyped|
|00002000| 65 66 28 74 79 70 65 6f | 66 28 74 70 2d 3e 55 2e |ef(typeo|f(tp->U.|
|00002010| 56 32 37 2e 74 6c 68 73 | 29 29 3b 0a 58 09 09 09 |V27.tlhs|));.X...|
|00002020| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|00002030| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 29 4e 49 4c |output.f|p, ")NIL|
|00002040| 22 29 2c 20 50 75 74 6c | 28 6f 75 74 70 75 74 2c |"), Putl|(output,|
|00002050| 20 30 29 3b 0a 58 09 09 | 09 09 7d 20 65 6c 73 65 | 0);.X..|..} else|
|00002060| 20 7b 0a 58 09 09 09 09 | 09 74 71 20 3d 20 74 79 | {.X....|.tq = ty|
|00002070| 70 65 6f 66 28 74 70 2d | 3e 55 2e 56 32 37 2e 74 |peof(tp-|>U.V27.t|
|00002080| 6c 68 73 29 3b 0a 58 09 | 09 09 09 09 69 66 20 28 |lhs);.X.|....if (|
|00002090| 74 71 2d 3e 74 74 20 3d | 3d 20 6e 73 65 74 6f 66 |tq->tt =|= nsetof|
|000020a0| 29 20 7b 0a 58 09 09 09 | 09 09 09 75 73 65 73 63 |) {.X...|...usesc|
|000020b0| 70 79 20 3d 20 74 72 75 | 65 3b 0a 58 09 09 09 09 |py = tru|e;.X....|
|000020c0| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|000020d0| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 53 65 74 6e |output.f|p, "Setn|
|000020e0| 63 70 79 28 22 29 2c 20 | 50 75 74 6c 28 6f 75 74 |cpy("), |Putl(out|
|000020f0| 70 75 74 2c 20 30 29 3b | 0a 58 09 09 09 09 09 09 |put, 0);|.X......|
|00002100| 65 73 65 6c 65 63 74 28 | 74 70 2d 3e 55 2e 56 32 |eselect(|tp->U.V2|
|00002110| 37 2e 74 6c 68 73 29 3b | 0a 58 09 09 09 09 09 09 |7.tlhs);|.X......|
|00002120| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00002130| 74 70 75 74 2e 66 70 2c | 20 22 53 2c 20 22 29 2c |tput.fp,| "S, "),|
|00002140| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00002150| 3b 0a 58 09 09 09 09 09 | 09 28 2a 47 31 39 38 5f |;.X.....|.(*G198_|
|00002160| 64 72 6f 70 73 65 74 29 | 20 3d 20 74 72 75 65 3b |dropset)| = true;|
|00002170| 0a 58 09 09 09 09 09 09 | 74 71 20 3d 20 74 79 70 |.X......|tq = typ|
|00002180| 65 6f 66 28 74 70 2d 3e | 55 2e 56 32 37 2e 74 72 |eof(tp->|U.V27.tr|
|00002190| 68 73 29 3b 0a 58 09 09 | 09 09 09 09 69 66 20 28 |hs);.X..|....if (|
|000021a0| 74 71 20 3d 3d 20 74 79 | 70 6e 6f 64 73 2e 41 5b |tq == ty|pnods.A[|
|000021b0| 28 69 6e 74 29 28 74 73 | 65 74 29 5d 29 0a 58 09 |(int)(ts|et)]).X.|
|000021c0| 09 09 09 09 09 09 65 65 | 78 70 72 28 74 70 2d 3e |......ee|xpr(tp->|
|000021d0| 55 2e 56 32 37 2e 74 72 | 68 73 29 3b 0a 58 09 09 |U.V27.tr|hs);.X..|
|000021e0| 09 09 09 09 65 6c 73 65 | 20 7b 0a 58 09 09 09 09 |....else| {.X....|
|000021f0| 09 09 09 65 73 65 6c 65 | 63 74 28 74 70 2d 3e 55 |...esele|ct(tp->U|
|00002200| 2e 56 32 37 2e 74 72 68 | 73 29 3b 0a 58 09 09 09 |.V27.trh|s);.X...|
|00002210| 09 09 09 09 50 75 74 63 | 68 72 28 27 53 27 2c 20 |....Putc|hr('S', |
|00002220| 6f 75 74 70 75 74 29 3b | 0a 58 09 09 09 09 09 09 |output);|.X......|
|00002230| 7d 0a 58 09 09 09 09 09 | 09 28 2a 47 31 39 38 5f |}.X.....|.(*G198_|
|00002240| 64 72 6f 70 73 65 74 29 | 20 3d 20 66 61 6c 73 65 |dropset)| = false|
|00002250| 3b 0a 58 09 09 09 09 09 | 09 28 76 6f 69 64 29 66 |;.X.....|.(void)f|
|00002260| 70 72 69 6e 74 66 28 6f | 75 74 70 75 74 2e 66 70 |printf(o|utput.fp|
|00002270| 2c 20 22 2c 20 73 69 7a | 65 6f 66 28 22 29 2c 20 |, ", siz|eof("), |
|00002280| 50 75 74 6c 28 6f 75 74 | 70 75 74 2c 20 30 29 3b |Putl(out|put, 0);|
|00002290| 0a 58 09 09 09 09 09 09 | 65 73 65 6c 65 63 74 28 |.X......|eselect(|
|000022a0| 74 70 2d 3e 55 2e 56 32 | 37 2e 74 6c 68 73 29 3b |tp->U.V2|7.tlhs);|
|000022b0| 0a 58 09 09 09 09 09 09 | 28 76 6f 69 64 29 66 70 |.X......|(void)fp|
|000022c0| 72 69 6e 74 66 28 6f 75 | 74 70 75 74 2e 66 70 2c |rintf(ou|tput.fp,|
|000022d0| 20 22 53 29 29 22 29 2c | 20 50 75 74 6c 28 6f 75 | "S))"),| Putl(ou|
|000022e0| 74 70 75 74 2c 20 30 29 | 3b 0a 58 09 09 09 09 09 |tput, 0)|;.X.....|
|000022f0| 7d 20 65 6c 73 65 20 7b | 0a 58 09 09 09 09 09 09 |} else {|.X......|
|00002300| 65 65 78 70 72 28 74 70 | 2d 3e 55 2e 56 32 37 2e |eexpr(tp|->U.V27.|
|00002310| 74 6c 68 73 29 3b 0a 58 | 09 09 09 09 09 09 28 76 |tlhs);.X|......(v|
|00002320| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|00002330| 75 74 2e 66 70 2c 20 22 | 20 3d 20 22 29 2c 20 50 |ut.fp, "| = "), P|
|00002340| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00002350| 58 09 09 09 09 09 09 65 | 65 78 70 72 28 74 70 2d |X......e|expr(tp-|
|00002360| 3e 55 2e 56 32 37 2e 74 | 72 68 73 29 3b 0a 58 09 |>U.V27.t|rhs);.X.|
|00002370| 09 09 09 09 7d 0a 58 09 | 09 09 09 7d 0a 58 09 09 |....}.X.|...}.X..|
|00002380| 62 72 65 61 6b 20 3b 0a | 58 09 20 20 63 61 73 65 |break ;.|X. case|
|00002390| 20 6e 63 61 6c 6c 3a 0a | 58 09 09 74 71 20 3d 20 | ncall:.|X..tq = |
|000023a0| 69 64 75 70 28 74 70 2d | 3e 55 2e 56 33 30 2e 74 |idup(tp-|>U.V30.t|
|000023b0| 63 61 6c 6c 29 3b 0a 58 | 09 09 69 66 20 28 28 4d |call);.X|..if ((M|
|000023c0| 65 6d 62 65 72 28 28 75 | 6e 73 69 67 6e 65 64 29 |ember((u|nsigned)|
|000023d0| 28 74 71 2d 3e 74 74 29 | 2c 20 43 6f 6e 73 65 74 |(tq->tt)|, Conset|
|000023e0| 5b 31 35 32 5d 29 29 20 | 26 26 20 28 74 71 2d 3e |[152])) |&& (tq->|
|000023f0| 55 2e 56 31 33 2e 74 73 | 75 62 73 74 6d 74 20 21 |U.V13.ts|ubstmt !|
|00002400| 3d 20 28 73 74 72 75 63 | 74 20 53 36 31 20 2a 29 |= (struc|t S61 *)|
|00002410| 4e 49 4c 29 29 0a 58 09 | 09 09 69 66 20 28 74 71 |NIL)).X.|..if (tq|
|00002420| 2d 3e 55 2e 56 31 33 2e | 74 73 75 62 73 74 6d 74 |->U.V13.|tsubstmt|
|00002430| 2d 3e 74 74 20 3d 3d 20 | 6e 70 72 65 64 65 66 29 |->tt == |npredef)|
|00002440| 0a 58 09 09 09 09 65 70 | 72 65 64 65 66 28 74 71 |.X....ep|redef(tq|
|00002450| 2c 20 74 70 29 3b 0a 58 | 09 09 09 65 6c 73 65 0a |, tp);.X|...else.|
|00002460| 58 09 09 09 09 65 63 61 | 6c 6c 28 74 70 29 3b 0a |X....eca|ll(tp);.|
|00002470| 58 09 09 65 6c 73 65 0a | 58 09 09 09 65 63 61 6c |X..else.|X...ecal|
|00002480| 6c 28 74 70 29 3b 0a 58 | 09 09 62 72 65 61 6b 20 |l(tp);.X|..break |
|00002490| 3b 0a 58 09 20 20 63 61 | 73 65 20 6e 73 65 6c 65 |;.X. ca|se nsele|
|000024a0| 63 74 3a 0a 58 09 09 65 | 73 65 6c 65 63 74 28 74 |ct:.X..e|select(t|
|000024b0| 70 2d 3e 55 2e 56 34 30 | 2e 74 72 65 63 6f 72 64 |p->U.V40|.trecord|
|000024c0| 29 3b 0a 58 09 09 65 65 | 78 70 72 28 74 70 2d 3e |);.X..ee|xpr(tp->|
|000024d0| 55 2e 56 34 30 2e 74 66 | 69 65 6c 64 29 3b 0a 58 |U.V40.tf|ield);.X|
|000024e0| 09 09 62 72 65 61 6b 20 | 3b 0a 58 09 20 20 63 61 |..break |;.X. ca|
|000024f0| 73 65 20 6e 69 6e 64 65 | 78 3a 0a 58 09 09 65 73 |se ninde|x:.X..es|
|00002500| 65 6c 65 63 74 28 74 70 | 2d 3e 55 2e 56 33 39 2e |elect(tp|->U.V39.|
|00002510| 74 76 61 72 69 61 62 6c | 65 29 3b 0a 58 09 09 28 |tvariabl|e);.X..(|
|00002520| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|00002530| 70 75 74 2e 66 70 2c 20 | 22 41 5b 22 29 2c 20 50 |put.fp, |"A["), P|
|00002540| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00002550| 58 09 09 74 71 20 3d 20 | 74 70 2d 3e 55 2e 56 33 |X..tq = |tp->U.V3|
|00002560| 39 2e 74 6f 66 66 73 65 | 74 3b 0a 58 09 09 69 66 |9.toffse|t;.X..if|
|00002570| 20 28 61 72 69 74 68 65 | 78 70 72 28 74 71 29 29 | (arithe|xpr(tq))|
|00002580| 0a 58 09 09 09 65 65 78 | 70 72 28 74 71 29 3b 0a |.X...eex|pr(tq);.|
|00002590| 58 09 09 65 6c 73 65 20 | 7b 0a 58 09 09 09 28 76 |X..else |{.X...(v|
|000025a0| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|000025b0| 75 74 2e 66 70 2c 20 22 | 28 69 6e 74 29 28 22 29 |ut.fp, "|(int)(")|
|000025c0| 2c 20 50 75 74 6c 28 6f | 75 74 70 75 74 2c 20 30 |, Putl(o|utput, 0|
|000025d0| 29 3b 0a 58 09 09 09 65 | 65 78 70 72 28 74 71 29 |);.X...e|expr(tq)|
|000025e0| 3b 0a 58 09 09 09 50 75 | 74 63 68 72 28 27 29 27 |;.X...Pu|tchr(')'|
|000025f0| 2c 20 6f 75 74 70 75 74 | 29 3b 0a 58 09 09 7d 0a |, output|);.X..}.|
|00002600| 58 09 09 74 71 20 3d 20 | 74 79 70 65 6f 66 28 74 |X..tq = |typeof(t|
|00002610| 70 2d 3e 55 2e 56 33 39 | 2e 74 76 61 72 69 61 62 |p->U.V39|.tvariab|
|00002620| 6c 65 29 3b 0a 58 09 09 | 69 66 20 28 74 71 2d 3e |le);.X..|if (tq->|
|00002630| 74 74 20 3d 3d 20 6e 61 | 72 72 61 79 29 0a 58 09 |tt == na|rray).X.|
|00002640| 09 09 69 66 20 28 63 6c | 6f 77 65 72 28 74 71 2d |..if (cl|ower(tq-|
|00002650| 3e 55 2e 56 32 33 2e 74 | 61 69 6e 64 78 29 20 21 |>U.V23.t|aindx) !|
|00002660| 3d 20 30 29 20 7b 0a 58 | 09 09 09 09 28 76 6f 69 |= 0) {.X|....(voi|
|00002670| 64 29 66 70 72 69 6e 74 | 66 28 6f 75 74 70 75 74 |d)fprint|f(output|
|00002680| 2e 66 70 2c 20 22 20 2d | 20 22 29 2c 20 50 75 74 |.fp, " -| "), Put|
|00002690| 6c 28 6f 75 74 70 75 74 | 2c 20 30 29 3b 0a 58 09 |l(output|, 0);.X.|
|000026a0| 09 09 09 74 71 20 3d 20 | 74 79 70 65 6f 66 28 74 |...tq = |typeof(t|
|000026b0| 71 2d 3e 55 2e 56 32 33 | 2e 74 61 69 6e 64 78 29 |q->U.V23|.taindx)|
|000026c0| 3b 0a 58 09 09 09 09 69 | 66 20 28 74 71 2d 3e 74 |;.X....i|f (tq->t|
|000026d0| 74 20 3d 3d 20 6e 73 75 | 62 72 61 6e 67 65 29 0a |t == nsu|brange).|
|000026e0| 58 09 09 09 09 09 69 66 | 20 28 61 72 69 74 68 65 |X.....if| (arithe|
|000026f0| 78 70 72 28 74 71 2d 3e | 55 2e 56 31 39 2e 74 6c |xpr(tq->|U.V19.tl|
|00002700| 6f 29 29 0a 58 09 09 09 | 09 09 09 65 65 78 70 72 |o)).X...|...eexpr|
|00002710| 28 74 71 2d 3e 55 2e 56 | 31 39 2e 74 6c 6f 29 3b |(tq->U.V|19.tlo);|
|00002720| 0a 58 09 09 09 09 09 65 | 6c 73 65 20 7b 0a 58 09 |.X.....e|lse {.X.|
|00002730| 09 09 09 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |.....(vo|id)fprin|
|00002740| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 28 |tf(outpu|t.fp, "(|
|00002750| 69 6e 74 29 28 22 29 2c | 20 50 75 74 6c 28 6f 75 |int)("),| Putl(ou|
|00002760| 74 70 75 74 2c 20 30 29 | 3b 0a 58 09 09 09 09 09 |tput, 0)|;.X.....|
|00002770| 09 65 65 78 70 72 28 74 | 71 2d 3e 55 2e 56 31 39 |.eexpr(t|q->U.V19|
|00002780| 2e 74 6c 6f 29 3b 0a 58 | 09 09 09 09 09 09 50 75 |.tlo);.X|......Pu|
|00002790| 74 63 68 72 28 27 29 27 | 2c 20 6f 75 74 70 75 74 |tchr(')'|, output|
|000027a0| 29 3b 0a 58 09 09 09 09 | 09 7d 0a 58 09 09 09 09 |);.X....|.}.X....|
|000027b0| 65 6c 73 65 0a 58 09 09 | 09 09 09 66 61 74 61 6c |else.X..|...fatal|
|000027c0| 28 65 74 72 65 65 29 3b | 0a 58 09 09 09 7d 0a 58 |(etree);|.X...}.X|
|000027d0| 09 09 50 75 74 63 68 72 | 28 27 5d 27 2c 20 6f 75 |..Putchr|(']', ou|
|000027e0| 74 70 75 74 29 3b 0a 58 | 09 09 62 72 65 61 6b 20 |tput);.X|..break |
|000027f0| 3b 0a 58 09 20 20 63 61 | 73 65 20 6e 64 65 72 65 |;.X. ca|se ndere|
|00002800| 66 3a 0a 58 09 09 74 71 | 20 3d 20 74 79 70 65 6f |f:.X..tq| = typeo|
|00002810| 66 28 74 70 2d 3e 55 2e | 56 34 32 2e 74 65 78 70 |f(tp->U.|V42.texp|
|00002820| 73 29 3b 0a 58 09 09 69 | 66 20 28 28 74 71 2d 3e |s);.X..i|f ((tq->|
|00002830| 74 74 20 3d 3d 20 6e 66 | 69 6c 65 6f 66 29 20 7c |tt == nf|ileof) ||
|00002840| 7c 20 28 28 74 71 2d 3e | 74 74 20 3d 3d 20 6e 70 || ((tq->|tt == np|
|00002850| 72 65 64 65 66 29 20 26 | 26 20 28 74 71 2d 3e 55 |redef) &|& (tq->U|
|00002860| 2e 56 31 32 2e 74 64 65 | 66 20 3d 3d 20 64 74 65 |.V12.tde|f == dte|
|00002870| 78 74 29 29 29 20 7b 0a | 58 09 09 09 65 65 78 70 |xt))) {.|X...eexp|
|00002880| 72 28 74 70 2d 3e 55 2e | 56 34 32 2e 74 65 78 70 |r(tp->U.|V42.texp|
|00002890| 73 29 3b 0a 58 09 09 09 | 28 76 6f 69 64 29 66 70 |s);.X...|(void)fp|
|000028a0| 72 69 6e 74 66 28 6f 75 | 74 70 75 74 2e 66 70 2c |rintf(ou|tput.fp,|
|000028b0| 20 22 2e 62 75 66 22 29 | 2c 20 50 75 74 6c 28 6f | ".buf")|, Putl(o|
|000028c0| 75 74 70 75 74 2c 20 30 | 29 3b 0a 58 09 09 7d 20 |utput, 0|);.X..} |
|000028d0| 65 6c 73 65 0a 58 09 09 | 09 69 66 20 28 28 2a 47 |else.X..|.if ((*G|
|000028e0| 32 30 32 5f 64 6f 61 72 | 72 6f 77 29 20 3d 3d 20 |202_doar|row) == |
|000028f0| 30 29 20 7b 0a 58 09 09 | 09 09 50 75 74 63 68 72 |0) {.X..|..Putchr|
|00002900| 28 27 2a 27 2c 20 6f 75 | 74 70 75 74 29 3b 0a 58 |('*', ou|tput);.X|
|00002910| 09 09 09 09 65 65 78 70 | 72 28 74 70 2d 3e 55 2e |....eexp|r(tp->U.|
|00002920| 56 34 32 2e 74 65 78 70 | 73 29 3b 0a 58 09 09 09 |V42.texp|s);.X...|
|00002930| 7d 20 65 6c 73 65 20 7b | 0a 58 09 09 09 09 65 65 |} else {|.X....ee|
|00002940| 78 70 72 28 74 70 2d 3e | 55 2e 56 34 32 2e 74 65 |xpr(tp->|U.V42.te|
|00002950| 78 70 73 29 3b 0a 58 09 | 09 09 09 28 76 6f 69 64 |xps);.X.|...(void|
|00002960| 29 66 70 72 69 6e 74 66 | 28 6f 75 74 70 75 74 2e |)fprintf|(output.|
|00002970| 66 70 2c 20 22 2d 3e 22 | 29 2c 20 50 75 74 6c 28 |fp, "->"|), Putl(|
|00002980| 6f 75 74 70 75 74 2c 20 | 30 29 3b 0a 58 09 09 09 |output, |0);.X...|
|00002990| 09 28 2a 47 32 30 30 5f | 64 6f 6e 65 61 72 72 29 |.(*G200_|donearr)|
|000029a0| 20 3d 20 74 72 75 65 3b | 0a 58 09 09 09 7d 0a 58 | = true;|.X...}.X|
|000029b0| 09 09 62 72 65 61 6b 20 | 3b 0a 58 09 20 20 63 61 |..break |;.X. ca|
|000029c0| 73 65 20 6e 69 64 3a 0a | 58 09 09 74 71 20 3d 20 |se nid:.|X..tq = |
|000029d0| 69 64 75 70 28 74 70 29 | 3b 0a 58 09 09 69 66 20 |idup(tp)|;.X..if |
|000029e0| 28 74 71 2d 3e 74 74 20 | 3d 3d 20 6e 76 61 72 70 |(tq->tt |== nvarp|
|000029f0| 61 72 29 20 7b 0a 58 09 | 09 09 69 66 20 28 28 28 |ar) {.X.|..if (((|
|00002a00| 2a 47 32 30 32 5f 64 6f | 61 72 72 6f 77 29 20 3d |*G202_do|arrow) =|
|00002a10| 3d 20 30 29 20 7c 7c 20 | 28 74 71 2d 3e 55 2e 56 |= 0) || |(tq->U.V|
|00002a20| 31 34 2e 74 61 74 74 72 | 20 3d 3d 20 61 72 65 66 |14.tattr| == aref|
|00002a30| 65 72 65 6e 63 65 29 29 | 20 7b 0a 58 09 09 09 09 |erence))| {.X....|
|00002a40| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00002a50| 74 70 75 74 2e 66 70 2c | 20 22 28 2a 22 29 2c 20 |tput.fp,| "(*"), |
|00002a60| 50 75 74 6c 28 6f 75 74 | 70 75 74 2c 20 30 29 3b |Putl(out|put, 0);|
|00002a70| 0a 58 09 09 09 09 70 72 | 69 6e 74 69 64 28 74 70 |.X....pr|intid(tp|
|00002a80| 2d 3e 55 2e 56 34 33 2e | 74 73 79 6d 2d 3e 55 2e |->U.V43.|tsym->U.|
|00002a90| 56 36 2e 6c 69 64 29 3b | 0a 58 09 09 09 09 50 75 |V6.lid);|.X....Pu|
|00002aa0| 74 63 68 72 28 27 29 27 | 2c 20 6f 75 74 70 75 74 |tchr(')'|, output|
|00002ab0| 29 3b 0a 58 09 09 09 7d | 20 65 6c 73 65 20 7b 0a |);.X...}| else {.|
|00002ac0| 58 09 09 09 09 70 72 69 | 6e 74 69 64 28 74 70 2d |X....pri|ntid(tp-|
|00002ad0| 3e 55 2e 56 34 33 2e 74 | 73 79 6d 2d 3e 55 2e 56 |>U.V43.t|sym->U.V|
|00002ae0| 36 2e 6c 69 64 29 3b 0a | 58 09 09 09 09 28 76 6f |6.lid);.|X....(vo|
|00002af0| 69 64 29 66 70 72 69 6e | 74 66 28 6f 75 74 70 75 |id)fprin|tf(outpu|
|00002b00| 74 2e 66 70 2c 20 22 2d | 3e 22 29 2c 20 50 75 74 |t.fp, "-|>"), Put|
|00002b10| 6c 28 6f 75 74 70 75 74 | 2c 20 30 29 3b 0a 58 09 |l(output|, 0);.X.|
|00002b20| 09 09 09 28 2a 47 32 30 | 30 5f 64 6f 6e 65 61 72 |...(*G20|0_donear|
|00002b30| 72 29 20 3d 20 74 72 75 | 65 3b 0a 58 09 09 09 7d |r) = tru|e;.X...}|
|00002b40| 0a 58 09 09 7d 20 65 6c | 73 65 0a 58 09 09 09 69 |.X..} el|se.X...i|
|00002b50| 66 20 28 28 74 71 2d 3e | 74 74 20 3d 3d 20 6e 63 |f ((tq->|tt == nc|
|00002b60| 6f 6e 73 74 29 20 26 26 | 20 28 2a 47 31 39 34 5f |onst) &&| (*G194_|
|00002b70| 63 6f 6e 66 6c 61 67 29 | 29 0a 58 09 09 09 09 28 |conflag)|).X....(|
|00002b80| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|00002b90| 70 75 74 2e 66 70 2c 20 | 22 25 31 64 22 2c 20 63 |put.fp, |"%1d", c|
|00002ba0| 76 61 6c 6f 66 28 74 70 | 29 29 2c 20 50 75 74 6c |valof(tp|)), Putl|
|00002bb0| 28 6f 75 74 70 75 74 2c | 20 30 29 3b 0a 58 09 09 |(output,| 0);.X..|
|00002bc0| 09 65 6c 73 65 0a 58 09 | 09 09 09 69 66 20 28 4d |.else.X.|...if (M|
|00002bd0| 65 6d 62 65 72 28 28 75 | 6e 73 69 67 6e 65 64 29 |ember((u|nsigned)|
|00002be0| 28 74 71 2d 3e 74 74 29 | 2c 20 43 6f 6e 73 65 74 |(tq->tt)|, Conset|
|00002bf0| 5b 31 35 33 5d 29 29 20 | 7b 0a 58 09 09 09 09 09 |[153])) |{.X.....|
|00002c00| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00002c10| 74 70 75 74 2e 66 70 2c | 20 22 28 2a 22 29 2c 20 |tput.fp,| "(*"), |
|00002c20| 50 75 74 6c 28 6f 75 74 | 70 75 74 2c 20 30 29 3b |Putl(out|put, 0);|
|00002c30| 0a 58 09 09 09 09 09 70 | 72 69 6e 74 69 64 28 74 |.X.....p|rintid(t|
|00002c40| 70 2d 3e 55 2e 56 34 33 | 2e 74 73 79 6d 2d 3e 55 |p->U.V43|.tsym->U|
|00002c50| 2e 56 36 2e 6c 69 64 29 | 3b 0a 58 09 09 09 09 09 |.V6.lid)|;.X.....|
|00002c60| 50 75 74 63 68 72 28 27 | 29 27 2c 20 6f 75 74 70 |Putchr('|)', outp|
|00002c70| 75 74 29 3b 0a 58 09 09 | 09 09 7d 20 65 6c 73 65 |ut);.X..|..} else|
|00002c80| 0a 58 09 09 09 09 09 70 | 72 69 6e 74 69 64 28 74 |.X.....p|rintid(t|
|00002c90| 70 2d 3e 55 2e 56 34 33 | 2e 74 73 79 6d 2d 3e 55 |p->U.V43|.tsym->U|
|00002ca0| 2e 56 36 2e 6c 69 64 29 | 3b 0a 58 09 09 62 72 65 |.V6.lid)|;.X..bre|
|00002cb0| 61 6b 20 3b 0a 58 09 20 | 20 63 61 73 65 20 6e 63 |ak ;.X. | case nc|
|00002cc0| 68 61 72 3a 0a 58 09 09 | 70 72 69 6e 74 63 68 72 |har:.X..|printchr|
|00002cd0| 28 74 70 2d 3e 55 2e 56 | 34 33 2e 74 73 79 6d 2d |(tp->U.V|43.tsym-|
|00002ce0| 3e 55 2e 56 31 31 2e 6c | 63 68 61 72 29 3b 0a 58 |>U.V11.l|char);.X|
|00002cf0| 09 09 62 72 65 61 6b 20 | 3b 0a 58 09 20 20 63 61 |..break |;.X. ca|
|00002d00| 73 65 20 6e 69 6e 74 65 | 67 65 72 3a 0a 58 09 09 |se ninte|ger:.X..|
|00002d10| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00002d20| 74 70 75 74 2e 66 70 2c | 20 22 25 31 64 22 2c 20 |tput.fp,| "%1d", |
|00002d30| 74 70 2d 3e 55 2e 56 34 | 33 2e 74 73 79 6d 2d 3e |tp->U.V4|3.tsym->|
|00002d40| 55 2e 56 31 30 2e 6c 69 | 6e 75 6d 29 2c 20 50 75 |U.V10.li|num), Pu|
|00002d50| 74 6c 28 6f 75 74 70 75 | 74 2c 20 30 29 3b 0a 58 |tl(outpu|t, 0);.X|
|00002d60| 09 09 62 72 65 61 6b 20 | 3b 0a 58 09 20 20 63 61 |..break |;.X. ca|
|00002d70| 73 65 20 6e 72 65 61 6c | 3a 0a 58 09 09 70 72 69 |se nreal|:.X..pri|
|00002d80| 6e 74 74 6f 6b 28 74 70 | 2d 3e 55 2e 56 34 33 2e |nttok(tp|->U.V43.|
|00002d90| 74 73 79 6d 2d 3e 55 2e | 56 38 2e 6c 66 6c 6f 61 |tsym->U.|V8.lfloa|
|00002da0| 74 29 3b 0a 58 09 09 62 | 72 65 61 6b 20 3b 0a 58 |t);.X..b|reak ;.X|
|00002db0| 09 20 20 63 61 73 65 20 | 6e 73 74 72 69 6e 67 3a |. case |nstring:|
|00002dc0| 0a 58 09 09 70 72 69 6e | 74 73 74 72 28 74 70 2d |.X..prin|tstr(tp-|
|00002dd0| 3e 55 2e 56 34 33 2e 74 | 73 79 6d 2d 3e 55 2e 56 |>U.V43.t|sym->U.V|
|00002de0| 37 2e 6c 73 74 72 29 3b | 0a 58 09 09 62 72 65 61 |7.lstr);|.X..brea|
|00002df0| 6b 20 3b 0a 58 09 20 20 | 63 61 73 65 20 6e 73 65 |k ;.X. |case nse|
|00002e00| 74 3a 0a 58 09 09 69 66 | 20 28 63 6f 6e 73 74 73 |t:.X..if| (consts|
|00002e10| 65 74 28 74 70 2d 3e 55 | 2e 56 34 32 2e 74 65 78 |et(tp->U|.V42.tex|
|00002e20| 70 73 29 29 20 7b 0a 58 | 09 09 09 28 76 6f 69 64 |ps)) {.X|...(void|
|00002e30| 29 66 70 72 69 6e 74 66 | 28 6f 75 74 70 75 74 2e |)fprintf|(output.|
|00002e40| 66 70 2c 20 22 43 6f 6e | 73 65 74 5b 25 31 64 5d |fp, "Con|set[%1d]|
|00002e50| 22 2c 20 73 65 74 63 6e | 74 29 2c 20 50 75 74 6c |", setcn|t), Putl|
|00002e60| 28 6f 75 74 70 75 74 2c | 20 30 29 3b 0a 58 09 09 |(output,| 0);.X..|
|00002e70| 09 73 65 74 63 6e 74 20 | 3d 20 73 65 74 63 6e 74 |.setcnt |= setcnt|
|00002e80| 20 2b 20 31 3b 0a 58 09 | 09 09 74 71 20 3d 20 6d | + 1;.X.|..tq = m|
|00002e90| 6b 6e 6f 64 65 28 6e 73 | 65 74 29 3b 0a 58 09 09 |knode(ns|et);.X..|
|00002ea0| 09 74 71 2d 3e 74 6e 65 | 78 74 20 3d 20 73 65 74 |.tq->tne|xt = set|
|00002eb0| 6c 73 74 3b 0a 58 09 09 | 09 73 65 74 6c 73 74 20 |lst;.X..|.setlst |
|00002ec0| 3d 20 74 71 3b 0a 58 09 | 09 09 74 71 2d 3e 55 2e |= tq;.X.|..tq->U.|
|00002ed0| 56 34 32 2e 74 65 78 70 | 73 20 3d 20 74 70 2d 3e |V42.texp|s = tp->|
|00002ee0| 55 2e 56 34 32 2e 74 65 | 78 70 73 3b 0a 58 09 09 |U.V42.te|xps;.X..|
|00002ef0| 7d 20 65 6c 73 65 20 7b | 0a 58 09 09 09 69 6e 63 |} else {|.X...inc|
|00002f00| 72 65 6d 65 6e 74 28 29 | 3b 0a 58 09 09 09 66 6c |rement()|;.X...fl|
|00002f10| 61 67 20 3d 20 28 2a 47 | 31 39 38 5f 64 72 6f 70 |ag = (*G|198_drop|
|00002f20| 73 65 74 29 3b 0a 58 09 | 09 09 69 66 20 28 28 2a |set);.X.|..if ((*|
|00002f30| 47 31 39 38 5f 64 72 6f | 70 73 65 74 29 29 0a 58 |G198_dro|pset)).X|
|00002f40| 09 09 09 09 28 2a 47 31 | 39 38 5f 64 72 6f 70 73 |....(*G1|98_drops|
|00002f50| 65 74 29 20 3d 20 66 61 | 6c 73 65 3b 0a 58 09 09 |et) = fa|lse;.X..|
|00002f60| 09 65 6c 73 65 0a 58 09 | 09 09 09 28 76 6f 69 64 |.else.X.|...(void|
|00002f70| 29 66 70 72 69 6e 74 66 | 28 6f 75 74 70 75 74 2e |)fprintf|(output.|
|00002f80| 66 70 2c 20 22 53 61 76 | 65 73 65 74 28 22 29 2c |fp, "Sav|eset("),|
|00002f90| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00002fa0| 3b 0a 58 09 09 09 28 76 | 6f 69 64 29 66 70 72 69 |;.X...(v|oid)fpri|
|00002fb0| 6e 74 66 28 6f 75 74 70 | 75 74 2e 66 70 2c 20 22 |ntf(outp|ut.fp, "|
|00002fc0| 28 54 6d 70 73 65 74 20 | 3d 20 4e 65 77 73 65 74 |(Tmpset |= Newset|
|00002fd0| 28 29 2c 20 22 29 2c 20 | 50 75 74 6c 28 6f 75 74 |(), "), |Putl(out|
|00002fe0| 70 75 74 2c 20 30 29 3b | 0a 58 09 09 09 74 71 20 |put, 0);|.X...tq |
|00002ff0| 3d 20 74 70 2d 3e 55 2e | 56 34 32 2e 74 65 78 70 |= tp->U.|V42.texp|
|00003000| 73 3b 0a 58 09 09 09 77 | 68 69 6c 65 20 28 74 71 |s;.X...w|hile (tq|
|00003010| 20 21 3d 20 28 73 74 72 | 75 63 74 20 53 36 31 20 | != (str|uct S61 |
|00003020| 2a 29 4e 49 4c 29 20 7b | 0a 58 09 09 09 09 73 77 |*)NIL) {|.X....sw|
|00003030| 69 74 63 68 20 28 74 71 | 2d 3e 74 74 29 20 7b 0a |itch (tq|->tt) {.|
|00003040| 58 09 09 09 09 20 20 63 | 61 73 65 20 6e 72 61 6e |X.... c|ase nran|
|00003050| 67 65 3a 0a 58 09 09 09 | 09 09 75 73 65 6d 6b 73 |ge:.X...|..usemks|
|00003060| 75 62 20 3d 20 74 72 75 | 65 3b 0a 58 09 09 09 09 |ub = tru|e;.X....|
|00003070| 09 28 76 6f 69 64 29 66 | 70 72 69 6e 74 66 28 6f |.(void)f|printf(o|
|00003080| 75 74 70 75 74 2e 66 70 | 2c 20 22 25 73 4d 6b 73 |utput.fp|, "%sMks|
|00003090| 75 62 72 28 22 2c 20 76 | 6f 69 64 63 61 73 74 29 |ubr(", v|oidcast)|
|000030a0| 2c 20 50 75 74 6c 28 6f | 75 74 70 75 74 2c 20 30 |, Putl(o|utput, 0|
|000030b0| 29 3b 0a 58 09 09 09 09 | 09 28 76 6f 69 64 29 66 |);.X....|.(void)f|
|000030c0| 70 72 69 6e 74 66 28 6f | 75 74 70 75 74 2e 66 70 |printf(o|utput.fp|
|000030d0| 2c 20 22 28 75 6e 73 69 | 67 6e 65 64 29 28 22 29 |, "(unsi|gned)(")|
|000030e0| 2c 20 50 75 74 6c 28 6f | 75 74 70 75 74 2c 20 30 |, Putl(o|utput, 0|
|000030f0| 29 3b 0a 58 09 09 09 09 | 09 65 65 78 70 72 28 74 |);.X....|.eexpr(t|
|00003100| 71 2d 3e 55 2e 56 34 31 | 2e 74 65 78 70 6c 29 3b |q->U.V41|.texpl);|
|00003110| 0a 58 09 09 09 09 09 28 | 76 6f 69 64 29 66 70 72 |.X.....(|void)fpr|
|00003120| 69 6e 74 66 28 6f 75 74 | 70 75 74 2e 66 70 2c 20 |intf(out|put.fp, |
|00003130| 22 29 2c 20 22 29 2c 20 | 50 75 74 6c 28 6f 75 74 |"), "), |Putl(out|
|00003140| 70 75 74 2c 20 30 29 3b | 0a 58 09 09 09 09 09 28 |put, 0);|.X.....(|
|00003150| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|00003160| 70 75 74 2e 66 70 2c 20 | 22 28 75 6e 73 69 67 6e |put.fp, |"(unsign|
|00003170| 65 64 29 28 22 29 2c 20 | 50 75 74 6c 28 6f 75 74 |ed)("), |Putl(out|
|00003180| 70 75 74 2c 20 30 29 3b | 0a 58 09 09 09 09 09 65 |put, 0);|.X.....e|
|00003190| 65 78 70 72 28 74 71 2d | 3e 55 2e 56 34 31 2e 74 |expr(tq-|>U.V41.t|
|000031a0| 65 78 70 72 29 3b 0a 58 | 09 09 09 09 09 28 76 6f |expr);.X|.....(vo|
|000031b0| 69 64 29 66 70 72 69 6e | 74 66 28 6f 75 74 70 75 |id)fprin|tf(outpu|
|000031c0| 74 2e 66 70 2c 20 22 29 | 2c 20 54 6d 70 73 65 74 |t.fp, ")|, Tmpset|
|000031d0| 29 22 29 2c 20 50 75 74 | 6c 28 6f 75 74 70 75 74 |)"), Put|l(output|
|000031e0| 2c 20 30 29 3b 0a 58 09 | 09 09 09 09 62 72 65 61 |, 0);.X.|....brea|
|000031f0| 6b 20 3b 0a 58 09 09 09 | 09 20 20 63 61 73 65 20 |k ;.X...|. case |
|00003200| 6e 69 6e 3a 20 20 63 61 | 73 65 20 6e 65 71 3a 20 |nin: ca|se neq: |
|00003210| 20 63 61 73 65 20 6e 6e | 65 3a 20 20 63 61 73 65 | case nn|e: case|
|00003220| 20 6e 6c 74 3a 0a 58 09 | 09 09 09 20 20 63 61 73 | nlt:.X.|... cas|
|00003230| 65 20 6e 6c 65 3a 20 20 | 63 61 73 65 20 6e 67 74 |e nle: |case ngt|
|00003240| 3a 20 20 63 61 73 65 20 | 6e 67 65 3a 20 20 63 61 |: case |nge: ca|
|00003250| 73 65 20 6e 6f 72 3a 0a | 58 09 09 09 09 20 20 63 |se nor:.|X.... c|
|00003260| 61 73 65 20 6e 61 6e 64 | 3a 20 20 63 61 73 65 20 |ase nand|: case |
|00003270| 6e 6d 75 6c 3a 20 20 63 | 61 73 65 20 6e 64 69 76 |nmul: c|ase ndiv|
|00003280| 3a 20 20 63 61 73 65 20 | 6e 6d 6f 64 3a 0a 58 09 |: case |nmod:.X.|
|00003290| 09 09 09 20 20 63 61 73 | 65 20 6e 71 75 6f 74 3a |... cas|e nquot:|
|000032a0| 20 20 63 61 73 65 20 6e | 70 6c 75 73 3a 20 20 63 | case n|plus: c|
|000032b0| 61 73 65 20 6e 6d 69 6e | 75 73 3a 20 20 63 61 73 |ase nmin|us: cas|
|000032c0| 65 20 6e 6e 6f 74 3a 0a | 58 09 09 09 09 20 20 63 |e nnot:.|X.... c|
|000032d0| 61 73 65 20 6e 75 6d 69 | 6e 75 73 3a 20 20 63 61 |ase numi|nus: ca|
|000032e0| 73 65 20 6e 75 70 6c 75 | 73 3a 20 20 63 61 73 65 |se nuplu|s: case|
|000032f0| 20 6e 69 6e 64 65 78 3a | 20 20 63 61 73 65 20 6e | nindex:| case n|
|00003300| 73 65 6c 65 63 74 3a 0a | 58 09 09 09 09 20 20 63 |select:.|X.... c|
|00003310| 61 73 65 20 6e 64 65 72 | 65 66 3a 20 20 63 61 73 |ase nder|ef: cas|
|00003320| 65 20 6e 63 61 6c 6c 3a | 20 20 63 61 73 65 20 6e |e ncall:| case n|
|00003330| 69 6e 74 65 67 65 72 3a | 20 20 63 61 73 65 20 6e |integer:| case n|
|00003340| 63 68 61 72 3a 0a 58 09 | 09 09 09 20 20 63 61 73 |char:.X.|... cas|
|00003350| 65 20 6e 69 64 3a 0a 58 | 09 09 09 09 09 75 73 65 |e nid:.X|.....use|
|00003360| 69 6e 73 20 3d 20 74 72 | 75 65 3b 0a 58 09 09 09 |ins = tr|ue;.X...|
|00003370| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|00003380| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 25 73 49 6e |output.f|p, "%sIn|
|00003390| 73 6d 65 6d 28 22 2c 20 | 76 6f 69 64 63 61 73 74 |smem(", |voidcast|
|000033a0| 29 2c 20 50 75 74 6c 28 | 6f 75 74 70 75 74 2c 20 |), Putl(|output, |
|000033b0| 30 29 3b 0a 58 09 09 09 | 09 09 28 76 6f 69 64 29 |0);.X...|..(void)|
|000033c0| 66 70 72 69 6e 74 66 28 | 6f 75 74 70 75 74 2e 66 |fprintf(|output.f|
|000033d0| 70 2c 20 22 28 75 6e 73 | 69 67 6e 65 64 29 28 22 |p, "(uns|igned)("|
|000033e0| 29 2c 20 50 75 74 6c 28 | 6f 75 74 70 75 74 2c 20 |), Putl(|output, |
|000033f0| 30 29 3b 0a 58 09 09 09 | 09 09 65 65 78 70 72 28 |0);.X...|..eexpr(|
|00003400| 74 71 29 3b 0a 58 09 09 | 09 09 09 28 76 6f 69 64 |tq);.X..|...(void|
|00003410| 29 66 70 72 69 6e 74 66 | 28 6f 75 74 70 75 74 2e |)fprintf|(output.|
|00003420| 66 70 2c 20 22 29 2c 20 | 54 6d 70 73 65 74 29 22 |fp, "), |Tmpset)"|
|00003430| 29 2c 20 50 75 74 6c 28 | 6f 75 74 70 75 74 2c 20 |), Putl(|output, |
|00003440| 30 29 3b 0a 58 09 09 09 | 09 09 62 72 65 61 6b 20 |0);.X...|..break |
|00003450| 3b 0a 58 09 09 09 09 20 | 20 64 65 66 61 75 6c 74 |;.X.... | default|
|00003460| 3a 0a 58 09 09 09 09 09 | 43 61 73 65 65 72 72 6f |:.X.....|Caseerro|
|00003470| 72 28 4c 69 6e 65 29 3b | 0a 58 09 09 09 09 7d 0a |r(Line);|.X....}.|
|00003480| 58 09 09 09 09 74 71 20 | 3d 20 74 71 2d 3e 74 6e |X....tq |= tq->tn|
|00003490| 65 78 74 3b 0a 58 09 09 | 09 09 69 66 20 28 74 71 |ext;.X..|..if (tq|
|000034a0| 20 21 3d 20 28 73 74 72 | 75 63 74 20 53 36 31 20 | != (str|uct S61 |
|000034b0| 2a 29 4e 49 4c 29 20 7b | 0a 58 09 09 09 09 09 50 |*)NIL) {|.X.....P|
|000034c0| 75 74 63 68 72 28 27 2c | 27 2c 20 6f 75 74 70 75 |utchr(',|', outpu|
|000034d0| 74 29 2c 50 75 74 63 68 | 72 28 27 5c 6e 27 2c 20 |t),Putch|r('\n', |
|000034e0| 6f 75 74 70 75 74 29 3b | 0a 58 09 09 09 09 09 69 |output);|.X.....i|
|000034f0| 6e 64 65 6e 74 28 29 3b | 0a 58 09 09 09 09 7d 0a |ndent();|.X....}.|
|00003500| 58 09 09 09 7d 0a 58 09 | 09 09 28 76 6f 69 64 29 |X...}.X.|..(void)|
|00003510| 66 70 72 69 6e 74 66 28 | 6f 75 74 70 75 74 2e 66 |fprintf(|output.f|
|00003520| 70 2c 20 22 2c 20 54 6d | 70 73 65 74 29 22 29 2c |p, ", Tm|pset)"),|
|00003530| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00003540| 3b 0a 58 09 09 09 69 66 | 20 28 21 66 6c 61 67 29 |;.X...if| (!flag)|
|00003550| 20 7b 0a 58 09 09 09 09 | 50 75 74 63 68 72 28 27 | {.X....|Putchr('|
|00003560| 29 27 2c 20 6f 75 74 70 | 75 74 29 3b 0a 58 09 09 |)', outp|ut);.X..|
|00003570| 09 09 28 2a 47 31 39 36 | 5f 73 65 74 75 73 65 64 |..(*G196|_setused|
|00003580| 29 20 3d 20 74 72 75 65 | 3b 0a 58 09 09 09 7d 0a |) = true|;.X...}.|
|00003590| 58 09 09 09 64 65 63 72 | 65 6d 65 6e 74 28 29 3b |X...decr|ement();|
|000035a0| 0a 58 09 09 7d 0a 58 09 | 09 62 72 65 61 6b 20 3b |.X..}.X.|.break ;|
|000035b0| 0a 58 09 20 20 63 61 73 | 65 20 6e 6e 69 6c 3a 0a |.X. cas|e nnil:.|
|000035c0| 58 09 09 74 71 20 3d 20 | 74 70 3b 0a 58 09 09 64 |X..tq = |tp;.X..d|
|000035d0| 6f 20 7b 0a 58 09 09 09 | 74 71 20 3d 20 74 71 2d |o {.X...|tq = tq-|
|000035e0| 3e 74 75 70 3b 0a 58 09 | 09 7d 20 77 68 69 6c 65 |>tup;.X.|.} while|
|000035f0| 20 28 21 28 4d 65 6d 62 | 65 72 28 28 75 6e 73 69 | (!(Memb|er((unsi|
|00003600| 67 6e 65 64 29 28 74 71 | 2d 3e 74 74 29 2c 20 43 |gned)(tq|->tt), C|
|00003610| 6f 6e 73 65 74 5b 31 35 | 34 5d 29 29 29 3b 0a 58 |onset[15|4])));.X|
|00003620| 09 09 69 66 20 28 4d 65 | 6d 62 65 72 28 28 75 6e |..if (Me|mber((un|
|00003630| 73 69 67 6e 65 64 29 28 | 74 71 2d 3e 74 74 29 2c |signed)(|tq->tt),|
|00003640| 20 43 6f 6e 73 65 74 5b | 31 35 35 5d 29 29 20 7b | Conset[|155])) {|
|00003650| 0a 58 09 09 09 69 66 20 | 28 74 79 70 65 6f 66 28 |.X...if |(typeof(|
|00003660| 74 71 2d 3e 55 2e 56 34 | 31 2e 74 65 78 70 6c 29 |tq->U.V4|1.texpl)|
|00003670| 20 3d 3d 20 74 79 70 6e | 6f 64 73 2e 41 5b 28 69 | == typn|ods.A[(i|
|00003680| 6e 74 29 28 74 6e 69 6c | 29 5d 29 0a 58 09 09 09 |nt)(tnil|)]).X...|
|00003690| 09 74 71 20 3d 20 74 79 | 70 65 6f 66 28 74 71 2d |.tq = ty|peof(tq-|
|000036a0| 3e 55 2e 56 34 31 2e 74 | 65 78 70 72 29 3b 0a 58 |>U.V41.t|expr);.X|
|000036b0| 09 09 09 65 6c 73 65 0a | 58 09 09 09 09 74 71 20 |...else.|X....tq |
|000036c0| 3d 20 74 79 70 65 6f 66 | 28 74 71 2d 3e 55 2e 56 |= typeof|(tq->U.V|
|000036d0| 34 31 2e 74 65 78 70 6c | 29 3b 0a 58 09 09 09 69 |41.texpl|);.X...i|
|000036e0| 66 20 28 74 71 2d 3e 74 | 74 20 3d 3d 20 6e 70 74 |f (tq->t|t == npt|
|000036f0| 72 29 20 7b 0a 58 09 09 | 09 09 50 75 74 63 68 72 |r) {.X..|..Putchr|
|00003700| 28 27 28 27 2c 20 6f 75 | 74 70 75 74 29 3b 0a 58 |('(', ou|tput);.X|
|00003710| 09 09 09 09 65 74 79 70 | 65 64 65 66 28 74 71 29 |....etyp|edef(tq)|
|00003720| 3b 0a 58 09 09 09 09 50 | 75 74 63 68 72 28 27 29 |;.X....P|utchr(')|
|00003730| 27 2c 20 6f 75 74 70 75 | 74 29 3b 0a 58 09 09 09 |', outpu|t);.X...|
|00003740| 7d 0a 58 09 09 7d 0a 58 | 09 09 28 76 6f 69 64 29 |}.X..}.X|..(void)|
|00003750| 66 70 72 69 6e 74 66 28 | 6f 75 74 70 75 74 2e 66 |fprintf(|output.f|
|00003760| 70 2c 20 22 4e 49 4c 22 | 29 2c 20 50 75 74 6c 28 |p, "NIL"|), Putl(|
|00003770| 6f 75 74 70 75 74 2c 20 | 30 29 3b 0a 58 09 09 62 |output, |0);.X..b|
|00003780| 72 65 61 6b 20 3b 0a 58 | 09 20 20 64 65 66 61 75 |reak ;.X|. defau|
|00003790| 6c 74 3a 0a 58 09 09 43 | 61 73 65 65 72 72 6f 72 |lt:.X..C|aseerror|
|000037a0| 28 4c 69 6e 65 29 3b 0a | 58 09 7d 0a 58 4c 39 39 |(Line);.|X.}.XL99|
|000037b0| 39 3a 0a 58 09 3b 0a 58 | 7d 0a 58 0a 58 20 76 6f |9:.X.;.X|}.X.X vo|
|000037c0| 69 64 0a 58 65 63 6f 6e | 73 74 28 74 70 29 0a 58 |id.Xecon|st(tp).X|
|000037d0| 09 74 72 65 65 70 74 72 | 09 74 70 3b 0a 58 7b 0a |.treeptr|.tp;.X{.|
|000037e0| 58 09 73 79 6d 70 74 72 | 09 73 70 3b 0a 58 0a 58 |X.symptr|.sp;.X.X|
|000037f0| 09 77 68 69 6c 65 20 28 | 74 70 20 21 3d 20 28 73 |.while (|tp != (s|
|00003800| 74 72 75 63 74 20 53 36 | 31 20 2a 29 4e 49 4c 29 |truct S6|1 *)NIL)|
|00003810| 20 7b 0a 58 09 09 73 70 | 20 3d 20 74 70 2d 3e 55 | {.X..sp| = tp->U|
|00003820| 2e 56 31 34 2e 74 69 64 | 6c 2d 3e 55 2e 56 34 33 |.V14.tid|l->U.V43|
|00003830| 2e 74 73 79 6d 3b 0a 58 | 09 09 69 66 20 28 73 70 |.tsym;.X|..if (sp|
|00003840| 2d 3e 55 2e 56 36 2e 6c | 69 64 2d 3e 69 6e 72 65 |->U.V6.l|id->inre|
|00003850| 66 20 3e 20 31 29 0a 58 | 09 09 09 73 70 2d 3e 55 |f > 1).X|...sp->U|
|00003860| 2e 56 36 2e 6c 69 64 20 | 3d 20 6d 6b 72 65 6e 61 |.V6.lid |= mkrena|
|00003870| 6d 65 28 27 58 27 2c 20 | 73 70 2d 3e 55 2e 56 36 |me('X', |sp->U.V6|
|00003880| 2e 6c 69 64 29 3b 0a 58 | 09 09 69 66 20 28 74 70 |.lid);.X|..if (tp|
|00003890| 2d 3e 55 2e 56 31 34 2e | 74 62 69 6e 64 2d 3e 74 |->U.V14.|tbind->t|
|000038a0| 74 20 3d 3d 20 6e 73 74 | 72 69 6e 67 29 20 7b 0a |t == nst|ring) {.|
|000038b0| 58 09 09 09 69 6e 64 65 | 6e 74 28 29 3b 0a 58 09 |X...inde|nt();.X.|
|000038c0| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|000038d0| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 25 73 25 73 |output.f|p, "%s%s|
|000038e0| 25 63 22 2c 20 43 35 30 | 5f 73 74 61 74 69 63 2c |%c", C50|_static,|
|000038f0| 20 63 68 61 72 74 79 70 | 2c 20 74 61 62 31 29 2c | chartyp|, tab1),|
|00003900| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00003910| 3b 0a 58 09 09 09 70 72 | 69 6e 74 69 64 28 73 70 |;.X...pr|intid(sp|
|00003920| 2d 3e 55 2e 56 36 2e 6c | 69 64 29 3b 0a 58 09 09 |->U.V6.l|id);.X..|
|00003930| 09 28 76 6f 69 64 29 66 | 70 72 69 6e 74 66 28 6f |.(void)f|printf(o|
|00003940| 75 74 70 75 74 2e 66 70 | 2c 20 22 5b 5d 09 3d 20 |utput.fp|, "[].= |
|00003950| 22 29 2c 20 50 75 74 6c | 28 6f 75 74 70 75 74 2c |"), Putl|(output,|
|00003960| 20 30 29 3b 0a 58 09 09 | 09 65 65 78 70 72 28 74 | 0);.X..|.eexpr(t|
|00003970| 70 2d 3e 55 2e 56 31 34 | 2e 74 62 69 6e 64 29 3b |p->U.V14|.tbind);|
|00003980| 0a 58 09 09 09 50 75 74 | 63 68 72 28 27 3b 27 2c |.X...Put|chr(';',|
|00003990| 20 6f 75 74 70 75 74 29 | 2c 50 75 74 63 68 72 28 | output)|,Putchr(|
|000039a0| 27 5c 6e 27 2c 20 6f 75 | 74 70 75 74 29 3b 0a 58 |'\n', ou|tput);.X|
|000039b0| 09 09 7d 20 65 6c 73 65 | 20 7b 0a 58 09 09 09 28 |..} else| {.X...(|
|000039c0| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|000039d0| 70 75 74 2e 66 70 2c 20 | 22 25 73 22 2c 20 43 34 |put.fp, |"%s", C4|
|000039e0| 5f 64 65 66 69 6e 65 29 | 2c 20 50 75 74 6c 28 6f |_define)|, Putl(o|
|000039f0| 75 74 70 75 74 2c 20 30 | 29 3b 0a 58 09 09 09 70 |utput, 0|);.X...p|
|00003a00| 72 69 6e 74 69 64 28 73 | 70 2d 3e 55 2e 56 36 2e |rintid(s|p->U.V6.|
|00003a10| 6c 69 64 29 3b 0a 58 09 | 09 09 50 75 74 63 68 72 |lid);.X.|..Putchr|
|00003a20| 28 73 70 61 63 65 2c 20 | 6f 75 74 70 75 74 29 3b |(space, |output);|
|00003a30| 0a 58 09 09 09 65 65 78 | 70 72 28 74 70 2d 3e 55 |.X...eex|pr(tp->U|
|00003a40| 2e 56 31 34 2e 74 62 69 | 6e 64 29 3b 0a 58 09 09 |.V14.tbi|nd);.X..|
|00003a50| 09 50 75 74 63 68 72 28 | 27 5c 6e 27 2c 20 6f 75 |.Putchr(|'\n', ou|
|00003a60| 74 70 75 74 29 3b 0a 58 | 09 09 7d 0a 58 09 09 74 |tput);.X|..}.X..t|
|00003a70| 70 20 3d 20 74 70 2d 3e | 74 6e 65 78 74 3b 0a 58 |p = tp->|tnext;.X|
|00003a80| 09 7d 0a 58 7d 0a 58 0a | 58 76 6f 69 64 20 65 74 |.}.X}.X.|Xvoid et|
|00003a90| 79 70 65 64 65 66 28 29 | 3b 0a 58 0a 58 76 6f 69 |ypedef()|;.X.Xvoi|
|00003aa0| 64 20 65 74 64 65 66 28 | 29 3b 0a 58 0a 58 20 76 |d etdef(|);.X.X v|
|00003ab0| 6f 69 64 0a 58 65 74 72 | 61 6e 67 65 28 74 70 29 |oid.Xetr|ange(tp)|
|00003ac0| 0a 58 09 74 72 65 65 70 | 74 72 09 74 70 3b 0a 58 |.X.treep|tr.tp;.X|
|00003ad0| 7b 0a 58 09 69 6e 74 65 | 67 65 72 09 6c 6f 2c 20 |{.X.inte|ger.lo, |
|00003ae0| 68 69 3b 0a 58 09 72 65 | 67 69 73 74 65 72 20 75 |hi;.X.re|gister u|
|00003af0| 6e 73 69 67 6e 65 64 20 | 63 68 61 72 09 69 3b 0a |nsigned |char.i;.|
|00003b00| 58 0a 58 09 6c 6f 20 3d | 20 63 6c 6f 77 65 72 28 |X.X.lo =| clower(|
|00003b10| 74 70 29 3b 0a 58 09 68 | 69 20 3d 20 63 75 70 70 |tp);.X.h|i = cupp|
|00003b20| 65 72 28 74 70 29 3b 0a | 58 09 7b 0a 58 09 09 75 |er(tp);.|X.{.X..u|
|00003b30| 6e 73 69 67 6e 65 64 20 | 63 68 61 72 09 42 35 31 |nsigned |char.B51|
|00003b40| 20 3d 20 31 2c 0a 58 09 | 09 09 42 35 32 20 3d 20 | = 1,.X.|..B52 = |
|00003b50| 6e 6d 61 63 68 64 65 66 | 73 3b 0a 58 0a 58 09 09 |nmachdef|s;.X.X..|
|00003b60| 69 66 20 28 42 35 31 20 | 3c 3d 20 42 35 32 29 0a |if (B51 |<= B52).|
|00003b70| 58 09 09 09 66 6f 72 20 | 28 69 20 3d 20 42 35 31 |X...for |(i = B51|
|00003b80| 3b 20 3b 20 69 2b 2b 29 | 20 7b 0a 58 09 09 09 09 |; ; i++)| {.X....|
|00003b90| 7b 0a 58 09 09 09 09 09 | 72 65 67 69 73 74 65 72 |{.X.....|register|
|00003ba0| 20 73 74 72 75 63 74 20 | 53 31 39 33 20 2a 57 35 | struct |S193 *W5|
|00003bb0| 33 20 3d 20 26 6d 61 63 | 68 64 65 66 73 2e 41 5b |3 = &mac|hdefs.A[|
|00003bc0| 69 20 2d 20 31 5d 3b 0a | 58 0a 58 09 09 09 09 09 |i - 1];.|X.X.....|
|00003bd0| 69 66 20 28 28 6c 6f 20 | 3e 3d 20 57 35 33 2d 3e |if ((lo |>= W53->|
|00003be0| 6c 6f 6c 69 6d 29 20 26 | 26 20 28 68 69 20 3c 3d |lolim) &|& (hi <=|
|00003bf0| 20 57 35 33 2d 3e 68 69 | 6c 69 6d 29 29 20 7b 0a | W53->hi|lim)) {.|
|00003c00| 58 09 09 09 09 09 09 70 | 72 69 6e 74 74 6f 6b 28 |X......p|rinttok(|
|00003c10| 57 35 33 2d 3e 74 79 70 | 73 74 72 29 3b 0a 58 09 |W53->typ|str);.X.|
|00003c20| 09 09 09 09 09 67 6f 74 | 6f 20 4c 39 39 39 3b 0a |.....got|o L999;.|
|00003c30| 58 09 09 09 09 09 7d 0a | 58 09 09 09 09 7d 0a 58 |X.....}.|X....}.X|
|00003c40| 09 09 09 09 69 66 20 28 | 69 20 3d 3d 20 42 35 32 |....if (|i == B52|
|00003c50| 29 20 62 72 65 61 6b 3b | 0a 58 09 09 09 7d 0a 58 |) break;|.X...}.X|
|00003c60| 09 7d 0a 58 09 66 61 74 | 61 6c 28 65 72 61 6e 67 |.}.X.fat|al(erang|
|00003c70| 65 29 3b 0a 58 4c 39 39 | 39 3a 0a 58 09 3b 0a 58 |e);.XL99|9:.X.;.X|
|00003c80| 7d 0a 58 0a 58 20 76 6f | 69 64 0a 58 70 72 69 6e |}.X.X vo|id.Xprin|
|00003c90| 74 73 75 66 28 69 70 29 | 0a 58 09 69 64 70 74 72 |tsuf(ip)|.X.idptr|
|00003ca0| 09 69 70 3b 0a 58 7b 0a | 58 09 74 6f 6b 6e 62 75 |.ip;.X{.|X.toknbu|
|00003cb0| 66 09 77 3b 0a 58 09 74 | 6f 6b 6e 69 64 78 09 69 |f.w;.X.t|oknidx.i|
|00003cc0| 2c 20 6a 3b 0a 58 0a 58 | 09 67 65 74 74 6f 6b 6e |, j;.X.X|.gettokn|
|00003cd0| 28 69 70 2d 3e 69 73 74 | 72 2c 20 26 77 29 3b 0a |(ip->ist|r, &w);.|
|00003ce0| 58 09 69 20 3d 20 31 3b | 0a 58 09 6a 20 3d 20 69 |X.i = 1;|.X.j = i|
|00003cf0| 3b 0a 58 09 77 68 69 6c | 65 20 28 77 2e 41 5b 69 |;.X.whil|e (w.A[i|
|00003d00| 20 2d 20 31 5d 20 21 3d | 20 6e 75 6c 6c 29 20 7b | - 1] !=| null) {|
|00003d10| 0a 58 09 09 69 66 20 28 | 77 2e 41 5b 69 20 2d 20 |.X..if (|w.A[i - |
|00003d20| 31 5d 20 3d 3d 20 27 2e | 27 29 0a 58 09 09 09 6a |1] == '.|').X...j|
|00003d30| 20 3d 20 69 3b 0a 58 09 | 09 69 20 3d 20 69 20 2b | = i;.X.|.i = i +|
|00003d40| 20 31 3b 0a 58 09 7d 0a | 58 09 69 66 20 28 77 2e | 1;.X.}.|X.if (w.|
|00003d50| 41 5b 6a 20 2d 20 31 5d | 20 3d 3d 20 27 2e 27 29 |A[j - 1]| == '.')|
|00003d60| 0a 58 09 09 6a 20 3d 20 | 6a 20 2b 20 31 3b 0a 58 |.X..j = |j + 1;.X|
|00003d70| 09 77 68 69 6c 65 20 28 | 77 2e 41 5b 6a 20 2d 20 |.while (|w.A[j - |
|00003d80| 31 5d 20 21 3d 20 6e 75 | 6c 6c 29 20 7b 0a 58 09 |1] != nu|ll) {.X.|
|00003d90| 09 50 75 74 63 68 72 28 | 77 2e 41 5b 6a 20 2d 20 |.Putchr(|w.A[j - |
|00003da0| 31 5d 2c 20 6f 75 74 70 | 75 74 29 3b 0a 58 09 09 |1], outp|ut);.X..|
|00003db0| 6a 20 3d 20 6a 20 2b 20 | 31 3b 0a 58 09 7d 0a 58 |j = j + |1;.X.}.X|
|00003dc0| 7d 0a 58 0a 58 20 76 6f | 69 64 0a 58 65 74 64 65 |}.X.X vo|id.Xetde|
|00003dd0| 66 28 75 69 64 2c 20 74 | 70 29 0a 58 09 69 64 70 |f(uid, t|p).X.idp|
|00003de0| 74 72 09 75 69 64 3b 0a | 58 09 74 72 65 65 70 74 |tr.uid;.|X.treept|
|00003df0| 72 09 74 70 3b 0a 58 7b | 0a 58 09 69 6e 74 65 67 |r.tp;.X{|.X.integ|
|00003e00| 65 72 09 69 3b 0a 58 09 | 74 72 65 65 70 74 72 09 |er.i;.X.|treeptr.|
|00003e10| 74 71 3b 0a 58 0a 58 09 | 73 77 69 74 63 68 20 28 |tq;.X.X.|switch (|
|00003e20| 74 70 2d 3e 74 74 29 20 | 7b 0a 58 09 20 20 63 61 |tp->tt) |{.X. ca|
|00003e30| 73 65 20 6e 69 64 3a 0a | 58 09 09 70 72 69 6e 74 |se nid:.|X..print|
|00003e40| 69 64 28 74 70 2d 3e 55 | 2e 56 34 33 2e 74 73 79 |id(tp->U|.V43.tsy|
|00003e50| 6d 2d 3e 55 2e 56 36 2e | 6c 69 64 29 3b 0a 58 09 |m->U.V6.|lid);.X.|
|00003e60| 09 62 72 65 61 6b 20 3b | 0a 58 09 20 20 63 61 73 |.break ;|.X. cas|
|00003e70| 65 20 6e 70 74 72 3a 0a | 58 09 09 74 71 20 3d 20 |e nptr:.|X..tq = |
|00003e80| 74 79 70 65 6f 66 28 74 | 70 2d 3e 55 2e 56 31 36 |typeof(t|p->U.V16|
|00003e90| 2e 74 70 74 72 69 64 29 | 3b 0a 58 09 09 69 66 20 |.tptrid)|;.X..if |
|00003ea0| 28 74 71 2d 3e 74 74 20 | 3d 3d 20 6e 72 65 63 6f |(tq->tt |== nreco|
|00003eb0| 72 64 29 20 7b 0a 58 09 | 09 09 28 76 6f 69 64 29 |rd) {.X.|..(void)|
|00003ec0| 66 70 72 69 6e 74 66 28 | 6f 75 74 70 75 74 2e 66 |fprintf(|output.f|
|00003ed0| 70 2c 20 22 73 74 72 75 | 63 74 20 22 29 2c 20 50 |p, "stru|ct "), P|
|00003ee0| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00003ef0| 58 09 09 09 70 72 69 6e | 74 69 64 28 74 71 2d 3e |X...prin|tid(tq->|
|00003f00| 55 2e 56 32 31 2e 74 75 | 69 64 29 3b 0a 58 09 09 |U.V21.tu|id);.X..|
|00003f10| 7d 20 65 6c 73 65 0a 58 | 09 09 09 70 72 69 6e 74 |} else.X|...print|
|00003f20| 69 64 28 74 70 2d 3e 55 | 2e 56 31 36 2e 74 70 74 |id(tp->U|.V16.tpt|
|00003f30| 72 69 64 2d 3e 55 2e 56 | 34 33 2e 74 73 79 6d 2d |rid->U.V|43.tsym-|
|00003f40| 3e 55 2e 56 36 2e 6c 69 | 64 29 3b 0a 58 09 09 28 |>U.V6.li|d);.X..(|
|00003f50| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|00003f60| 70 75 74 2e 66 70 2c 20 | 22 20 2a 22 29 2c 20 50 |put.fp, |" *"), P|
|00003f70| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00003f80| 58 09 09 62 72 65 61 6b | 20 3b 0a 58 09 20 20 63 |X..break| ;.X. c|
|00003f90| 61 73 65 20 6e 73 63 61 | 6c 61 72 3a 0a 58 09 09 |ase nsca|lar:.X..|
|00003fa0| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00003fb0| 74 70 75 74 2e 66 70 2c | 20 22 65 6e 75 6d 20 7b |tput.fp,| "enum {|
|00003fc0| 20 22 29 2c 20 50 75 74 | 6c 28 6f 75 74 70 75 74 | "), Put|l(output|
|00003fd0| 2c 20 30 29 3b 0a 58 09 | 09 69 6e 63 72 65 6d 65 |, 0);.X.|.increme|
|00003fe0| 6e 74 28 29 3b 0a 58 09 | 09 74 70 20 3d 20 74 70 |nt();.X.|.tp = tp|
|00003ff0| 2d 3e 55 2e 56 31 37 2e | 74 73 63 61 6c 69 64 3b |->U.V17.|tscalid;|
|00004000| 0a 58 09 09 69 66 20 28 | 74 70 2d 3e 55 2e 56 34 |.X..if (|tp->U.V4|
|00004010| 33 2e 74 73 79 6d 2d 3e | 55 2e 56 36 2e 6c 69 64 |3.tsym->|U.V6.lid|
|00004020| 2d 3e 69 6e 72 65 66 20 | 3e 20 31 29 0a 58 09 09 |->inref |> 1).X..|
|00004030| 09 74 70 2d 3e 55 2e 56 | 34 33 2e 74 73 79 6d 2d |.tp->U.V|43.tsym-|
|00004040| 3e 55 2e 56 36 2e 6c 69 | 64 20 3d 20 6d 6b 72 65 |>U.V6.li|d = mkre|
|00004050| 6e 61 6d 65 28 27 45 27 | 2c 20 74 70 2d 3e 55 2e |name('E'|, tp->U.|
|00004060| 56 34 33 2e 74 73 79 6d | 2d 3e 55 2e 56 36 2e 6c |V43.tsym|->U.V6.l|
|00004070| 69 64 29 3b 0a 58 09 09 | 70 72 69 6e 74 69 64 28 |id);.X..|printid(|
|00004080| 74 70 2d 3e 55 2e 56 34 | 33 2e 74 73 79 6d 2d 3e |tp->U.V4|3.tsym->|
|00004090| 55 2e 56 36 2e 6c 69 64 | 29 3b 0a 58 09 09 69 20 |U.V6.lid|);.X..i |
|000040a0| 3d 20 31 3b 0a 58 09 09 | 77 68 69 6c 65 20 28 74 |= 1;.X..|while (t|
|000040b0| 70 2d 3e 74 6e 65 78 74 | 20 21 3d 20 28 73 74 72 |p->tnext| != (str|
|000040c0| 75 63 74 20 53 36 31 20 | 2a 29 4e 49 4c 29 20 7b |uct S61 |*)NIL) {|
|000040d0| 0a 58 09 09 09 69 66 20 | 28 69 20 3e 3d 20 34 29 |.X...if |(i >= 4)|
|000040e0| 20 7b 0a 58 09 09 09 09 | 50 75 74 63 68 72 28 27 | {.X....|Putchr('|
|000040f0| 2c 27 2c 20 6f 75 74 70 | 75 74 29 2c 50 75 74 63 |,', outp|ut),Putc|
|00004100| 68 72 28 27 5c 6e 27 2c | 20 6f 75 74 70 75 74 29 |hr('\n',| output)|
|00004110| 3b 0a 58 09 09 09 09 69 | 6e 64 65 6e 74 28 29 3b |;.X....i|ndent();|
|00004120| 0a 58 09 09 09 09 69 20 | 3d 20 31 3b 0a 58 09 09 |.X....i |= 1;.X..|
|00004130| 09 7d 20 65 6c 73 65 20 | 7b 0a 58 09 09 09 09 28 |.} else |{.X....(|
|00004140| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|00004150| 70 75 74 2e 66 70 2c 20 | 22 2c 20 22 29 2c 20 50 |put.fp, |", "), P|
|00004160| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00004170| 58 09 09 09 09 69 20 3d | 20 69 20 2b 20 31 3b 0a |X....i =| i + 1;.|
|00004180| 58 09 09 09 7d 0a 58 09 | 09 09 74 70 20 3d 20 74 |X...}.X.|..tp = t|
|00004190| 70 2d 3e 74 6e 65 78 74 | 3b 0a 58 09 09 09 69 66 |p->tnext|;.X...if|
|000041a0| 20 28 74 70 2d 3e 55 2e | 56 34 33 2e 74 73 79 6d | (tp->U.|V43.tsym|
|000041b0| 2d 3e 55 2e 56 36 2e 6c | 69 64 2d 3e 69 6e 72 65 |->U.V6.l|id->inre|
|000041c0| 66 20 3e 20 31 29 0a 58 | 09 09 09 09 74 70 2d 3e |f > 1).X|....tp->|
|000041d0| 55 2e 56 34 33 2e 74 73 | 79 6d 2d 3e 55 2e 56 36 |U.V43.ts|ym->U.V6|
|000041e0| 2e 6c 69 64 20 3d 20 6d | 6b 72 65 6e 61 6d 65 28 |.lid = m|krename(|
|000041f0| 27 45 27 2c 20 74 70 2d | 3e 55 2e 56 34 33 2e 74 |'E', tp-|>U.V43.t|
|00004200| 73 79 6d 2d 3e 55 2e 56 | 36 2e 6c 69 64 29 3b 0a |sym->U.V|6.lid);.|
|00004210| 58 09 09 09 70 72 69 6e | 74 69 64 28 74 70 2d 3e |X...prin|tid(tp->|
|00004220| 55 2e 56 34 33 2e 74 73 | 79 6d 2d 3e 55 2e 56 36 |U.V43.ts|ym->U.V6|
|00004230| 2e 6c 69 64 29 3b 0a 58 | 09 09 7d 0a 58 09 09 64 |.lid);.X|..}.X..d|
|00004240| 65 63 72 65 6d 65 6e 74 | 28 29 3b 0a 58 09 09 28 |ecrement|();.X..(|
|00004250| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|00004260| 70 75 74 2e 66 70 2c 20 | 22 20 7d 20 22 29 2c 20 |put.fp, |" } "), |
|00004270| 50 75 74 6c 28 6f 75 74 | 70 75 74 2c 20 30 29 3b |Putl(out|put, 0);|
|00004280| 0a 58 09 09 62 72 65 61 | 6b 20 3b 0a 58 09 20 20 |.X..brea|k ;.X. |
|00004290| 63 61 73 65 20 6e 73 75 | 62 72 61 6e 67 65 3a 0a |case nsu|brange:.|
|000042a0| 58 09 09 74 71 20 3d 20 | 74 79 70 65 6f 66 28 74 |X..tq = |typeof(t|
|000042b0| 70 2d 3e 55 2e 56 31 39 | 2e 74 6c 6f 29 3b 0a 58 |p->U.V19|.tlo);.X|
|000042c0| 09 09 69 66 20 28 74 71 | 20 3d 3d 20 74 79 70 6e |..if (tq| == typn|
|000042d0| 6f 64 73 2e 41 5b 28 69 | 6e 74 29 28 74 69 6e 74 |ods.A[(i|nt)(tint|
|000042e0| 65 67 65 72 29 5d 29 0a | 58 09 09 09 65 74 72 61 |eger)]).|X...etra|
|000042f0| 6e 67 65 28 74 70 29 3b | 0a 58 09 09 65 6c 73 65 |nge(tp);|.X..else|
|00004300| 20 7b 0a 58 09 09 09 69 | 66 20 28 74 71 2d 3e 74 | {.X...i|f (tq->t|
|00004310| 75 70 2d 3e 74 74 20 3d | 3d 20 6e 74 79 70 65 29 |up->tt =|= ntype)|
|00004320| 0a 58 09 09 09 09 74 71 | 20 3d 20 74 71 2d 3e 74 |.X....tq| = tq->t|
|00004330| 75 70 2d 3e 55 2e 56 31 | 34 2e 74 69 64 6c 3b 0a |up->U.V1|4.tidl;.|
|00004340| 58 09 09 09 65 74 64 65 | 66 28 28 69 64 70 74 72 |X...etde|f((idptr|
|00004350| 29 4e 49 4c 2c 20 74 71 | 29 3b 0a 58 09 09 7d 0a |)NIL, tq|);.X..}.|
|00004360| 58 09 09 62 72 65 61 6b | 20 3b 0a 58 09 20 20 63 |X..break| ;.X. c|
|00004370| 61 73 65 20 6e 66 69 65 | 6c 64 3a 0a 58 09 09 65 |ase nfie|ld:.X..e|
|00004380| 74 64 65 66 28 28 69 64 | 70 74 72 29 4e 49 4c 2c |tdef((id|ptr)NIL,|
|00004390| 20 74 70 2d 3e 55 2e 56 | 31 34 2e 74 62 69 6e 64 | tp->U.V|14.tbind|
|000043a0| 29 3b 0a 58 09 09 50 75 | 74 63 68 72 28 74 61 62 |);.X..Pu|tchr(tab|
|000043b0| 31 2c 20 6f 75 74 70 75 | 74 29 3b 0a 58 09 09 74 |1, outpu|t);.X..t|
|000043c0| 70 20 3d 20 74 70 2d 3e | 55 2e 56 31 34 2e 74 69 |p = tp->|U.V14.ti|
|000043d0| 64 6c 3b 0a 58 09 09 69 | 66 20 28 75 69 64 20 21 |dl;.X..i|f (uid !|
|000043e0| 3d 20 28 73 74 72 75 63 | 74 20 53 35 39 20 2a 29 |= (struc|t S59 *)|
|000043f0| 4e 49 4c 29 0a 58 09 09 | 09 74 70 2d 3e 55 2e 56 |NIL).X..|.tp->U.V|
|00004400| 34 33 2e 74 73 79 6d 2d | 3e 55 2e 56 36 2e 6c 69 |43.tsym-|>U.V6.li|
|00004410| 64 20 3d 20 6d 6b 63 6f | 6e 63 28 27 2e 27 2c 20 |d = mkco|nc('.', |
|00004420| 75 69 64 2c 20 74 70 2d | 3e 55 2e 56 34 33 2e 74 |uid, tp-|>U.V43.t|
|00004430| 73 79 6d 2d 3e 55 2e 56 | 36 2e 6c 69 64 29 3b 0a |sym->U.V|6.lid);.|
|00004440| 58 09 09 70 72 69 6e 74 | 73 75 66 28 74 70 2d 3e |X..print|suf(tp->|
|00004450| 55 2e 56 34 33 2e 74 73 | 79 6d 2d 3e 55 2e 56 36 |U.V43.ts|ym->U.V6|
|00004460| 2e 6c 69 64 29 3b 0a 58 | 09 09 69 20 3d 20 31 3b |.lid);.X|..i = 1;|
|00004470| 0a 58 09 09 77 68 69 6c | 65 20 28 74 70 2d 3e 74 |.X..whil|e (tp->t|
|00004480| 6e 65 78 74 20 21 3d 20 | 28 73 74 72 75 63 74 20 |next != |(struct |
|00004490| 53 36 31 20 2a 29 4e 49 | 4c 29 20 7b 0a 58 09 09 |S61 *)NI|L) {.X..|
|000044a0| 09 69 66 20 28 69 20 3e | 3d 20 34 29 20 7b 0a 58 |.if (i >|= 4) {.X|
|000044b0| 09 09 09 09 50 75 74 63 | 68 72 28 27 2c 27 2c 20 |....Putc|hr(',', |
|000044c0| 6f 75 74 70 75 74 29 2c | 50 75 74 63 68 72 28 27 |output),|Putchr('|
|000044d0| 5c 6e 27 2c 20 6f 75 74 | 70 75 74 29 3b 0a 58 09 |\n', out|put);.X.|
|000044e0| 09 09 09 69 6e 64 65 6e | 74 28 29 3b 0a 58 09 09 |...inden|t();.X..|
|000044f0| 09 09 50 75 74 63 68 72 | 28 74 61 62 31 2c 20 6f |..Putchr|(tab1, o|
|00004500| 75 74 70 75 74 29 3b 0a | 58 09 09 09 09 69 20 3d |utput);.|X....i =|
|00004510| 20 31 3b 0a 58 09 09 09 | 7d 20 65 6c 73 65 20 7b | 1;.X...|} else {|
|00004520| 0a 58 09 09 09 09 28 76 | 6f 69 64 29 66 70 72 69 |.X....(v|oid)fpri|
|00004530| 6e 74 66 28 6f 75 74 70 | 75 74 2e 66 70 2c 20 22 |ntf(outp|ut.fp, "|
|00004540| 2c 20 22 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |, "), Pu|tl(outpu|
|00004550| 74 2c 20 30 29 3b 0a 58 | 09 09 09 09 69 20 3d 20 |t, 0);.X|....i = |
|00004560| 69 20 2b 20 31 3b 0a 58 | 09 09 09 7d 0a 58 09 09 |i + 1;.X|...}.X..|
|00004570| 09 74 70 20 3d 20 74 70 | 2d 3e 74 6e 65 78 74 3b |.tp = tp|->tnext;|
|00004580| 0a 58 09 09 09 69 66 20 | 28 75 69 64 20 21 3d 20 |.X...if |(uid != |
|00004590| 28 73 74 72 75 63 74 20 | 53 35 39 20 2a 29 4e 49 |(struct |S59 *)NI|
|000045a0| 4c 29 0a 58 09 09 09 09 | 74 70 2d 3e 55 2e 56 34 |L).X....|tp->U.V4|
|000045b0| 33 2e 74 73 79 6d 2d 3e | 55 2e 56 36 2e 6c 69 64 |3.tsym->|U.V6.lid|
|000045c0| 20 3d 20 6d 6b 63 6f 6e | 63 28 27 2e 27 2c 20 75 | = mkcon|c('.', u|
|000045d0| 69 64 2c 20 74 70 2d 3e | 55 2e 56 34 33 2e 74 73 |id, tp->|U.V43.ts|
|000045e0| 79 6d 2d 3e 55 2e 56 36 | 2e 6c 69 64 29 3b 0a 58 |ym->U.V6|.lid);.X|
|000045f0| 09 09 09 70 72 69 6e 74 | 73 75 66 28 74 70 2d 3e |...print|suf(tp->|
|00004600| 55 2e 56 34 33 2e 74 73 | 79 6d 2d 3e 55 2e 56 36 |U.V43.ts|ym->U.V6|
|00004610| 2e 6c 69 64 29 3b 0a 58 | 09 09 7d 0a 58 09 09 50 |.lid);.X|..}.X..P|
|00004620| 75 74 63 68 72 28 27 3b | 27 2c 20 6f 75 74 70 75 |utchr(';|', outpu|
|00004630| 74 29 2c 50 75 74 63 68 | 72 28 27 5c 6e 27 2c 20 |t),Putch|r('\n', |
|00004640| 6f 75 74 70 75 74 29 3b | 0a 58 09 09 62 72 65 61 |output);|.X..brea|
|00004650| 6b 20 3b 0a 58 09 20 20 | 63 61 73 65 20 6e 72 65 |k ;.X. |case nre|
|00004660| 63 6f 72 64 3a 0a 58 09 | 09 28 76 6f 69 64 29 66 |cord:.X.|.(void)f|
|00004670| 70 72 69 6e 74 66 28 6f | 75 74 70 75 74 2e 66 70 |printf(o|utput.fp|
|00004680| 2c 20 22 73 74 72 75 63 | 74 20 22 29 2c 20 50 75 |, "struc|t "), Pu|
|00004690| 74 6c 28 6f 75 74 70 75 | 74 2c 20 30 29 3b 0a 58 |tl(outpu|t, 0);.X|
|000046a0| 09 09 69 66 20 28 74 70 | 2d 3e 55 2e 56 32 31 2e |..if (tp|->U.V21.|
|000046b0| 74 75 69 64 20 3d 3d 20 | 28 73 74 72 75 63 74 20 |tuid == |(struct |
|000046c0| 53 35 39 20 2a 29 4e 49 | 4c 29 0a 58 09 09 09 74 |S59 *)NI|L).X...t|
|000046d0| 70 2d 3e 55 2e 56 32 31 | 2e 74 75 69 64 20 3d 20 |p->U.V21|.tuid = |
|000046e0| 75 69 64 3b 0a 58 09 09 | 65 6c 73 65 0a 58 09 09 |uid;.X..|else.X..|
|000046f0| 09 69 66 20 28 75 69 64 | 20 3d 3d 20 28 73 74 72 |.if (uid| == (str|
|00004700| 75 63 74 20 53 35 39 20 | 2a 29 4e 49 4c 29 0a 58 |uct S59 |*)NIL).X|
|00004710| 09 09 09 09 70 72 69 6e | 74 69 64 28 74 70 2d 3e |....prin|tid(tp->|
|00004720| 55 2e 56 32 31 2e 74 75 | 69 64 29 3b 0a 58 09 09 |U.V21.tu|id);.X..|
|00004730| 28 76 6f 69 64 29 66 70 | 72 69 6e 74 66 28 6f 75 |(void)fp|rintf(ou|
|00004740| 74 70 75 74 2e 66 70 2c | 20 22 20 7b 5c 6e 22 29 |tput.fp,| " {\n")|
|00004750| 2c 20 50 75 74 6c 28 6f | 75 74 70 75 74 2c 20 31 |, Putl(o|utput, 1|
|00004760| 29 3b 0a 58 09 09 69 6e | 63 72 65 6d 65 6e 74 28 |);.X..in|crement(|
|00004770| 29 3b 0a 58 09 09 69 66 | 20 28 28 74 70 2d 3e 55 |);.X..if| ((tp->U|
|00004780| 2e 56 32 31 2e 74 66 6c | 69 73 74 20 3d 3d 20 28 |.V21.tfl|ist == (|
|00004790| 73 74 72 75 63 74 20 53 | 36 31 20 2a 29 4e 49 4c |struct S|61 *)NIL|
|000047a0| 29 20 26 26 20 28 74 70 | 2d 3e 55 2e 56 32 31 2e |) && (tp|->U.V21.|
|000047b0| 74 76 6c 69 73 74 20 3d | 3d 20 28 73 74 72 75 63 |tvlist =|= (struc|
|000047c0| 74 20 53 36 31 20 2a 29 | 4e 49 4c 29 29 20 7b 0a |t S61 *)|NIL)) {.|
|000047d0| 58 09 09 09 69 6e 64 65 | 6e 74 28 29 3b 0a 58 09 |X...inde|nt();.X.|
|000047e0| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|000047f0| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 25 73 25 63 |output.f|p, "%s%c|
|00004800| 64 75 6d 6d 79 3b 5c 6e | 22 2c 20 69 6e 74 74 79 |dummy;\n|", intty|
|00004810| 70 2c 20 74 61 62 31 29 | 2c 20 50 75 74 6c 28 6f |p, tab1)|, Putl(o|
|00004820| 75 74 70 75 74 2c 20 31 | 29 3b 0a 58 09 09 7d 0a |utput, 1|);.X..}.|
|00004830| 58 09 09 74 71 20 3d 20 | 74 70 2d 3e 55 2e 56 32 |X..tq = |tp->U.V2|
|00004840| 31 2e 74 66 6c 69 73 74 | 3b 0a 58 09 09 77 68 69 |1.tflist|;.X..whi|
|00004850| 6c 65 20 28 74 71 20 21 | 3d 20 28 73 74 72 75 63 |le (tq !|= (struc|
|00004860| 74 20 53 36 31 20 2a 29 | 4e 49 4c 29 20 7b 0a 58 |t S61 *)|NIL) {.X|
|00004870| 09 09 09 69 6e 64 65 6e | 74 28 29 3b 0a 58 09 09 |...inden|t();.X..|
|00004880| 09 65 74 64 65 66 28 75 | 69 64 2c 20 74 71 29 3b |.etdef(u|id, tq);|
|00004890| 0a 58 09 09 09 74 71 20 | 3d 20 74 71 2d 3e 74 6e |.X...tq |= tq->tn|
|000048a0| 65 78 74 3b 0a 58 09 09 | 7d 0a 58 09 09 69 66 20 |ext;.X..|}.X..if |
|000048b0| 28 74 70 2d 3e 55 2e 56 | 32 31 2e 74 76 6c 69 73 |(tp->U.V|21.tvlis|
|000048c0| 74 20 21 3d 20 28 73 74 | 72 75 63 74 20 53 36 31 |t != (st|ruct S61|
|000048d0| 20 2a 29 4e 49 4c 29 20 | 7b 0a 58 09 09 09 69 6e | *)NIL) |{.X...in|
|000048e0| 64 65 6e 74 28 29 3b 0a | 58 09 09 09 28 76 6f 69 |dent();.|X...(voi|
|000048f0| 64 29 66 70 72 69 6e 74 | 66 28 6f 75 74 70 75 74 |d)fprint|f(output|
|00004900| 2e 66 70 2c 20 22 75 6e | 69 6f 6e 20 7b 5c 6e 22 |.fp, "un|ion {\n"|
|00004910| 29 2c 20 50 75 74 6c 28 | 6f 75 74 70 75 74 2c 20 |), Putl(|output, |
|00004920| 31 29 3b 0a 58 09 09 09 | 69 6e 63 72 65 6d 65 6e |1);.X...|incremen|
|00004930| 74 28 29 3b 0a 58 09 09 | 09 74 71 20 3d 20 74 70 |t();.X..|.tq = tp|
|00004940| 2d 3e 55 2e 56 32 31 2e | 74 76 6c 69 73 74 3b 0a |->U.V21.|tvlist;.|
|00004950| 58 09 09 09 77 68 69 6c | 65 20 28 74 71 20 21 3d |X...whil|e (tq !=|
|00004960| 20 28 73 74 72 75 63 74 | 20 53 36 31 20 2a 29 4e | (struct| S61 *)N|
|00004970| 49 4c 29 20 7b 0a 58 09 | 09 09 09 69 66 20 28 28 |IL) {.X.|...if ((|
|00004980| 74 71 2d 3e 55 2e 56 32 | 30 2e 74 76 72 6e 74 2d |tq->U.V2|0.tvrnt-|
|00004990| 3e 55 2e 56 32 31 2e 74 | 66 6c 69 73 74 20 21 3d |>U.V21.t|flist !=|
|000049a0| 20 28 73 74 72 75 63 74 | 20 53 36 31 20 2a 29 4e | (struct| S61 *)N|
|000049b0| 49 4c 29 20 7c 7c 20 28 | 74 71 2d 3e 55 2e 56 32 |IL) || (|tq->U.V2|
|000049c0| 30 2e 74 76 72 6e 74 2d | 3e 55 2e 56 32 31 2e 74 |0.tvrnt-|>U.V21.t|
|000049d0| 76 6c 69 73 74 20 21 3d | 20 28 73 74 72 75 63 74 |vlist !=| (struct|
|000049e0| 20 53 36 31 20 2a 29 4e | 49 4c 29 29 20 7b 0a 58 | S61 *)N|IL)) {.X|
|000049f0| 09 09 09 09 09 69 6e 64 | 65 6e 74 28 29 3b 0a 58 |.....ind|ent();.X|
|00004a00| 09 09 09 09 09 69 66 20 | 28 75 69 64 20 3d 3d 20 |.....if |(uid == |
|00004a10| 28 73 74 72 75 63 74 20 | 53 35 39 20 2a 29 4e 49 |(struct |S59 *)NI|
|00004a20| 4c 29 0a 58 09 09 09 09 | 09 09 65 74 64 65 66 28 |L).X....|..etdef(|
|00004a30| 6d 6b 76 72 6e 74 28 29 | 2c 20 74 71 2d 3e 55 2e |mkvrnt()|, tq->U.|
|00004a40| 56 32 30 2e 74 76 72 6e | 74 29 3b 0a 58 09 09 09 |V20.tvrn|t);.X...|
|00004a50| 09 09 65 6c 73 65 0a 58 | 09 09 09 09 09 09 65 74 |..else.X|......et|
|00004a60| 64 65 66 28 6d 6b 63 6f | 6e 63 28 27 2e 27 2c 20 |def(mkco|nc('.', |
|00004a70| 75 69 64 2c 20 6d 6b 76 | 72 6e 74 28 29 29 2c 20 |uid, mkv|rnt()), |
|00004a80| 74 71 2d 3e 55 2e 56 32 | 30 2e 74 76 72 6e 74 29 |tq->U.V2|0.tvrnt)|
|00004a90| 3b 0a 58 09 09 09 09 09 | 50 75 74 63 68 72 28 27 |;.X.....|Putchr('|
|00004aa0| 3b 27 2c 20 6f 75 74 70 | 75 74 29 2c 50 75 74 63 |;', outp|ut),Putc|
|00004ab0| 68 72 28 27 5c 6e 27 2c | 20 6f 75 74 70 75 74 29 |hr('\n',| output)|
|00004ac0| 3b 0a 58 09 09 09 09 7d | 0a 58 09 09 09 09 74 71 |;.X....}|.X....tq|
|00004ad0| 20 3d 20 74 71 2d 3e 74 | 6e 65 78 74 3b 0a 58 09 | = tq->t|next;.X.|
|00004ae0| 09 09 7d 0a 58 09 09 09 | 64 65 63 72 65 6d 65 6e |..}.X...|decremen|
|00004af0| 74 28 29 3b 0a 58 09 09 | 09 69 6e 64 65 6e 74 28 |t();.X..|.indent(|
|00004b00| 29 3b 0a 58 09 09 09 28 | 76 6f 69 64 29 66 70 72 |);.X...(|void)fpr|
|00004b10| 69 6e 74 66 28 6f 75 74 | 70 75 74 2e 66 70 2c 20 |intf(out|put.fp, |
|00004b20| 22 7d 20 55 3b 5c 6e 22 | 29 2c 20 50 75 74 6c 28 |"} U;\n"|), Putl(|
|00004b30| 6f 75 74 70 75 74 2c 20 | 31 29 3b 0a 58 09 09 7d |output, |1);.X..}|
|00004b40| 0a 58 09 09 64 65 63 72 | 65 6d 65 6e 74 28 29 3b |.X..decr|ement();|
|00004b50| 0a 58 09 09 69 6e 64 65 | 6e 74 28 29 3b 0a 58 09 |.X..inde|nt();.X.|
|00004b60| 09 69 66 20 28 74 70 2d | 3e 74 75 70 2d 3e 74 74 |.if (tp-|>tup->tt|
|00004b70| 20 3d 3d 20 6e 76 61 72 | 69 61 6e 74 29 20 7b 0a | == nvar|iant) {.|
|00004b80| 58 09 09 09 28 76 6f 69 | 64 29 66 70 72 69 6e 74 |X...(voi|d)fprint|
|00004b90| 66 28 6f 75 74 70 75 74 | 2e 66 70 2c 20 22 7d 20 |f(output|.fp, "} |
|00004ba0| 22 29 2c 20 50 75 74 6c | 28 6f 75 74 70 75 74 2c |"), Putl|(output,|
|00004bb0| 20 30 29 3b 0a 58 09 09 | 09 70 72 69 6e 74 73 75 | 0);.X..|.printsu|
|00004bc0| 66 28 74 70 2d 3e 55 2e | 56 32 31 2e 74 75 69 64 |f(tp->U.|V21.tuid|
|00004bd0| 29 3b 0a 58 09 09 7d 20 | 65 6c 73 65 0a 58 09 09 |);.X..} |else.X..|
|00004be0| 09 50 75 74 63 68 72 28 | 27 7d 27 2c 20 6f 75 74 |.Putchr(|'}', out|
|00004bf0| 70 75 74 29 3b 0a 58 09 | 09 62 72 65 61 6b 20 3b |put);.X.|.break ;|
|00004c00| 0a 58 09 20 20 63 61 73 | 65 20 6e 63 6f 6e 66 61 |.X. cas|e nconfa|
|00004c10| 72 72 3a 0a 58 09 09 28 | 76 6f 69 64 29 66 70 72 |rr:.X..(|void)fpr|
|00004c20| 69 6e 74 66 28 6f 75 74 | 70 75 74 2e 66 70 2c 20 |intf(out|put.fp, |
|00004c30| 22 73 74 72 75 63 74 20 | 22 29 2c 20 50 75 74 6c |"struct |"), Putl|
|00004c40| 28 6f 75 74 70 75 74 2c | 20 30 29 3b 0a 58 09 09 |(output,| 0);.X..|
|00004c50| 70 72 69 6e 74 69 64 28 | 74 70 2d 3e 55 2e 56 32 |printid(|tp->U.V2|
|00004c60| 32 2e 74 63 75 69 64 29 | 3b 0a 58 09 09 28 76 6f |2.tcuid)|;.X..(vo|
|00004c70| 69 64 29 66 70 72 69 6e | 74 66 28 6f 75 74 70 75 |id)fprin|tf(outpu|
|00004c80| 74 2e 66 70 2c 20 22 20 | 7b 20 22 29 2c 20 50 75 |t.fp, " |{ "), Pu|
|00004c90| 74 6c 28 6f 75 74 70 75 | 74 2c 20 30 29 3b 0a 58 |tl(outpu|t, 0);.X|
|00004ca0| 09 09 65 74 64 65 66 28 | 28 69 64 70 74 72 29 4e |..etdef(|(idptr)N|
|00004cb0| 49 4c 2c 20 74 70 2d 3e | 55 2e 56 32 32 2e 74 63 |IL, tp->|U.V22.tc|
|00004cc0| 65 6c 65 6d 29 3b 0a 58 | 09 09 28 76 6f 69 64 29 |elem);.X|..(void)|
|00004cd0| 66 70 72 69 6e 74 66 28 | 6f 75 74 70 75 74 2e 66 |fprintf(|output.f|
|00004ce0| 70 2c 20 22 25 63 41 5b | 5d 3b 20 7d 22 2c 20 74 |p, "%cA[|]; }", t|
|00004cf0| 61 62 31 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |ab1), Pu|tl(outpu|
|00004d00| 74 2c 20 30 29 3b 0a 58 | 09 09 62 72 65 61 6b 20 |t, 0);.X|..break |
|00004d10| 3b 0a 58 09 20 20 63 61 | 73 65 20 6e 61 72 72 61 |;.X. ca|se narra|
|00004d20| 79 3a 0a 58 09 09 28 76 | 6f 69 64 29 66 70 72 69 |y:.X..(v|oid)fpri|
|00004d30| 6e 74 66 28 6f 75 74 70 | 75 74 2e 66 70 2c 20 22 |ntf(outp|ut.fp, "|
|00004d40| 73 74 72 75 63 74 20 7b | 20 22 29 2c 20 50 75 74 |struct {| "), Put|
|00004d50| 6c 28 6f 75 74 70 75 74 | 2c 20 30 29 3b 0a 58 09 |l(output|, 0);.X.|
|00004d60| 09 65 74 64 65 66 28 28 | 69 64 70 74 72 29 4e 49 |.etdef((|idptr)NI|
|00004d70| 4c 2c 20 74 70 2d 3e 55 | 2e 56 32 33 2e 74 61 65 |L, tp->U|.V23.tae|
|00004d80| 6c 65 6d 29 3b 0a 58 09 | 09 28 76 6f 69 64 29 66 |lem);.X.|.(void)f|
|00004d90| 70 72 69 6e 74 66 28 6f | 75 74 70 75 74 2e 66 70 |printf(o|utput.fp|
|00004da0| 2c 20 22 25 63 41 5b 22 | 2c 20 74 61 62 31 29 2c |, "%cA["|, tab1),|
|00004db0| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00004dc0| 3b 0a 58 09 09 74 71 20 | 3d 20 74 79 70 65 6f 66 |;.X..tq |= typeof|
|00004dd0| 28 74 70 2d 3e 55 2e 56 | 32 33 2e 74 61 69 6e 64 |(tp->U.V|23.taind|
|00004de0| 78 29 3b 0a 58 09 09 69 | 66 20 28 74 71 2d 3e 74 |x);.X..i|f (tq->t|
|00004df0| 74 20 3d 3d 20 6e 73 75 | 62 72 61 6e 67 65 29 20 |t == nsu|brange) |
|00004e00| 7b 0a 58 09 09 09 69 66 | 20 28 61 72 69 74 68 65 |{.X...if| (arithe|
|00004e10| 78 70 72 28 74 71 2d 3e | 55 2e 56 31 39 2e 74 68 |xpr(tq->|U.V19.th|
|00004e20| 69 29 29 20 7b 0a 58 09 | 09 09 09 65 65 78 70 72 |i)) {.X.|...eexpr|
|00004e30| 28 74 71 2d 3e 55 2e 56 | 31 39 2e 74 68 69 29 3b |(tq->U.V|19.thi);|
|00004e40| 0a 58 09 09 09 09 69 66 | 20 28 63 76 61 6c 6f 66 |.X....if| (cvalof|
|00004e50| 28 74 71 2d 3e 55 2e 56 | 31 39 2e 74 6c 6f 29 20 |(tq->U.V|19.tlo) |
|00004e60| 21 3d 20 30 29 20 7b 0a | 58 09 09 09 09 09 28 76 |!= 0) {.|X.....(v|
|00004e70| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|00004e80| 75 74 2e 66 70 2c 20 22 | 20 2d 20 22 29 2c 20 50 |ut.fp, "| - "), P|
|00004e90| 75 74 6c 28 6f 75 74 70 | 75 74 2c 20 30 29 3b 0a |utl(outp|ut, 0);.|
|00004ea0| 58 09 09 09 09 09 65 65 | 78 70 72 28 74 71 2d 3e |X.....ee|xpr(tq->|
|00004eb0| 55 2e 56 31 39 2e 74 6c | 6f 29 3b 0a 58 09 09 09 |U.V19.tl|o);.X...|
|00004ec0| 09 7d 0a 58 09 09 09 7d | 20 65 6c 73 65 20 7b 0a |.}.X...}| else {.|
|00004ed0| 58 09 09 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |X....(vo|id)fprin|
|00004ee0| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 28 |tf(outpu|t.fp, "(|
|00004ef0| 69 6e 74 29 28 22 29 2c | 20 50 75 74 6c 28 6f 75 |int)("),| Putl(ou|
|00004f00| 74 70 75 74 2c 20 30 29 | 3b 0a 58 09 09 09 09 65 |tput, 0)|;.X....e|
|00004f10| 65 78 70 72 28 74 71 2d | 3e 55 2e 56 31 39 2e 74 |expr(tq-|>U.V19.t|
|00004f20| 68 69 29 3b 0a 58 09 09 | 09 09 69 66 20 28 63 76 |hi);.X..|..if (cv|
|00004f30| 61 6c 6f 66 28 74 71 2d | 3e 55 2e 56 31 39 2e 74 |alof(tq-|>U.V19.t|
|00004f40| 6c 6f 29 20 21 3d 20 30 | 29 20 7b 0a 58 09 09 09 |lo) != 0|) {.X...|
|00004f50| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|00004f60| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 29 20 2d 20 |output.f|p, ") - |
|00004f70| 28 69 6e 74 29 28 22 29 | 2c 20 50 75 74 6c 28 6f |(int)(")|, Putl(o|
|00004f80| 75 74 70 75 74 2c 20 30 | 29 3b 0a 58 09 09 09 09 |utput, 0|);.X....|
|00004f90| 09 65 65 78 70 72 28 74 | 71 2d 3e 55 2e 56 31 39 |.eexpr(t|q->U.V19|
|00004fa0| 2e 74 6c 6f 29 3b 0a 58 | 09 09 09 09 7d 0a 58 09 |.tlo);.X|....}.X.|
|00004fb0| 09 09 09 50 75 74 63 68 | 72 28 27 29 27 2c 20 6f |...Putch|r(')', o|
|00004fc0| 75 74 70 75 74 29 3b 0a | 58 09 09 09 7d 0a 58 09 |utput);.|X...}.X.|
|00004fd0| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|00004fe0| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 20 2b 20 31 |output.f|p, " + 1|
|00004ff0| 22 29 2c 20 50 75 74 6c | 28 6f 75 74 70 75 74 2c |"), Putl|(output,|
|00005000| 20 30 29 3b 0a 58 09 09 | 7d 20 65 6c 73 65 0a 58 | 0);.X..|} else.X|
|00005010| 09 09 09 28 76 6f 69 64 | 29 66 70 72 69 6e 74 66 |...(void|)fprintf|
|00005020| 28 6f 75 74 70 75 74 2e | 66 70 2c 20 22 25 31 64 |(output.|fp, "%1d|
|00005030| 22 2c 20 63 72 61 6e 67 | 65 28 74 70 2d 3e 55 2e |", crang|e(tp->U.|
|00005040| 56 32 33 2e 74 61 69 6e | 64 78 29 29 2c 20 50 75 |V23.tain|dx)), Pu|
|00005050| 74 6c 28 6f 75 74 70 75 | 74 2c 20 30 29 3b 0a 58 |tl(outpu|t, 0);.X|
|00005060| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|00005070| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 5d 3b 20 7d |output.f|p, "]; }|
|00005080| 22 29 2c 20 50 75 74 6c | 28 6f 75 74 70 75 74 2c |"), Putl|(output,|
|00005090| 20 30 29 3b 0a 58 09 09 | 62 72 65 61 6b 20 3b 0a | 0);.X..|break ;.|
|000050a0| 58 09 20 20 63 61 73 65 | 20 6e 66 69 6c 65 6f 66 |X. case| nfileof|
|000050b0| 3a 0a 58 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |:.X..(vo|id)fprin|
|000050c0| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 73 |tf(outpu|t.fp, "s|
|000050d0| 74 72 75 63 74 20 7b 5c | 6e 22 29 2c 20 50 75 74 |truct {\|n"), Put|
|000050e0| 6c 28 6f 75 74 70 75 74 | 2c 20 31 29 3b 0a 58 09 |l(output|, 1);.X.|
|000050f0| 09 69 6e 64 65 6e 74 28 | 29 3b 0a 58 09 09 28 76 |.indent(|);.X..(v|
|00005100| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|00005110| 75 74 2e 66 70 2c 20 22 | 25 63 46 49 4c 45 25 63 |ut.fp, "|%cFILE%c|
|00005120| 2a 66 70 3b 5c 6e 22 2c | 20 74 61 62 31 2c 20 74 |*fp;\n",| tab1, t|
|00005130| 61 62 31 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |ab1), Pu|tl(outpu|
|00005140| 74 2c 20 31 29 3b 0a 58 | 09 09 69 6e 64 65 6e 74 |t, 1);.X|..indent|
|00005150| 28 29 3b 0a 58 09 09 28 | 76 6f 69 64 29 66 70 72 |();.X..(|void)fpr|
|00005160| 69 6e 74 66 28 6f 75 74 | 70 75 74 2e 66 70 2c 20 |intf(out|put.fp, |
|00005170| 22 25 63 25 73 25 63 65 | 6f 6c 6e 3a 31 2c 5c 6e |"%c%s%ce|oln:1,\n|
|00005180| 22 2c 20 74 61 62 31 2c | 20 66 69 6c 65 62 69 74 |", tab1,| filebit|
|00005190| 73 2c 20 74 61 62 31 29 | 2c 20 50 75 74 6c 28 6f |s, tab1)|, Putl(o|
|000051a0| 75 74 70 75 74 2c 20 31 | 29 3b 0a 58 09 09 69 6e |utput, 1|);.X..in|
|000051b0| 64 65 6e 74 28 29 3b 0a | 58 09 09 28 76 6f 69 64 |dent();.|X..(void|
|000051c0| 29 66 70 72 69 6e 74 66 | 28 6f 75 74 70 75 74 2e |)fprintf|(output.|
|000051d0| 66 70 2c 20 22 25 73 65 | 6f 66 3a 31 2c 5c 6e 22 |fp, "%se|of:1,\n"|
|000051e0| 2c 20 74 61 62 33 29 2c | 20 50 75 74 6c 28 6f 75 |, tab3),| Putl(ou|
|000051f0| 74 70 75 74 2c 20 31 29 | 3b 0a 58 09 09 69 6e 64 |tput, 1)|;.X..ind|
|00005200| 65 6e 74 28 29 3b 0a 58 | 09 09 28 76 6f 69 64 29 |ent();.X|..(void)|
|00005210| 66 70 72 69 6e 74 66 28 | 6f 75 74 70 75 74 2e 66 |fprintf(|output.f|
|00005220| 70 2c 20 22 25 73 6f 75 | 74 3a 31 2c 5c 6e 22 2c |p, "%sou|t:1,\n",|
|00005230| 20 74 61 62 33 29 2c 20 | 50 75 74 6c 28 6f 75 74 | tab3), |Putl(out|
|00005240| 70 75 74 2c 20 31 29 3b | 0a 58 09 09 69 6e 64 65 |put, 1);|.X..inde|
|00005250| 6e 74 28 29 3b 0a 58 09 | 09 28 76 6f 69 64 29 66 |nt();.X.|.(void)f|
|00005260| 70 72 69 6e 74 66 28 6f | 75 74 70 75 74 2e 66 70 |printf(o|utput.fp|
|00005270| 2c 20 22 25 73 69 6e 69 | 74 3a 31 2c 5c 6e 22 2c |, "%sini|t:1,\n",|
|00005280| 20 74 61 62 33 29 2c 20 | 50 75 74 6c 28 6f 75 74 | tab3), |Putl(out|
|00005290| 70 75 74 2c 20 31 29 3b | 0a 58 09 09 69 6e 64 65 |put, 1);|.X..inde|
|000052a0| 6e 74 28 29 3b 0a 58 09 | 09 28 76 6f 69 64 29 66 |nt();.X.|.(void)f|
|000052b0| 70 72 69 6e 74 66 28 6f | 75 74 70 75 74 2e 66 70 |printf(o|utput.fp|
|000052c0| 2c 20 22 25 73 3a 25 31 | 64 3b 5c 6e 22 2c 20 74 |, "%s:%1|d;\n", t|
|000052d0| 61 62 33 2c 20 66 69 6c | 65 66 69 6c 6c 29 2c 20 |ab3, fil|efill), |
|000052e0| 50 75 74 6c 28 6f 75 74 | 70 75 74 2c 20 31 29 3b |Putl(out|put, 1);|
|000052f0| 0a 58 09 09 69 6e 64 65 | 6e 74 28 29 3b 0a 58 09 |.X..inde|nt();.X.|
|00005300| 09 50 75 74 63 68 72 28 | 74 61 62 31 2c 20 6f 75 |.Putchr(|tab1, ou|
|00005310| 74 70 75 74 29 3b 0a 58 | 09 09 65 74 64 65 66 28 |tput);.X|..etdef(|
|00005320| 28 69 64 70 74 72 29 4e | 49 4c 2c 20 74 70 2d 3e |(idptr)N|IL, tp->|
|00005330| 55 2e 56 31 38 2e 74 6f | 66 29 3b 0a 58 09 09 28 |U.V18.to|f);.X..(|
|00005340| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|00005350| 70 75 74 2e 66 70 2c 20 | 22 25 63 62 75 66 3b 5c |put.fp, |"%cbuf;\|
|00005360| 6e 22 2c 20 74 61 62 31 | 29 2c 20 50 75 74 6c 28 |n", tab1|), Putl(|
|00005370| 6f 75 74 70 75 74 2c 20 | 31 29 3b 0a 58 09 09 69 |output, |1);.X..i|
|00005380| 6e 64 65 6e 74 28 29 3b | 0a 58 09 09 28 76 6f 69 |ndent();|.X..(voi|
|00005390| 64 29 66 70 72 69 6e 74 | 66 28 6f 75 74 70 75 74 |d)fprint|f(output|
|000053a0| 2e 66 70 2c 20 22 7d 20 | 22 29 2c 20 50 75 74 6c |.fp, "} |"), Putl|
|000053b0| 28 6f 75 74 70 75 74 2c | 20 30 29 3b 0a 58 09 09 |(output,| 0);.X..|
|000053c0| 62 72 65 61 6b 20 3b 0a | 58 09 20 20 63 61 73 65 |break ;.|X. case|
|000053d0| 20 6e 73 65 74 6f 66 3a | 0a 58 09 09 28 76 6f 69 | nsetof:|.X..(voi|
|000053e0| 64 29 66 70 72 69 6e 74 | 66 28 6f 75 74 70 75 74 |d)fprint|f(output|
|000053f0| 2e 66 70 2c 20 22 73 74 | 72 75 63 74 20 7b 20 25 |.fp, "st|ruct { %|
|00005400| 73 25 63 53 5b 25 31 64 | 5d 3b 20 7d 22 2c 20 73 |s%cS[%1d|]; }", s|
|00005410| 65 74 77 74 79 70 2c 20 | 74 61 62 31 2c 20 63 73 |etwtyp, |tab1, cs|
|00005420| 65 74 73 69 7a 65 28 74 | 70 29 29 2c 20 50 75 74 |etsize(t|p)), Put|
|00005430| 6c 28 6f 75 74 70 75 74 | 2c 20 30 29 3b 0a 58 09 |l(output|, 0);.X.|
|00005440| 09 62 72 65 61 6b 20 3b | 0a 58 09 20 20 63 61 73 |.break ;|.X. cas|
|00005450| 65 20 6e 70 72 65 64 65 | 66 3a 0a 58 09 09 73 77 |e nprede|f:.X..sw|
|00005460| 69 74 63 68 20 28 74 70 | 2d 3e 55 2e 56 31 32 2e |itch (tp|->U.V12.|
|00005470| 74 6f 62 74 79 70 29 20 | 7b 0a 58 09 09 20 20 63 |tobtyp) |{.X.. c|
|00005480| 61 73 65 20 74 62 6f 6f | 6c 65 61 6e 3a 0a 58 09 |ase tboo|lean:.X.|
|00005490| 09 09 70 72 69 6e 74 69 | 64 28 64 65 66 6e 61 6d |..printi|d(defnam|
|000054a0| 73 2e 41 5b 28 69 6e 74 | 29 28 64 62 6f 6f 6c 65 |s.A[(int|)(dboole|
|000054b0| 61 6e 29 5d 2d 3e 55 2e | 56 36 2e 6c 69 64 29 3b |an)]->U.|V6.lid);|
|000054c0| 0a 58 09 09 09 62 72 65 | 61 6b 20 3b 0a 58 09 09 |.X...bre|ak ;.X..|
|000054d0| 20 20 63 61 73 65 20 74 | 63 68 61 72 3a 0a 58 09 | case t|char:.X.|
|000054e0| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|000054f0| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 25 73 22 2c |output.f|p, "%s",|
|00005500| 20 63 68 61 72 74 79 70 | 29 2c 20 50 75 74 6c 28 | chartyp|), Putl(|
|00005510| 6f 75 74 70 75 74 2c 20 | 30 29 3b 0a 58 09 09 09 |output, |0);.X...|
|00005520| 62 72 65 61 6b 20 3b 0a | 58 09 09 20 20 63 61 73 |break ;.|X.. cas|
|00005530| 65 20 74 69 6e 74 65 67 | 65 72 3a 0a 58 09 09 09 |e tinteg|er:.X...|
|00005540| 70 72 69 6e 74 69 64 28 | 64 65 66 6e 61 6d 73 2e |printid(|defnams.|
|00005550| 41 5b 28 69 6e 74 29 28 | 64 69 6e 74 65 67 65 72 |A[(int)(|dinteger|
|00005560| 29 5d 2d 3e 55 2e 56 36 | 2e 6c 69 64 29 3b 0a 58 |)]->U.V6|.lid);.X|
|00005570| 09 09 09 62 72 65 61 6b | 20 3b 0a 58 09 09 20 20 |...break| ;.X.. |
|00005580| 63 61 73 65 20 74 72 65 | 61 6c 3a 0a 58 09 09 09 |case tre|al:.X...|
|00005590| 70 72 69 6e 74 69 64 28 | 64 65 66 6e 61 6d 73 2e |printid(|defnams.|
|000055a0| 41 5b 28 69 6e 74 29 28 | 64 72 65 61 6c 29 5d 2d |A[(int)(|dreal)]-|
|000055b0| 3e 55 2e 56 36 2e 6c 69 | 64 29 3b 0a 58 09 09 09 |>U.V6.li|d);.X...|
|000055c0| 62 72 65 61 6b 20 3b 0a | 58 09 09 20 20 63 61 73 |break ;.|X.. cas|
|000055d0| 65 20 74 73 74 72 69 6e | 67 3a 0a 58 09 09 09 28 |e tstrin|g:.X...(|
|000055e0| 76 6f 69 64 29 66 70 72 | 69 6e 74 66 28 6f 75 74 |void)fpr|intf(out|
|000055f0| 70 75 74 2e 66 70 2c 20 | 22 25 73 20 2a 22 2c 20 |put.fp, |"%s *", |
|00005600| 63 68 61 72 74 79 70 29 | 2c 20 50 75 74 6c 28 6f |chartyp)|, Putl(o|
|00005610| 75 74 70 75 74 2c 20 30 | 29 3b 0a 58 09 09 09 62 |utput, 0|);.X...b|
|00005620| 72 65 61 6b 20 3b 0a 58 | 09 09 20 20 63 61 73 65 |reak ;.X|.. case|
|00005630| 20 74 74 65 78 74 3a 0a | 58 09 09 09 28 76 6f 69 | ttext:.|X...(voi|
|00005640| 64 29 66 70 72 69 6e 74 | 66 28 6f 75 74 70 75 74 |d)fprint|f(output|
|00005650| 2e 66 70 2c 20 22 74 65 | 78 74 22 29 2c 20 50 75 |.fp, "te|xt"), Pu|
|00005660| 74 6c 28 6f 75 74 70 75 | 74 2c 20 30 29 3b 0a 58 |tl(outpu|t, 0);.X|
|00005670| 09 09 09 62 72 65 61 6b | 20 3b 0a 58 09 09 20 20 |...break| ;.X.. |
|00005680| 63 61 73 65 20 74 6e 69 | 6c 3a 20 20 63 61 73 65 |case tni|l: case|
|00005690| 20 74 73 65 74 3a 20 20 | 63 61 73 65 20 74 65 72 | tset: |case ter|
|000056a0| 72 6f 72 3a 0a 58 09 09 | 09 66 61 74 61 6c 28 65 |ror:.X..|.fatal(e|
|000056b0| 74 72 65 65 29 3b 0a 58 | 09 09 09 62 72 65 61 6b |tree);.X|...break|
|000056c0| 20 3b 0a 58 09 09 20 20 | 63 61 73 65 20 74 6e 6f | ;.X.. |case tno|
|000056d0| 6e 65 3a 0a 58 09 09 09 | 28 76 6f 69 64 29 66 70 |ne:.X...|(void)fp|
|000056e0| 72 69 6e 74 66 28 6f 75 | 74 70 75 74 2e 66 70 2c |rintf(ou|tput.fp,|
|000056f0| 20 22 25 73 22 2c 20 76 | 6f 69 64 74 79 70 29 2c | "%s", v|oidtyp),|
|00005700| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00005710| 3b 0a 58 09 09 09 62 72 | 65 61 6b 20 3b 0a 58 09 |;.X...br|eak ;.X.|
|00005720| 09 20 20 64 65 66 61 75 | 6c 74 3a 0a 58 09 09 09 |. defau|lt:.X...|
|00005730| 43 61 73 65 65 72 72 6f | 72 28 4c 69 6e 65 29 3b |Caseerro|r(Line);|
|00005740| 0a 58 09 09 7d 0a 58 09 | 09 62 72 65 61 6b 20 3b |.X..}.X.|.break ;|
|00005750| 0a 58 09 20 20 63 61 73 | 65 20 6e 65 6d 70 74 79 |.X. cas|e nempty|
|00005760| 3a 0a 58 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |:.X..(vo|id)fprin|
|00005770| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 25 |tf(outpu|t.fp, "%|
|00005780| 73 22 2c 20 76 6f 69 64 | 74 79 70 29 2c 20 50 75 |s", void|typ), Pu|
|00005790| 74 6c 28 6f 75 74 70 75 | 74 2c 20 30 29 3b 0a 58 |tl(outpu|t, 0);.X|
|000057a0| 09 09 62 72 65 61 6b 20 | 3b 0a 58 09 20 20 64 65 |..break |;.X. de|
|000057b0| 66 61 75 6c 74 3a 0a 58 | 09 09 43 61 73 65 65 72 |fault:.X|..Caseer|
|000057c0| 72 6f 72 28 4c 69 6e 65 | 29 3b 0a 58 09 7d 0a 58 |ror(Line|);.X.}.X|
|000057d0| 7d 0a 58 0a 58 20 76 6f | 69 64 0a 58 65 74 79 70 |}.X.X vo|id.Xetyp|
|000057e0| 65 64 65 66 28 74 70 29 | 0a 58 09 74 72 65 65 70 |edef(tp)|.X.treep|
|000057f0| 74 72 09 74 70 3b 0a 58 | 7b 0a 58 09 65 74 64 65 |tr.tp;.X|{.X.etde|
|00005800| 66 28 28 69 64 70 74 72 | 29 4e 49 4c 2c 20 74 70 |f((idptr|)NIL, tp|
|00005810| 29 3b 0a 58 7d 0a 58 0a | 58 20 76 6f 69 64 0a 58 |);.X}.X.|X void.X|
|00005820| 65 74 79 70 65 28 74 70 | 29 0a 58 09 74 72 65 65 |etype(tp|).X.tree|
|00005830| 70 74 72 09 74 70 3b 0a | 58 7b 0a 58 09 73 79 6d |ptr.tp;.|X{.X.sym|
|00005840| 70 74 72 09 73 70 3b 0a | 58 0a 58 09 77 68 69 6c |ptr.sp;.|X.X.whil|
|00005850| 65 20 28 74 70 20 21 3d | 20 28 73 74 72 75 63 74 |e (tp !=| (struct|
|00005860| 20 53 36 31 20 2a 29 4e | 49 4c 29 20 7b 0a 58 09 | S61 *)N|IL) {.X.|
|00005870| 09 73 70 20 3d 20 74 70 | 2d 3e 55 2e 56 31 34 2e |.sp = tp|->U.V14.|
|00005880| 74 69 64 6c 2d 3e 55 2e | 56 34 33 2e 74 73 79 6d |tidl->U.|V43.tsym|
|00005890| 3b 0a 58 09 09 69 66 20 | 28 73 70 2d 3e 55 2e 56 |;.X..if |(sp->U.V|
|000058a0| 36 2e 6c 69 64 2d 3e 69 | 6e 72 65 66 20 3e 20 31 |6.lid->i|nref > 1|
|000058b0| 29 0a 58 09 09 09 73 70 | 2d 3e 55 2e 56 36 2e 6c |).X...sp|->U.V6.l|
|000058c0| 69 64 20 3d 20 6d 6b 72 | 65 6e 61 6d 65 28 27 59 |id = mkr|ename('Y|
|000058d0| 27 2c 20 73 70 2d 3e 55 | 2e 56 36 2e 6c 69 64 29 |', sp->U|.V6.lid)|
|000058e0| 3b 0a 58 09 09 69 6e 64 | 65 6e 74 28 29 3b 0a 58 |;.X..ind|ent();.X|
|000058f0| 09 09 28 76 6f 69 64 29 | 66 70 72 69 6e 74 66 28 |..(void)|fprintf(|
|00005900| 6f 75 74 70 75 74 2e 66 | 70 2c 20 22 25 73 22 2c |output.f|p, "%s",|
|00005910| 20 74 79 70 64 65 66 29 | 2c 20 50 75 74 6c 28 6f | typdef)|, Putl(o|
|00005920| 75 74 70 75 74 2c 20 30 | 29 3b 0a 58 09 09 65 74 |utput, 0|);.X..et|
|00005930| 79 70 65 64 65 66 28 74 | 70 2d 3e 55 2e 56 31 34 |ypedef(t|p->U.V14|
|00005940| 2e 74 62 69 6e 64 29 3b | 0a 58 09 09 50 75 74 63 |.tbind);|.X..Putc|
|00005950| 68 72 28 74 61 62 31 2c | 20 6f 75 74 70 75 74 29 |hr(tab1,| output)|
|00005960| 3b 0a 58 09 09 70 72 69 | 6e 74 69 64 28 73 70 2d |;.X..pri|ntid(sp-|
|00005970| 3e 55 2e 56 36 2e 6c 69 | 64 29 3b 0a 58 09 09 50 |>U.V6.li|d);.X..P|
|00005980| 75 74 63 68 72 28 27 3b | 27 2c 20 6f 75 74 70 75 |utchr(';|', outpu|
|00005990| 74 29 2c 50 75 74 63 68 | 72 28 27 5c 6e 27 2c 20 |t),Putch|r('\n', |
|000059a0| 6f 75 74 70 75 74 29 3b | 0a 58 09 09 74 70 20 3d |output);|.X..tp =|
|000059b0| 20 74 70 2d 3e 74 6e 65 | 78 74 3b 0a 58 09 7d 0a | tp->tne|xt;.X.}.|
|000059c0| 58 7d 0a 58 0a 58 20 76 | 6f 69 64 0a 58 65 76 61 |X}.X.X v|oid.Xeva|
|000059d0| 72 28 74 70 29 0a 58 09 | 74 72 65 65 70 74 72 09 |r(tp).X.|treeptr.|
|000059e0| 74 70 3b 0a 58 7b 0a 58 | 09 74 72 65 65 70 74 72 |tp;.X{.X|.treeptr|
|000059f0| 09 74 71 3b 0a 58 09 69 | 6e 74 65 67 65 72 09 69 |.tq;.X.i|nteger.i|
|00005a00| 3b 0a 58 0a 58 09 77 68 | 69 6c 65 20 28 74 70 20 |;.X.X.wh|ile (tp |
|00005a10| 21 3d 20 28 73 74 72 75 | 63 74 20 53 36 31 20 2a |!= (stru|ct S61 *|
|00005a20| 29 4e 49 4c 29 20 7b 0a | 58 09 09 69 6e 64 65 6e |)NIL) {.|X..inden|
|00005a30| 74 28 29 3b 0a 58 09 09 | 73 77 69 74 63 68 20 28 |t();.X..|switch (|
|00005a40| 74 70 2d 3e 74 74 29 20 | 7b 0a 58 09 09 20 20 63 |tp->tt) |{.X.. c|
|00005a50| 61 73 65 20 6e 76 61 72 | 3a 20 20 63 61 73 65 20 |ase nvar|: case |
|00005a60| 6e 76 61 6c 70 61 72 3a | 20 20 63 61 73 65 20 6e |nvalpar:| case n|
|00005a70| 76 61 72 70 61 72 3a 0a | 58 09 09 09 69 66 20 28 |varpar:.|X...if (|
|00005a80| 74 70 2d 3e 55 2e 56 31 | 34 2e 74 61 74 74 72 20 |tp->U.V1|4.tattr |
|00005a90| 3d 3d 20 61 72 65 67 69 | 73 74 65 72 29 0a 58 09 |== aregi|ster).X.|
|00005aa0| 09 09 09 28 76 6f 69 64 | 29 66 70 72 69 6e 74 66 |...(void|)fprintf|
|00005ab0| 28 6f 75 74 70 75 74 2e | 66 70 2c 20 22 25 73 22 |(output.|fp, "%s"|
|00005ac0| 2c 20 72 65 67 69 73 74 | 72 29 2c 20 50 75 74 6c |, regist|r), Putl|
|00005ad0| 28 6f 75 74 70 75 74 2c | 20 30 29 3b 0a 58 09 09 |(output,| 0);.X..|
|00005ae0| 09 65 74 79 70 65 64 65 | 66 28 74 70 2d 3e 55 2e |.etypede|f(tp->U.|
|00005af0| 56 31 34 2e 74 62 69 6e | 64 29 3b 0a 58 09 09 09 |V14.tbin|d);.X...|
|00005b00| 62 72 65 61 6b 20 3b 0a | 58 09 09 20 20 63 61 73 |break ;.|X.. cas|
|00005b10| 65 20 6e 70 61 72 70 72 | 6f 63 3a 20 20 63 61 73 |e nparpr|oc: cas|
|00005b20| 65 20 6e 70 61 72 66 75 | 6e 63 3a 0a 58 09 09 09 |e nparfu|nc:.X...|
|00005b30| 69 66 20 28 74 70 2d 3e | 74 74 20 3d 3d 20 6e 70 |if (tp->|tt == np|
|00005b40| 61 72 70 72 6f 63 29 0a | 58 09 09 09 09 28 76 6f |arproc).|X....(vo|
|00005b50| 69 64 29 66 70 72 69 6e | 74 66 28 6f 75 74 70 75 |id)fprin|tf(outpu|
|00005b60| 74 2e 66 70 2c 20 22 25 | 73 22 2c 20 76 6f 69 64 |t.fp, "%|s", void|
|00005b70| 74 79 70 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |typ), Pu|tl(outpu|
|00005b80| 74 2c 20 30 29 3b 0a 58 | 09 09 09 65 6c 73 65 0a |t, 0);.X|...else.|
|00005b90| 58 09 09 09 09 65 74 79 | 70 65 64 65 66 28 74 70 |X....ety|pedef(tp|
|00005ba0| 2d 3e 55 2e 56 31 35 2e | 74 70 61 72 74 79 70 29 |->U.V15.|tpartyp)|
|00005bb0| 3b 0a 58 09 09 09 74 71 | 20 3d 20 74 70 2d 3e 55 |;.X...tq| = tp->U|
|00005bc0| 2e 56 31 35 2e 74 70 61 | 72 69 64 3b 0a 58 09 09 |.V15.tpa|rid;.X..|
|00005bd0| 09 28 76 6f 69 64 29 66 | 70 72 69 6e 74 66 28 6f |.(void)f|printf(o|
|00005be0| 75 74 70 75 74 2e 66 70 | 2c 20 22 25 63 28 2a 22 |utput.fp|, "%c(*"|
|00005bf0| 2c 20 74 61 62 31 29 2c | 20 50 75 74 6c 28 6f 75 |, tab1),| Putl(ou|
|00005c00| 74 70 75 74 2c 20 30 29 | 3b 0a 58 09 09 09 70 72 |tput, 0)|;.X...pr|
|00005c10| 69 6e 74 69 64 28 74 71 | 2d 3e 55 2e 56 34 33 2e |intid(tq|->U.V43.|
|00005c20| 74 73 79 6d 2d 3e 55 2e | 56 36 2e 6c 69 64 29 3b |tsym->U.|V6.lid);|
|00005c30| 0a 58 09 09 09 28 76 6f | 69 64 29 66 70 72 69 6e |.X...(vo|id)fprin|
|00005c40| 74 66 28 6f 75 74 70 75 | 74 2e 66 70 2c 20 22 29 |tf(outpu|t.fp, ")|
|00005c50| 28 29 22 29 2c 20 50 75 | 74 6c 28 6f 75 74 70 75 |()"), Pu|tl(outpu|
|00005c60| 74 2c 20 30 29 3b 0a 58 | 09 09 09 67 6f 74 6f 20 |t, 0);.X|...goto |
|00005c70| 4c 35 35 35 3b 0a 58 09 | 09 09 62 72 65 61 6b 20 |L555;.X.|..break |
|00005c80| 3b 0a 58 09 09 20 20 64 | 65 66 61 75 6c 74 3a 0a |;.X.. d|efault:.|
|00005c90| 58 09 09 09 43 61 73 65 | 65 72 72 6f 72 28 4c 69 |X...Case|error(Li|
|00005ca0| 6e 65 29 3b 0a 58 09 09 | 7d 0a 58 09 09 50 75 74 |ne);.X..|}.X..Put|
|00005cb0| 63 68 72 28 74 61 62 31 | 2c 20 6f 75 74 70 75 74 |chr(tab1|, output|
|00005cc0| 29 3b 0a 58 09 09 74 71 | 20 3d 20 74 70 2d 3e 55 |);.X..tq| = tp->U|
|00005cd0| 2e 56 31 34 2e 74 69 64 | 6c 3b 0a 58 09 09 69 20 |.V14.tid|l;.X..i |
|00005ce0| 3d 20 31 3b 0a 58 09 09 | 64 6f 20 7b 0a 58 09 09 |= 1;.X..|do {.X..|
|00005cf0| 09 69 66 20 28 74 70 2d | 3e 74 74 20 3d 3d 20 6e |.if (tp-|>tt == n|
|00005d00| 76 61 72 70 61 72 29 0a | 58 09 09 09 09 50 75 74 |varpar).|X....Put|
|00005d10| 63 68 72 28 27 2a 27 2c | 20 6f 75 74 70 75 74 29 |chr('*',| output)|
|00005d20| 3b 0a 58 09 09 09 70 72 | 69 6e 74 69 64 28 74 71 |;.X...pr|intid(tq|
|00005d30| 2d 3e 55 2e 56 34 33 2e | 74 73 79 6d 2d 3e 55 2e |->U.V43.|tsym->U.|
|00005d40| 56 36 2e 6c 69 64 29 3b | 0a 58 09 09 09 74 71 20 |V6.lid);|.X...tq |
|00005d50| 3d 20 74 71 2d 3e 74 6e | 65 78 74 3b 0a 58 09 09 |= tq->tn|ext;.X..|
|00005d60| 09 69 66 20 28 74 71 20 | 21 3d 20 28 73 74 72 75 |.if (tq |!= (stru|
|00005d70| 63 74 20 53 36 31 20 2a | 29 4e 49 4c 29 20 7b 0a |ct S61 *|)NIL) {.|
|00005d80| 58 09 09 09 09 69 66 20 | 28 69 20 3e 3d 20 36 29 |X....if |(i >= 6)|
|00005d90| 20 7b 0a 58 09 09 09 09 | 09 69 20 3d 20 31 3b 0a | {.X....|.i = 1;.|
|00005da0| 58 09 09 09 09 09 50 75 | 74 63 68 72 28 27 2c 27 |X.....Pu|tchr(','|
|00005db0| 2c 20 6f 75 74 70 75 74 | 29 2c 50 75 74 63 68 72 |, output|),Putchr|
|00005dc0| 28 27 5c 6e 27 2c 20 6f | 75 74 70 75 74 29 3b 0a |('\n', o|utput);.|
|00005dd0| 58 09 09 09 09 09 69 6e | 64 65 6e 74 28 29 3b 0a |X.....in|dent();.|
|00005de0| 58 09 09 09 09 09 50 75 | 74 63 68 72 28 74 61 62 |X.....Pu|tchr(tab|
|00005df0| 31 2c 20 6f 75 74 70 75 | 74 29 3b 0a 58 09 09 09 |1, outpu|t);.X...|
|00005e00| 09 7d 20 65 6c 73 65 20 | 7b 0a 58 09 09 09 09 09 |.} else |{.X.....|
|00005e10| 69 20 3d 20 69 20 2b 20 | 31 3b 0a 58 09 09 09 09 |i = i + |1;.X....|
|00005e20| 09 28 76 6f 69 64 29 66 | 70 72 69 6e 74 66 28 6f |.(void)f|printf(o|
|00005e30| 75 74 70 75 74 2e 66 70 | 2c 20 22 2c 20 22 29 2c |utput.fp|, ", "),|
|00005e40| 20 50 75 74 6c 28 6f 75 | 74 70 75 74 2c 20 30 29 | Putl(ou|tput, 0)|
|00005e50| 3b 0a 58 09 09 09 09 7d | 0a 58 09 09 09 7d 0a 58 |;.X....}|.X...}.X|
|00005e60| 09 09 7d 20 77 68 69 6c | 65 20 28 21 28 74 71 20 |..} whil|e (!(tq |
|00005e70| 3d 3d 20 28 73 74 72 75 | 63 74 20 53 36 31 20 2a |== (stru|ct S61 *|
|00005e80| 29 4e 49 4c 29 29 3b 0a | 58 09 4c 35 35 35 3a 0a |)NIL));.|X.L555:.|
|00005e90| 58 09 09 50 75 74 63 68 | 72 28 27 3b 27 2c 20 6f |X..Putch|r(';', o|
|00005ea0| 75 74 70 75 74 29 2c 50 | 75 74 63 68 72 28 27 5c |utput),P|utchr('\|
|00005eb0| 6e 27 2c 20 6f 75 74 70 | 75 74 29 3b 0a 58 09 09 |n', outp|ut);.X..|
|00005ec0| 69 66 20 28 74 70 2d 3e | 74 74 20 3d 3d 20 6e 76 |if (tp->|tt == nv|
|00005ed0| 61 72 70 61 72 29 0a 58 | 09 09 09 69 66 20 28 74 |arpar).X|...if (t|
|00005ee0| 70 2d 3e 55 2e 56 31 34 | 2e 74 62 69 6e 64 2d 3e |p->U.V14|.tbind->|
|00005ef0| 74 74 20 3d 3d 20 6e 63 | 6f 6e 66 61 72 72 29 20 |tt == nc|onfarr) |
|00005f00| 7b 0a 58 09 09 09 09 69 | 6e 64 65 6e 74 28 29 3b |{.X....i|ndent();|
|00005f10| 0a 58 09 09 09 09 65 74 | 79 70 65 64 65 66 28 74 |.X....et|ypedef(t|
|00005f20| 70 2d 3e 55 2e 56 31 34 | 2e 74 62 69 6e 64 2d 3e |p->U.V14|.tbind->|
|00005f30| 55 2e 56 32 32 2e 74 69 | 6e 64 74 79 70 29 3b 0a |U.V22.ti|ndtyp);.|
|00005f40| 58 09 09 09 09 50 75 74 | 63 68 72 28 74 61 62 31 |X....Put|chr(tab1|
|00005f50| 2c 20 6f 75 74 70 75 74 | 29 3b 0a 58 09 09 09 09 |, output|);.X....|
|00005f60| 74 71 20 3d 20 74 70 2d | 3e 55 2e 56 31 34 2e 74 |tq = tp-|>U.V14.t|
|00005f70| 62 69 6e 64 2d 3e 55 2e | 56 32 32 2e 74 63 69 6e |bind->U.|V22.tcin|
|00005f80| 64 78 2d 3e 55 2e 56 31 | 39 2e 74 68 69 3b 0a 58 |dx->U.V1|9.thi;.X|
|00005f90| 09 09 09 09 70 72 69 6e | 74 69 64 28 74 71 2d 3e |....prin|tid(tq->|
|00005fa0| 55 2e 56 34 33 2e 74 73 | 79 6d 2d 3e 55 2e 56 36 |U.V43.ts|ym->U.V6|
|00005fb0| 2e 6c 69 64 29 3b 0a 58 | 09 09 09 09 50 75 74 63 |.lid);.X|....Putc|
|00005fc0| 68 72 28 27 3b 27 2c 20 | 6f 75 74 70 75 74 29 2c |hr(';', |output),|
|00005fd0| 50 75 74 63 68 72 28 27 | 5c 6e 27 2c 20 6f 75 74 |Putchr('|\n', out|
|00005fe0| 70 75 74 29 3b 0a 58 09 | 09 09 7d 0a 58 09 09 74 |put);.X.|..}.X..t|
|00005ff0| 70 20 3d 20 74 70 2d 3e | 74 6e 65 78 74 3b 0a 58 |p = tp->|tnext;.X|
|00006000| 09 7d 0a 58 7d 0a 58 0a | 58 0a 58 76 6f 69 64 20 |.}.X}.X.|X.Xvoid |
|00006010| 65 73 74 6d 74 28 29 3b | 0a 58 0a 58 20 76 6f 69 |estmt();|.X.X voi|
|00006020| 64 0a 58 65 77 69 74 68 | 74 79 70 65 28 74 70 29 |d.Xewith|type(tp)|
|00006030| 0a 58 09 74 72 65 65 70 | 74 72 09 74 70 3b 0a 58 |.X.treep|tr.tp;.X|
|00006040| 7b 0a 58 09 74 72 65 65 | 70 74 72 09 74 71 3b 0a |{.X.tree|ptr.tq;.|
|00006050| 58 0a 58 09 74 71 20 3d | 20 74 79 70 65 6f 66 28 |X.X.tq =| typeof(|
|00006060| 74 70 29 3b 0a 58 09 28 | 76 6f 69 64 29 66 70 72 |tp);.X.(|void)fpr|
|00006070| 69 6e 74 66 28 6f 75 74 | 70 75 74 2e 66 70 2c 20 |intf(out|put.fp, |
|00006080| 22 73 74 72 75 63 74 20 | 22 29 2c 20 50 75 74 6c |"struct |"), Putl|
|00006090| 28 6f 75 74 70 75 74 2c | 20 30 29 3b 0a 58 09 70 |(output,| 0);.X.p|
|000060a0| 72 69 6e 74 69 64 28 74 | 71 2d 3e 55 2e 56 32 31 |rintid(t|q->U.V21|
|000060b0| 2e 74 75 69 64 29 3b 0a | 58 7d 0a 58 0a 58 20 76 |.tuid);.|X}.X.X v|
|000060c0| 6f 69 64 0a 58 65 63 68 | 6f 69 73 65 28 74 70 29 |oid.Xech|oise(tp)|
|000060d0| 0a 58 09 74 72 65 65 70 | 74 72 09 74 70 3b 0a 58 |.X.treep|tr.tp;.X|
|000060e0| 7b 0a 58 09 74 72 65 65 | 70 74 72 09 74 71 3b 0a |{.X.tree|ptr.tq;.|
|000060f0| 58 09 69 6e 74 65 67 65 | 72 09 69 3b 0a 58 0a 58 |X.intege|r.i;.X.X|
|00006100| 09 77 68 69 6c 65 20 28 | 74 70 20 21 3d 20 28 73 |.while (|tp != (s|
|00006110| 74 72 75 63 74 20 53 36 | 31 20 2a 29 4e 49 4c 29 |truct S6|1 *)NIL)|
|00006120| 20 7b 0a 58 09 09 74 71 | 20 3d 20 74 70 2d 3e 55 | {.X..tq| = tp->U|
|00006130| 2e 56 33 36 2e 74 63 68 | 6f 63 6f 6e 3b 0a 58 09 |.V36.tch|ocon;.X.|
|00006140| 09 69 20 3d 20 30 3b 0a | 58 09 09 69 6e 64 65 6e |.i = 0;.|X..inden|
|00006150| 74 28 29 3b 0a 58 09 09 | 77 68 69 6c 65 20 28 74 |t();.X..|while (t|
|00006160| 71 20 21 3d 20 28 73 74 | 72 75 63 74 20 53 36 31 |q != (st|ruct S61|
|00006170| 20 2a 29 4e 49 4c 29 20 | 7b 0a 58 09 09 09 28 76 | *)NIL) |{.X...(v|
|00006180| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|00006190| 75 74 2e 66 70 2c 20 22 | 20 20 63 61 73 65 20 22 |ut.fp, "| case "|
|000061a0| 29 2c 20 50 75 74 6c 28 | 6f 75 74 70 75 74 2c 20 |), Putl(|output, |
|000061b0| 30 29 3b 0a 58 09 09 09 | 28 2a 47 31 39 34 5f 63 |0);.X...|(*G194_c|
|000061c0| 6f 6e 66 6c 61 67 29 20 | 3d 20 74 72 75 65 3b 0a |onflag) |= true;.|
|000061d0| 58 09 09 09 65 65 78 70 | 72 28 74 71 29 3b 0a 58 |X...eexp|r(tq);.X|
|000061e0| 09 09 09 28 2a 47 31 39 | 34 5f 63 6f 6e 66 6c 61 |...(*G19|4_confla|
|000061f0| 67 29 20 3d 20 66 61 6c | 73 65 3b 0a 58 09 09 09 |g) = fal|se;.X...|
|00006200| 50 75 74 63 68 72 28 27 | 3a 27 2c 20 6f 75 74 70 |Putchr('|:', outp|
|00006210| 75 74 29 3b 0a 58 09 09 | 09 69 20 3d 20 69 20 2b |ut);.X..|.i = i +|
|00006220| 20 31 3b 0a 58 09 09 09 | 74 71 20 3d 20 74 71 2d | 1;.X...|tq = tq-|
|00006230| 3e 74 6e 65 78 74 3b 0a | 58 09 09 09 69 66 20 28 |>tnext;.|X...if (|
|00006240| 28 74 71 20 3d 3d 20 28 | 73 74 72 75 63 74 20 53 |(tq == (|struct S|
|00006250| 36 31 20 2a 29 4e 49 4c | 29 20 7c 7c 20 28 69 20 |61 *)NIL|) || (i |
|00006260| 25 20 34 20 3d 3d 20 30 | 29 29 20 7b 0a 58 09 09 |% 4 == 0|)) {.X..|
|00006270| 09 09 50 75 74 63 68 72 | 28 27 5c 6e 27 2c 20 6f |..Putchr|('\n', o|
|00006280| 75 74 70 75 74 29 3b 0a | 58 09 09 09 09 69 66 20 |utput);.|X....if |
|00006290| 28 74 71 20 21 3d 20 28 | 73 74 72 75 63 74 20 53 |(tq != (|struct S|
|000062a0| 36 31 20 2a 29 4e 49 4c | 29 0a 58 09 09 09 09 09 |61 *)NIL|).X.....|
|000062b0| 69 6e 64 65 6e 74 28 29 | 3b 0a 58 09 09 09 09 69 |indent()|;.X....i|
|000062c0| 20 3d 20 30 3b 0a 58 09 | 09 09 7d 0a 58 09 09 7d | = 0;.X.|..}.X..}|
|000062d0| 0a 58 09 09 69 6e 63 72 | 65 6d 65 6e 74 28 29 3b |.X..incr|ement();|
|000062e0| 0a 58 09 09 69 66 20 28 | 74 70 2d 3e 55 2e 56 33 |.X..if (|tp->U.V3|
|000062f0| 36 2e 74 63 68 6f 73 74 | 6d 74 2d 3e 74 74 20 3d |6.tchost|mt->tt =|
|00006300| 3d 20 6e 62 65 67 69 6e | 29 0a 58 09 09 09 65 73 |= nbegin|).X...es|
|00006310| 74 6d 74 28 74 70 2d 3e | 55 2e 56 33 36 2e 74 63 |tmt(tp->|U.V36.tc|
|00006320| 68 6f 73 74 6d 74 2d 3e | 55 2e 56 32 34 2e 74 62 |hostmt->|U.V24.tb|
|00006330| 65 67 69 6e 29 3b 0a 58 | 09 09 65 6c 73 65 0a 58 |egin);.X|..else.X|
|00006340| 09 09 09 65 73 74 6d 74 | 28 74 70 2d 3e 55 2e 56 |...estmt|(tp->U.V|
|00006350| 33 36 2e 74 63 68 6f 73 | 74 6d 74 29 3b 0a 58 09 |36.tchos|tmt);.X.|
|00006360| 09 69 6e 64 65 6e 74 28 | 29 3b 0a 58 09 09 28 76 |.indent(|);.X..(v|
|00006370| 6f 69 64 29 66 70 72 69 | 6e 74 66 28 6f 75 74 70 |oid)fpri|ntf(outp|
|00006380| 75 74 2e 66 70 2c 20 22 | 62 72 65 61 6b 20 3b 5c |ut.fp, "|break ;\|
|00006390| 6e 22 29 2c 20 50 75 74 | 6c 28 6f 75 74 70 75 74 |n"), Put|l(output|
|000063a0| 2c 20 31 29 3b 0a 58 09 | 09 64 65 63 72 65 6d 65 |, 1);.X.|.decreme|
|000063b0| 6e 74 28 29 3b 0a 58 09 | 09 74 70 20 3d 20 74 70 |nt();.X.|.tp = tp|
|000063c0| 2d 3e 74 6e 65 78 74 3b | 0a 58 09 09 69 66 20 28 |->tnext;|.X..if (|
|000063d0| 74 70 20 21 3d 20 28 73 | 74 72 75 63 74 20 53 36 |tp != (s|truct S6|
|000063e0| 31 20 2a 29 4e 49 4c 29 | 0a 58 09 09 09 69 66 20 |1 *)NIL)|.X...if |
|000063f0| 28 74 70 2d 3e 55 2e 56 | 33 36 2e 74 63 68 6f 63 |(tp->U.V|36.tchoc|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
