home *** CD-ROM | disk | FTP | other *** search
open in:
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
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 or mail, ASCII text
| default
| |
100%
| checkBytes
| Printable ASCII
| 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/rfc822
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 53 75 62 6a 65 63 74 3a | 20 20 76 32 32 69 30 33 |Subject:| v22i03|
|00000010| 31 3a 20 20 42 79 74 65 | 20 55 6e 69 78 20 62 65 |1: Byte| Unix be|
|00000020| 6e 63 68 6d 61 72 6b 73 | 2c 20 50 61 72 74 30 34 |nchmarks|, Part04|
|00000030| 2f 30 35 0a 4e 65 77 73 | 67 72 6f 75 70 73 3a 20 |/05.News|groups: |
|00000040| 63 6f 6d 70 2e 73 6f 75 | 72 63 65 73 2e 75 6e 69 |comp.sou|rces.uni|
|00000050| 78 0a 41 70 70 72 6f 76 | 65 64 3a 20 72 73 61 6c |x.Approv|ed: rsal|
|00000060| 7a 40 75 75 6e 65 74 2e | 55 55 2e 4e 45 54 0a 58 |z@uunet.|UU.NET.X|
|00000070| 2d 43 68 65 63 6b 73 75 | 6d 2d 53 6e 65 66 72 75 |-Checksu|m-Snefru|
|00000080| 3a 20 33 30 30 61 66 34 | 32 30 20 30 33 34 34 66 |: 300af4|20 0344f|
|00000090| 31 34 65 20 33 38 33 62 | 38 66 65 63 20 65 62 62 |14e 383b|8fec ebb|
|000000a0| 66 63 34 36 32 0a 0a 53 | 75 62 6d 69 74 74 65 64 |fc462..S|ubmitted|
|000000b0| 2d 62 79 3a 20 22 42 65 | 6e 20 53 6d 69 74 68 20 |-by: "Be|n Smith |
|000000c0| 40 20 42 59 54 45 22 20 | 3c 62 65 6e 40 62 79 74 |@ BYTE" |<ben@byt|
|000000d0| 65 70 62 2e 62 79 74 65 | 2e 63 6f 6d 3e 0a 50 6f |epb.byte|.com>.Po|
|000000e0| 73 74 69 6e 67 2d 6e 75 | 6d 62 65 72 3a 20 56 6f |sting-nu|mber: Vo|
|000000f0| 6c 75 6d 65 20 32 32 2c | 20 49 73 73 75 65 20 33 |lume 22,| Issue 3|
|00000100| 31 0a 41 72 63 68 69 76 | 65 2d 6e 61 6d 65 3a 20 |1.Archiv|e-name: |
|00000110| 62 79 74 65 2d 62 65 6e | 63 68 6d 61 72 6b 73 2f |byte-ben|chmarks/|
|00000120| 70 61 72 74 30 34 0a 0a | 23 21 20 2f 62 69 6e 2f |part04..|#! /bin/|
|00000130| 73 68 0a 23 20 54 68 69 | 73 20 69 73 20 61 20 73 |sh.# Thi|s is a s|
|00000140| 68 65 6c 6c 20 61 72 63 | 68 69 76 65 2e 20 20 52 |hell arc|hive. R|
|00000150| 65 6d 6f 76 65 20 61 6e | 79 74 68 69 6e 67 20 62 |emove an|ything b|
|00000160| 65 66 6f 72 65 20 74 68 | 69 73 20 6c 69 6e 65 2c |efore th|is line,|
|00000170| 20 74 68 65 6e 20 75 6e | 70 61 63 6b 0a 23 20 69 | then un|pack.# i|
|00000180| 74 20 62 79 20 73 61 76 | 69 6e 67 20 69 74 20 69 |t by sav|ing it i|
|00000190| 6e 74 6f 20 61 20 66 69 | 6c 65 20 61 6e 64 20 74 |nto a fi|le and t|
|000001a0| 79 70 69 6e 67 20 22 73 | 68 20 66 69 6c 65 22 2e |yping "s|h file".|
|000001b0| 20 20 54 6f 20 6f 76 65 | 72 77 72 69 74 65 20 65 | To ove|rwrite e|
|000001c0| 78 69 73 74 69 6e 67 0a | 23 20 66 69 6c 65 73 2c |xisting.|# files,|
|000001d0| 20 74 79 70 65 20 22 73 | 68 20 66 69 6c 65 20 2d | type "s|h file -|
|000001e0| 63 22 2e 20 20 59 6f 75 | 20 63 61 6e 20 61 6c 73 |c". You| can als|
|000001f0| 6f 20 66 65 65 64 20 74 | 68 69 73 20 61 73 20 73 |o feed t|his as s|
|00000200| 74 61 6e 64 61 72 64 20 | 69 6e 70 75 74 20 76 69 |tandard |input vi|
|00000210| 61 0a 23 20 75 6e 73 68 | 61 72 2c 20 6f 72 20 62 |a.# unsh|ar, or b|
|00000220| 79 20 74 79 70 69 6e 67 | 20 22 73 68 20 3c 66 69 |y typing| "sh <fi|
|00000230| 6c 65 22 2c 20 65 2e 67 | 2e 2e 20 20 49 66 20 74 |le", e.g|.. If t|
|00000240| 68 69 73 20 61 72 63 68 | 69 76 65 20 69 73 20 63 |his arch|ive is c|
|00000250| 6f 6d 70 6c 65 74 65 2c | 20 79 6f 75 0a 23 20 77 |omplete,| you.# w|
|00000260| 69 6c 6c 20 73 65 65 20 | 74 68 65 20 66 6f 6c 6c |ill see |the foll|
|00000270| 6f 77 69 6e 67 20 6d 65 | 73 73 61 67 65 20 61 74 |owing me|ssage at|
|00000280| 20 74 68 65 20 65 6e 64 | 3a 0a 23 09 09 22 45 6e | the end|:.#.."En|
|00000290| 64 20 6f 66 20 61 72 63 | 68 69 76 65 20 34 20 28 |d of arc|hive 4 (|
|000002a0| 6f 66 20 35 29 2e 22 0a | 23 20 43 6f 6e 74 65 6e |of 5).".|# Conten|
|000002b0| 74 73 3a 20 20 64 68 72 | 79 2e 63 20 64 68 72 79 |ts: dhr|y.c dhry|
|000002c0| 2e 68 0a 23 20 57 72 61 | 70 70 65 64 20 62 79 20 |.h.# Wra|pped by |
|000002d0| 72 73 61 6c 7a 40 70 61 | 70 61 79 61 2e 62 62 6e |rsalz@pa|paya.bbn|
|000002e0| 2e 63 6f 6d 20 6f 6e 20 | 54 75 65 20 4d 61 79 20 |.com on |Tue May |
|000002f0| 20 38 20 30 38 3a 35 35 | 3a 33 33 20 31 39 39 30 | 8 08:55|:33 1990|
|00000300| 0a 50 41 54 48 3d 2f 62 | 69 6e 3a 2f 75 73 72 2f |.PATH=/b|in:/usr/|
|00000310| 62 69 6e 3a 2f 75 73 72 | 2f 75 63 62 20 3b 20 65 |bin:/usr|/ucb ; e|
|00000320| 78 70 6f 72 74 20 50 41 | 54 48 0a 69 66 20 74 65 |xport PA|TH.if te|
|00000330| 73 74 20 2d 66 20 27 64 | 68 72 79 2e 63 27 20 2d |st -f 'd|hry.c' -|
|00000340| 61 20 22 24 7b 31 7d 22 | 20 21 3d 20 22 2d 63 22 |a "${1}"| != "-c"|
|00000350| 20 3b 20 74 68 65 6e 20 | 0a 20 20 65 63 68 6f 20 | ; then |. echo |
|00000360| 73 68 61 72 3a 20 57 69 | 6c 6c 20 6e 6f 74 20 63 |shar: Wi|ll not c|
|00000370| 6c 6f 62 62 65 72 20 65 | 78 69 73 74 69 6e 67 20 |lobber e|xisting |
|00000380| 66 69 6c 65 20 5c 22 27 | 64 68 72 79 2e 63 27 5c |file \"'|dhry.c'\|
|00000390| 22 0a 65 6c 73 65 0a 65 | 63 68 6f 20 73 68 61 72 |".else.e|cho shar|
|000003a0| 3a 20 45 78 74 72 61 63 | 74 69 6e 67 20 5c 22 27 |: Extrac|ting \"'|
|000003b0| 64 68 72 79 2e 63 27 5c | 22 20 5c 28 31 37 30 38 |dhry.c'\|" \(1708|
|000003c0| 35 20 63 68 61 72 61 63 | 74 65 72 73 5c 29 0a 73 |5 charac|ters\).s|
|000003d0| 65 64 20 22 73 2f 5e 58 | 2f 2f 22 20 3e 27 64 68 |ed "s/^X|//" >'dh|
|000003e0| 72 79 2e 63 27 20 3c 3c | 27 45 4e 44 5f 4f 46 5f |ry.c' <<|'END_OF_|
|000003f0| 46 49 4c 45 27 0a 58 2f | 2a 2a 2a 2a 2a 2a 2a 2a |FILE'.X/|********|
|00000400| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000410| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000420| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000430| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000440| 2a 2a 2a 2a 2a 2a 2a 0a | 58 20 2a 20 20 54 68 65 |*******.|X * The|
|00000450| 20 42 59 54 45 20 55 4e | 49 58 20 42 65 6e 63 68 | BYTE UN|IX Bench|
|00000460| 6d 61 72 6b 73 20 2d 20 | 52 65 6c 65 61 73 65 20 |marks - |Release |
|00000470| 32 0a 58 20 2a 20 20 20 | 20 20 20 20 20 20 20 4d |2.X * | M|
|00000480| 6f 64 75 6c 65 3a 20 64 | 68 72 79 2e 63 20 20 20 |odule: d|hry.c |
|00000490| 53 49 44 3a 20 32 2e 34 | 20 34 2f 31 37 2f 39 30 |SID: 2.4| 4/17/90|
|000004a0| 20 31 36 3a 34 35 3a 33 | 30 0a 58 20 2a 20 20 20 | 16:45:3|0.X * |
|000004b0| 20 20 20 20 20 20 20 0a | 58 20 2a 2a 2a 2a 2a 2a | .|X ******|
|000004c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000004d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000004e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000004f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000500| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 58 20 2a 20 42 75 |********|*.X * Bu|
|00000510| 67 20 72 65 70 6f 72 74 | 73 2c 20 70 61 74 63 68 |g report|s, patch|
|00000520| 65 73 2c 20 63 6f 6d 6d | 65 6e 74 73 2c 20 73 75 |es, comm|ents, su|
|00000530| 67 67 65 73 74 69 6f 6e | 73 20 73 68 6f 75 6c 64 |ggestion|s should|
|00000540| 20 62 65 20 73 65 6e 74 | 20 74 6f 3a 0a 58 20 2a | be sent| to:.X *|
|00000550| 0a 58 20 2a 09 42 65 6e | 20 53 6d 69 74 68 20 6f |.X *.Ben| Smith o|
|00000560| 72 20 52 69 63 6b 20 47 | 72 65 68 61 6e 20 61 74 |r Rick G|rehan at|
|00000570| 20 42 59 54 45 20 4d 61 | 67 61 7a 69 6e 65 0a 58 | BYTE Ma|gazine.X|
|00000580| 20 2a 09 62 65 6e 73 6d | 69 74 68 40 62 69 78 70 | *.bensm|ith@bixp|
|00000590| 62 2e 55 55 43 50 20 20 | 20 20 72 69 63 6b 5f 67 |b.UUCP | rick_g|
|000005a0| 40 62 69 78 70 62 2e 55 | 55 43 50 0a 58 20 2a 0a |@bixpb.U|UCP.X *.|
|000005b0| 58 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |X ******|********|
|000005c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000005d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000005e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000005f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000600| 2a 0a 58 20 2a 20 20 4d | 6f 64 69 66 69 63 61 74 |*.X * M|odificat|
|00000610| 69 6f 6e 20 4c 6f 67 3a | 0a 58 20 2a 20 61 64 61 |ion Log:|.X * ada|
|00000620| 70 74 65 64 20 66 72 6f | 6d 3a 20 22 44 48 52 59 |pted fro|m: "DHRY|
|00000630| 53 54 4f 4e 45 22 20 42 | 65 6e 63 68 6d 61 72 6b |STONE" B|enchmark|
|00000640| 20 50 72 6f 67 72 61 6d | 0a 58 20 2a 20 20 56 65 | Program|.X * Ve|
|00000650| 72 73 69 6f 6e 3a 20 20 | 20 20 43 2c 20 56 65 72 |rsion: | C, Ver|
|00000660| 73 69 6f 6e 20 32 2e 30 | 0a 58 20 2a 20 20 46 69 |sion 2.0|.X * Fi|
|00000670| 6c 65 3a 20 20 20 20 20 | 20 20 64 68 72 79 5f 70 |le: | dhry_p|
|00000680| 61 63 6b 5f 31 2e 63 20 | 28 70 61 72 74 20 32 20 |ack_1.c |(part 2 |
|00000690| 6f 66 20 33 29 0a 58 20 | 2a 20 20 44 61 74 65 3a |of 3).X |* Date:|
|000006a0| 20 20 20 20 20 20 20 4d | 61 72 63 68 20 33 2c 20 | M|arch 3, |
|000006b0| 31 39 38 38 0a 58 20 2a | 20 20 41 75 74 68 6f 72 |1988.X *| Author|
|000006c0| 3a 20 20 20 20 20 52 65 | 69 6e 68 6f 6c 64 20 50 |: Re|inhold P|
|000006d0| 2e 20 57 65 69 63 6b 65 | 72 0a 58 20 2a 20 61 64 |. Weicke|r.X * ad|
|000006e0| 64 65 64 20 63 6f 6d 6d | 61 6e 64 20 6c 69 6e 65 |ded comm|and line|
|000006f0| 20 70 61 72 61 6d 65 74 | 65 72 20 68 61 6e 64 6c | paramet|er handl|
|00000700| 69 6e 67 2c 20 6d 6f 64 | 69 66 69 65 64 20 65 72 |ing, mod|ified er|
|00000710| 72 6f 72 20 63 68 65 63 | 6b 0a 58 20 2a 20 74 6f |ror chec|k.X * to|
|00000720| 20 6f 75 74 70 75 74 20 | 6f 6e 6c 79 20 6f 6e 20 | output |only on |
|00000730| 65 72 72 6f 72 20 2d 20 | 62 65 6e 20 36 2f 38 39 |error - |ben 6/89|
|00000740| 0a 58 20 2a 0a 58 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.X *.X *|********|
|00000750| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000760| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000770| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000780| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000790| 2a 2a 2a 2a 2a 2f 0a 58 | 63 68 61 72 20 69 64 5b |*****/.X|char id[|
|000007a0| 5d 20 3d 20 22 40 28 23 | 29 20 40 28 23 29 64 68 |] = "@(#|) @(#)dh|
|000007b0| 72 79 2e 63 3a 32 2e 34 | 20 2d 2d 20 34 2f 31 37 |ry.c:2.4| -- 4/17|
|000007c0| 2f 39 30 20 31 36 3a 34 | 35 3a 33 30 22 3b 0a 58 |/90 16:4|5:30";.X|
|000007d0| 0a 58 23 69 6e 63 6c 75 | 64 65 20 22 64 68 72 79 |.X#inclu|de "dhry|
|000007e0| 2e 68 22 0a 58 0a 58 2f | 2a 20 47 6c 6f 62 61 6c |.h".X.X/|* Global|
|000007f0| 20 56 61 72 69 61 62 6c | 65 73 3a 20 2a 2f 0a 58 | Variabl|es: */.X|
|00000800| 0a 58 52 65 63 5f 50 6f | 69 6e 74 65 72 20 20 20 |.XRec_Po|inter |
|00000810| 20 20 50 74 72 5f 47 6c | 6f 62 2c 0a 58 20 20 20 | Ptr_Gl|ob,.X |
|00000820| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 4e 65 78 | | Nex|
|00000830| 74 5f 50 74 72 5f 47 6c | 6f 62 3b 0a 58 69 6e 74 |t_Ptr_Gl|ob;.Xint|
|00000840| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 49 6e 74 | | Int|
|00000850| 5f 47 6c 6f 62 3b 0a 58 | 42 6f 6f 6c 65 61 6e 20 |_Glob;.X|Boolean |
|00000860| 20 20 20 20 20 20 20 20 | 42 6f 6f 6c 5f 47 6c 6f | |Bool_Glo|
|00000870| 62 3b 0a 58 63 68 61 72 | 20 20 20 20 20 20 20 20 |b;.Xchar| |
|00000880| 20 20 20 20 43 68 5f 31 | 5f 47 6c 6f 62 2c 0a 58 | Ch_1|_Glob,.X|
|00000890| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000008a0| 43 68 5f 32 5f 47 6c 6f | 62 3b 0a 58 69 6e 74 20 |Ch_2_Glo|b;.Xint |
|000008b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 41 72 72 5f | | Arr_|
|000008c0| 31 5f 47 6c 6f 62 20 5b | 35 30 5d 3b 0a 58 69 6e |1_Glob [|50];.Xin|
|000008d0| 74 20 20 20 20 20 20 20 | 20 20 20 20 20 20 41 72 |t | Ar|
|000008e0| 72 5f 32 5f 47 6c 6f 62 | 20 5b 35 30 5d 20 5b 35 |r_2_Glob| [50] [5|
|000008f0| 30 5d 3b 0a 58 0a 58 65 | 78 74 65 72 6e 20 63 68 |0];.X.Xe|xtern ch|
|00000900| 61 72 20 20 20 20 20 2a | 6d 61 6c 6c 6f 63 20 28 |ar *|malloc (|
|00000910| 29 3b 0a 58 45 6e 75 6d | 65 72 61 74 69 6f 6e 20 |);.XEnum|eration |
|00000920| 20 20 20 20 46 75 6e 63 | 5f 31 20 28 29 3b 0a 58 | Func|_1 ();.X|
|00000930| 20 20 2f 2a 20 66 6f 72 | 77 61 72 64 20 64 65 63 | /* for|ward dec|
|00000940| 6c 61 72 61 74 69 6f 6e | 20 6e 65 63 65 73 73 61 |laration| necessa|
|00000950| 72 79 20 73 69 6e 63 65 | 20 45 6e 75 6d 65 72 61 |ry since| Enumera|
|00000960| 74 69 6f 6e 20 6d 61 79 | 20 6e 6f 74 20 73 69 6d |tion may| not sim|
|00000970| 70 6c 79 20 62 65 20 69 | 6e 74 20 2a 2f 0a 58 0a |ply be i|nt */.X.|
|00000980| 58 23 69 66 6e 64 65 66 | 20 52 45 47 0a 58 20 20 |X#ifndef| REG.X |
|00000990| 20 20 20 20 20 20 42 6f | 6f 6c 65 61 6e 20 52 65 | Bo|olean Re|
|000009a0| 67 20 3d 20 66 61 6c 73 | 65 3b 0a 58 23 64 65 66 |g = fals|e;.X#def|
|000009b0| 69 6e 65 20 52 45 47 0a | 58 20 20 20 20 20 20 20 |ine REG.|X |
|000009c0| 20 2f 2a 20 52 45 47 20 | 62 65 63 6f 6d 65 73 20 | /* REG |becomes |
|000009d0| 64 65 66 69 6e 65 64 20 | 61 73 20 65 6d 70 74 79 |defined |as empty|
|000009e0| 20 2a 2f 0a 58 20 20 20 | 20 20 20 20 20 2f 2a 20 | */.X | /* |
|000009f0| 69 2e 65 2e 20 6e 6f 20 | 72 65 67 69 73 74 65 72 |i.e. no |register|
|00000a00| 20 76 61 72 69 61 62 6c | 65 73 20 20 20 2a 2f 0a | variabl|es */.|
|00000a10| 58 23 65 6c 73 65 0a 58 | 20 20 20 20 20 20 20 20 |X#else.X| |
|00000a20| 42 6f 6f 6c 65 61 6e 20 | 52 65 67 20 3d 20 74 72 |Boolean |Reg = tr|
|00000a30| 75 65 3b 0a 58 23 65 6e | 64 69 66 0a 58 0a 58 2f |ue;.X#en|dif.X.X/|
|00000a40| 2a 20 76 61 72 69 61 62 | 6c 65 73 20 66 6f 72 20 |* variab|les for |
|00000a50| 74 69 6d 65 20 6d 65 61 | 73 75 72 65 6d 65 6e 74 |time mea|surement|
|00000a60| 3a 20 2a 2f 0a 58 0a 58 | 23 69 66 64 65 66 20 54 |: */.X.X|#ifdef T|
|00000a70| 49 4d 45 53 0a 58 73 74 | 72 75 63 74 20 74 6d 73 |IMES.Xst|ruct tms|
|00000a80| 20 20 20 20 20 20 74 69 | 6d 65 5f 69 6e 66 6f 3b | ti|me_info;|
|00000a90| 0a 58 65 78 74 65 72 6e | 20 20 69 6e 74 20 20 20 |.Xextern| int |
|00000aa0| 20 20 74 69 6d 65 73 20 | 28 29 3b 0a 58 20 20 20 | times |();.X |
|00000ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2f 2a 20 | | /* |
|00000ac0| 73 65 65 20 6c 69 62 72 | 61 72 79 20 66 75 6e 63 |see libr|ary func|
|00000ad0| 74 69 6f 6e 20 22 74 69 | 6d 65 73 22 20 2a 2f 0a |tion "ti|mes" */.|
|00000ae0| 58 23 65 6e 64 69 66 0a | 58 23 69 66 64 65 66 20 |X#endif.|X#ifdef |
|00000af0| 54 49 4d 45 0a 58 65 78 | 74 65 72 6e 20 6c 6f 6e |TIME.Xex|tern lon|
|00000b00| 67 20 20 20 20 20 74 69 | 6d 65 28 29 3b 0a 58 20 |g ti|me();.X |
|00000b10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2f | | /|
|00000b20| 2a 20 73 65 65 20 6c 69 | 62 72 61 72 79 20 66 75 |* see li|brary fu|
|00000b30| 6e 63 74 69 6f 6e 20 22 | 74 69 6d 65 22 20 20 2a |nction "|time" *|
|00000b40| 2f 0a 58 23 65 6e 64 69 | 66 0a 58 0a 58 23 64 65 |/.X#endi|f.X.X#de|
|00000b50| 66 69 6e 65 20 54 6f 6f | 5f 53 6d 61 6c 6c 5f 54 |fine Too|_Small_T|
|00000b60| 69 6d 65 20 32 0a 58 20 | 20 20 20 20 20 20 20 20 |ime 2.X | |
|00000b70| 20 20 20 20 20 20 20 2f | 2a 20 4d 65 61 73 75 72 | /|* Measur|
|00000b80| 65 6d 65 6e 74 73 20 73 | 68 6f 75 6c 64 20 6c 61 |ements s|hould la|
|00000b90| 73 74 20 61 74 20 6c 65 | 61 73 74 20 32 20 73 65 |st at le|ast 2 se|
|00000ba0| 63 6f 6e 64 73 20 2a 2f | 0a 58 0a 58 6c 6f 6e 67 |conds */|.X.Xlong|
|00000bb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 42 65 67 69 | | Begi|
|00000bc0| 6e 5f 54 69 6d 65 2c 0a | 58 20 20 20 20 20 20 20 |n_Time,.|X |
|00000bd0| 20 20 20 20 20 20 20 20 | 20 45 6e 64 5f 54 69 6d | | End_Tim|
|00000be0| 65 2c 0a 58 20 20 20 20 | 20 20 20 20 20 20 20 20 |e,.X | |
|00000bf0| 20 20 20 20 55 73 65 72 | 5f 54 69 6d 65 3b 0a 58 | User|_Time;.X|
|00000c00| 66 6c 6f 61 74 20 20 20 | 20 20 20 20 20 20 20 20 |float | |
|00000c10| 4d 69 63 72 6f 73 65 63 | 6f 6e 64 73 2c 0a 58 20 |Microsec|onds,.X |
|00000c20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 44 | | D|
|00000c30| 68 72 79 73 74 6f 6e 65 | 73 5f 50 65 72 5f 53 65 |hrystone|s_Per_Se|
|00000c40| 63 6f 6e 64 3b 0a 58 0a | 58 2f 2a 20 65 6e 64 20 |cond;.X.|X/* end |
|00000c50| 6f 66 20 76 61 72 69 61 | 62 6c 65 73 20 66 6f 72 |of varia|bles for|
|00000c60| 20 74 69 6d 65 20 6d 65 | 61 73 75 72 65 6d 65 6e | time me|asuremen|
|00000c70| 74 20 2a 2f 0a 58 0a 58 | 0a 58 6d 61 69 6e 20 28 |t */.X.X|.Xmain (|
|00000c80| 61 72 67 63 2c 20 61 72 | 67 76 2c 20 65 6e 76 29 |argc, ar|gv, env)|
|00000c90| 0a 58 69 6e 74 20 61 72 | 67 63 3b 0a 58 63 68 61 |.Xint ar|gc;.Xcha|
|00000ca0| 72 20 2a 61 72 67 76 5b | 5d 2c 20 2a 65 6e 76 5b |r *argv[|], *env[|
|00000cb0| 5d 3b 0a 58 20 20 2f 2a | 20 6d 61 69 6e 20 70 72 |];.X /*| main pr|
|00000cc0| 6f 67 72 61 6d 2c 20 63 | 6f 72 72 65 73 70 6f 6e |ogram, c|orrespon|
|00000cd0| 64 73 20 74 6f 20 70 72 | 6f 63 65 64 75 72 65 73 |ds to pr|ocedures|
|00000ce0| 20 20 20 20 20 20 20 20 | 2a 2f 0a 58 20 20 2f 2a | |*/.X /*|
|00000cf0| 20 4d 61 69 6e 20 61 6e | 64 20 50 72 6f 63 5f 30 | Main an|d Proc_0|
|00000d00| 20 69 6e 20 74 68 65 20 | 41 64 61 20 76 65 72 73 | in the |Ada vers|
|00000d10| 69 6f 6e 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ion | |
|00000d20| 2a 2f 0a 58 0a 58 7b 0a | 58 20 20 20 20 20 20 20 |*/.X.X{.|X |
|00000d30| 20 4f 6e 65 5f 46 69 66 | 74 79 20 20 20 20 20 20 | One_Fif|ty |
|00000d40| 20 49 6e 74 5f 31 5f 4c | 6f 63 3b 0a 58 20 20 52 | Int_1_L|oc;.X R|
|00000d50| 45 47 20 20 20 4f 6e 65 | 5f 46 69 66 74 79 20 20 |EG One|_Fifty |
|00000d60| 20 20 20 20 20 49 6e 74 | 5f 32 5f 4c 6f 63 3b 0a | Int|_2_Loc;.|
|00000d70| 58 20 20 20 20 20 20 20 | 20 4f 6e 65 5f 46 69 66 |X | One_Fif|
|00000d80| 74 79 20 20 20 20 20 20 | 20 49 6e 74 5f 33 5f 4c |ty | Int_3_L|
|00000d90| 6f 63 3b 0a 58 20 20 52 | 45 47 20 20 20 63 68 61 |oc;.X R|EG cha|
|00000da0| 72 20 20 20 20 20 20 20 | 20 20 20 20 20 43 68 5f |r | Ch_|
|00000db0| 49 6e 64 65 78 3b 0a 58 | 20 20 20 20 20 20 20 20 |Index;.X| |
|00000dc0| 45 6e 75 6d 65 72 61 74 | 69 6f 6e 20 20 20 20 20 |Enumerat|ion |
|00000dd0| 45 6e 75 6d 5f 4c 6f 63 | 3b 0a 58 20 20 20 20 20 |Enum_Loc|;.X |
|00000de0| 20 20 20 53 74 72 5f 33 | 30 20 20 20 20 20 20 20 | Str_3|0 |
|00000df0| 20 20 20 53 74 72 5f 31 | 5f 4c 6f 63 3b 0a 58 20 | Str_1|_Loc;.X |
|00000e00| 20 20 20 20 20 20 20 53 | 74 72 5f 33 30 20 20 20 | S|tr_30 |
|00000e10| 20 20 20 20 20 20 20 53 | 74 72 5f 32 5f 4c 6f 63 | S|tr_2_Loc|
|00000e20| 3b 0a 58 20 20 52 45 47 | 20 20 20 69 6e 74 20 20 |;.X REG| int |
|00000e30| 20 20 20 20 20 20 20 20 | 20 20 20 52 75 6e 5f 49 | | Run_I|
|00000e40| 6e 64 65 78 3b 0a 58 20 | 20 52 45 47 20 20 20 69 |ndex;.X | REG i|
|00000e50| 6e 74 20 20 20 20 20 20 | 20 20 20 20 20 20 20 4e |nt | N|
|00000e60| 75 6d 62 65 72 5f 4f 66 | 5f 52 75 6e 73 20 3d 20 |umber_Of|_Runs = |
|00000e70| 31 30 30 30 30 3b 0a 58 | 0a 58 0a 58 20 20 2f 2a |10000;.X|.X.X /*|
|00000e80| 20 49 6e 69 74 69 61 6c | 69 7a 61 74 69 6f 6e 73 | Initial|izations|
|00000e90| 20 2a 2f 0a 58 0a 58 20 | 20 4e 65 78 74 5f 50 74 | */.X.X | Next_Pt|
|00000ea0| 72 5f 47 6c 6f 62 20 3d | 20 28 52 65 63 5f 50 6f |r_Glob =| (Rec_Po|
|00000eb0| 69 6e 74 65 72 29 20 6d | 61 6c 6c 6f 63 20 28 73 |inter) m|alloc (s|
|00000ec0| 69 7a 65 6f 66 20 28 52 | 65 63 5f 54 79 70 65 29 |izeof (R|ec_Type)|
|00000ed0| 29 3b 0a 58 20 20 50 74 | 72 5f 47 6c 6f 62 20 3d |);.X Pt|r_Glob =|
|00000ee0| 20 28 52 65 63 5f 50 6f | 69 6e 74 65 72 29 20 6d | (Rec_Po|inter) m|
|00000ef0| 61 6c 6c 6f 63 20 28 73 | 69 7a 65 6f 66 20 28 52 |alloc (s|izeof (R|
|00000f00| 65 63 5f 54 79 70 65 29 | 29 3b 0a 58 0a 58 20 20 |ec_Type)|);.X.X |
|00000f10| 50 74 72 5f 47 6c 6f 62 | 2d 3e 50 74 72 5f 43 6f |Ptr_Glob|->Ptr_Co|
|00000f20| 6d 70 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |mp | |
|00000f30| 20 20 20 20 20 20 3d 20 | 4e 65 78 74 5f 50 74 72 | = |Next_Ptr|
|00000f40| 5f 47 6c 6f 62 3b 0a 58 | 20 20 50 74 72 5f 47 6c |_Glob;.X| Ptr_Gl|
|00000f50| 6f 62 2d 3e 44 69 73 63 | 72 20 20 20 20 20 20 20 |ob->Disc|r |
|00000f60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000f70| 3d 20 49 64 65 6e 74 5f | 31 3b 0a 58 20 20 50 74 |= Ident_|1;.X Pt|
|00000f80| 72 5f 47 6c 6f 62 2d 3e | 76 61 72 69 61 6e 74 2e |r_Glob->|variant.|
|00000f90| 76 61 72 5f 31 2e 45 6e | 75 6d 5f 43 6f 6d 70 20 |var_1.En|um_Comp |
|00000fa0| 20 20 20 20 3d 20 49 64 | 65 6e 74 5f 33 3b 0a 58 | = Id|ent_3;.X|
|00000fb0| 20 20 50 74 72 5f 47 6c | 6f 62 2d 3e 76 61 72 69 | Ptr_Gl|ob->vari|
|00000fc0| 61 6e 74 2e 76 61 72 5f | 31 2e 49 6e 74 5f 43 6f |ant.var_|1.Int_Co|
|00000fd0| 6d 70 20 20 20 20 20 20 | 3d 20 34 30 3b 0a 58 20 |mp |= 40;.X |
|00000fe0| 20 73 74 72 63 70 79 20 | 28 50 74 72 5f 47 6c 6f | strcpy |(Ptr_Glo|
|00000ff0| 62 2d 3e 76 61 72 69 61 | 6e 74 2e 76 61 72 5f 31 |b->varia|nt.var_1|
|00001000| 2e 53 74 72 5f 43 6f 6d | 70 2c 20 53 54 52 5f 30 |.Str_Com|p, STR_0|
|00001010| 5f 50 41 52 5f 52 45 46 | 29 3b 0a 58 20 20 73 74 |_PAR_REF|);.X st|
|00001020| 72 63 70 79 20 28 53 74 | 72 5f 31 5f 4c 6f 63 2c |rcpy (St|r_1_Loc,|
|00001030| 20 53 54 52 5f 31 5f 50 | 41 52 5f 52 45 46 29 3b | STR_1_P|AR_REF);|
|00001040| 0a 58 0a 58 20 20 41 72 | 72 5f 32 5f 47 6c 6f 62 |.X.X Ar|r_2_Glob|
|00001050| 20 5b 38 5d 5b 37 5d 20 | 3d 20 31 30 3b 0a 58 20 | [8][7] |= 10;.X |
|00001060| 20 20 20 20 20 20 20 2f | 2a 20 57 61 73 20 6d 69 | /|* Was mi|
|00001070| 73 73 69 6e 67 20 69 6e | 20 70 75 62 6c 69 73 68 |ssing in| publish|
|00001080| 65 64 20 70 72 6f 67 72 | 61 6d 2e 20 57 69 74 68 |ed progr|am. With|
|00001090| 6f 75 74 20 74 68 69 73 | 20 20 20 20 20 20 20 20 |out this| |
|000010a0| 20 20 20 20 20 20 20 2a | 2f 0a 58 20 20 20 20 20 | *|/.X |
|000010b0| 20 20 20 2f 2a 20 69 6e | 69 74 69 61 6c 69 7a 61 | /* in|itializa|
|000010c0| 74 69 6f 6e 2c 20 41 72 | 72 5f 32 5f 47 6c 6f 62 |tion, Ar|r_2_Glob|
|000010d0| 20 5b 38 5d 5b 37 5d 20 | 77 6f 75 6c 64 20 68 61 | [8][7] |would ha|
|000010e0| 76 65 20 61 6e 20 20 20 | 20 20 20 20 20 20 20 20 |ve an | |
|000010f0| 20 20 20 2a 2f 0a 58 20 | 20 20 20 20 20 20 20 2f | */.X | /|
|00001100| 2a 20 75 6e 64 65 66 69 | 6e 65 64 20 76 61 6c 75 |* undefi|ned valu|
|00001110| 65 2e 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |e. | |
|00001120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001130| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2a | | *|
|00001140| 2f 0a 58 20 20 20 20 20 | 20 20 20 2f 2a 20 57 61 |/.X | /* Wa|
|00001150| 72 6e 69 6e 67 3a 20 57 | 69 74 68 20 31 36 2d 42 |rning: W|ith 16-B|
|00001160| 69 74 20 70 72 6f 63 65 | 73 73 6f 72 73 20 61 6e |it proce|ssors an|
|00001170| 64 20 4e 75 6d 62 65 72 | 5f 4f 66 5f 52 75 6e 73 |d Number|_Of_Runs|
|00001180| 20 3e 20 33 32 30 30 30 | 2c 20 20 2a 2f 0a 58 20 | > 32000|, */.X |
|00001190| 20 20 20 20 20 20 20 2f | 2a 20 6f 76 65 72 66 6c | /|* overfl|
|000011a0| 6f 77 20 6d 61 79 20 6f | 63 63 75 72 20 66 6f 72 |ow may o|ccur for|
|000011b0| 20 74 68 69 73 20 61 72 | 72 61 79 20 65 6c 65 6d | this ar|ray elem|
|000011c0| 65 6e 74 2e 20 20 20 20 | 20 20 20 20 20 20 20 20 |ent. | |
|000011d0| 20 20 20 20 20 20 20 2a | 2f 0a 58 0a 58 20 20 69 | *|/.X.X i|
|000011e0| 66 28 61 72 67 63 20 3e | 20 31 29 20 4e 75 6d 62 |f(argc >| 1) Numb|
|000011f0| 65 72 5f 4f 66 5f 52 75 | 6e 73 20 3d 20 61 74 6f |er_Of_Ru|ns = ato|
|00001200| 69 28 61 72 67 76 5b 31 | 5d 29 3b 0a 58 20 20 2f |i(argv[1|]);.X /|
|00001210| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2f |********|*******/|
|00001220| 0a 58 20 20 2f 2a 20 53 | 74 61 72 74 20 74 69 6d |.X /* S|tart tim|
|00001230| 65 72 20 2a 2f 0a 58 20 | 20 2f 2a 2a 2a 2a 2a 2a |er */.X | /******|
|00001240| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2f 0a 58 20 0a 58 23 |********|*/.X .X#|
|00001250| 69 66 64 65 66 20 54 49 | 4d 45 53 0a 58 20 20 74 |ifdef TI|MES.X t|
|00001260| 69 6d 65 73 20 28 26 74 | 69 6d 65 5f 69 6e 66 6f |imes (&t|ime_info|
|00001270| 29 3b 0a 58 20 20 42 65 | 67 69 6e 5f 54 69 6d 65 |);.X Be|gin_Time|
|00001280| 20 3d 20 28 6c 6f 6e 67 | 29 20 74 69 6d 65 5f 69 | = (long|) time_i|
|00001290| 6e 66 6f 2e 74 6d 73 5f | 75 74 69 6d 65 3b 0a 58 |nfo.tms_|utime;.X|
|000012a0| 23 65 6e 64 69 66 0a 58 | 23 69 66 64 65 66 20 54 |#endif.X|#ifdef T|
|000012b0| 49 4d 45 0a 58 20 20 42 | 65 67 69 6e 5f 54 69 6d |IME.X B|egin_Tim|
|000012c0| 65 20 3d 20 74 69 6d 65 | 20 28 20 28 6c 6f 6e 67 |e = time| ( (long|
|000012d0| 20 2a 29 20 30 29 3b 0a | 58 23 65 6e 64 69 66 0a | *) 0);.|X#endif.|
|000012e0| 58 0a 58 20 20 66 6f 72 | 20 28 52 75 6e 5f 49 6e |X.X for| (Run_In|
|000012f0| 64 65 78 20 3d 20 31 3b | 20 52 75 6e 5f 49 6e 64 |dex = 1;| Run_Ind|
|00001300| 65 78 20 3c 3d 20 4e 75 | 6d 62 65 72 5f 4f 66 5f |ex <= Nu|mber_Of_|
|00001310| 52 75 6e 73 3b 20 2b 2b | 52 75 6e 5f 49 6e 64 65 |Runs; ++|Run_Inde|
|00001320| 78 29 0a 58 20 20 7b 0a | 58 0a 58 20 20 20 20 50 |x).X {.|X.X P|
|00001330| 72 6f 63 5f 35 28 29 3b | 0a 58 20 20 20 20 50 72 |roc_5();|.X Pr|
|00001340| 6f 63 5f 34 28 29 3b 0a | 58 20 20 20 20 20 20 2f |oc_4();.|X /|
|00001350| 2a 20 43 68 5f 31 5f 47 | 6c 6f 62 20 3d 3d 20 27 |* Ch_1_G|lob == '|
|00001360| 41 27 2c 20 43 68 5f 32 | 5f 47 6c 6f 62 20 3d 3d |A', Ch_2|_Glob ==|
|00001370| 20 27 42 27 2c 20 42 6f | 6f 6c 5f 47 6c 6f 62 20 | 'B', Bo|ol_Glob |
|00001380| 3d 3d 20 74 72 75 65 20 | 2a 2f 0a 58 20 20 20 20 |== true |*/.X |
|00001390| 49 6e 74 5f 31 5f 4c 6f | 63 20 3d 20 32 3b 0a 58 |Int_1_Lo|c = 2;.X|
|000013a0| 20 20 20 20 49 6e 74 5f | 32 5f 4c 6f 63 20 3d 20 | Int_|2_Loc = |
|000013b0| 33 3b 0a 58 20 20 20 20 | 73 74 72 63 70 79 20 28 |3;.X |strcpy (|
|000013c0| 53 74 72 5f 32 5f 4c 6f | 63 2c 20 22 44 48 52 59 |Str_2_Lo|c, "DHRY|
|000013d0| 53 54 4f 4e 45 20 50 52 | 4f 47 52 41 4d 2c 20 32 |STONE PR|OGRAM, 2|
|000013e0| 27 4e 44 20 53 54 52 49 | 4e 47 22 29 3b 0a 58 20 |'ND STRI|NG");.X |
|000013f0| 20 20 20 45 6e 75 6d 5f | 4c 6f 63 20 3d 20 49 64 | Enum_|Loc = Id|
|00001400| 65 6e 74 5f 32 3b 0a 58 | 20 20 20 20 42 6f 6f 6c |ent_2;.X| Bool|
|00001410| 5f 47 6c 6f 62 20 3d 20 | 21 20 46 75 6e 63 5f 32 |_Glob = |! Func_2|
|00001420| 20 28 53 74 72 5f 31 5f | 4c 6f 63 2c 20 53 74 72 | (Str_1_|Loc, Str|
|00001430| 5f 32 5f 4c 6f 63 29 3b | 0a 58 20 20 20 20 20 20 |_2_Loc);|.X |
|00001440| 2f 2a 20 42 6f 6f 6c 5f | 47 6c 6f 62 20 3d 3d 20 |/* Bool_|Glob == |
|00001450| 31 20 2a 2f 0a 58 20 20 | 20 20 77 68 69 6c 65 20 |1 */.X | while |
|00001460| 28 49 6e 74 5f 31 5f 4c | 6f 63 20 3c 20 49 6e 74 |(Int_1_L|oc < Int|
|00001470| 5f 32 5f 4c 6f 63 29 20 | 20 2f 2a 20 6c 6f 6f 70 |_2_Loc) | /* loop|
|00001480| 20 62 6f 64 79 20 65 78 | 65 63 75 74 65 64 20 6f | body ex|ecuted o|
|00001490| 6e 63 65 20 2a 2f 0a 58 | 20 20 20 20 7b 0a 58 20 |nce */.X| {.X |
|000014a0| 20 20 20 20 20 49 6e 74 | 5f 33 5f 4c 6f 63 20 3d | Int|_3_Loc =|
|000014b0| 20 35 20 2a 20 49 6e 74 | 5f 31 5f 4c 6f 63 20 2d | 5 * Int|_1_Loc -|
|000014c0| 20 49 6e 74 5f 32 5f 4c | 6f 63 3b 0a 58 20 20 20 | Int_2_L|oc;.X |
|000014d0| 20 20 20 20 20 2f 2a 20 | 49 6e 74 5f 33 5f 4c 6f | /* |Int_3_Lo|
|000014e0| 63 20 3d 3d 20 37 20 2a | 2f 0a 58 20 20 20 20 20 |c == 7 *|/.X |
|000014f0| 20 50 72 6f 63 5f 37 20 | 28 49 6e 74 5f 31 5f 4c | Proc_7 |(Int_1_L|
|00001500| 6f 63 2c 20 49 6e 74 5f | 32 5f 4c 6f 63 2c 20 26 |oc, Int_|2_Loc, &|
|00001510| 49 6e 74 5f 33 5f 4c 6f | 63 29 3b 0a 58 20 20 20 |Int_3_Lo|c);.X |
|00001520| 20 20 20 20 20 2f 2a 20 | 49 6e 74 5f 33 5f 4c 6f | /* |Int_3_Lo|
|00001530| 63 20 3d 3d 20 37 20 2a | 2f 0a 58 20 20 20 20 20 |c == 7 *|/.X |
|00001540| 20 49 6e 74 5f 31 5f 4c | 6f 63 20 2b 3d 20 31 3b | Int_1_L|oc += 1;|
|00001550| 0a 58 20 20 20 20 7d 20 | 2f 2a 20 77 68 69 6c 65 |.X } |/* while|
|00001560| 20 2a 2f 0a 58 20 20 20 | 20 20 20 2f 2a 20 49 6e | */.X | /* In|
|00001570| 74 5f 31 5f 4c 6f 63 20 | 3d 3d 20 33 2c 20 49 6e |t_1_Loc |== 3, In|
|00001580| 74 5f 32 5f 4c 6f 63 20 | 3d 3d 20 33 2c 20 49 6e |t_2_Loc |== 3, In|
|00001590| 74 5f 33 5f 4c 6f 63 20 | 3d 3d 20 37 20 2a 2f 0a |t_3_Loc |== 7 */.|
|000015a0| 58 20 20 20 20 50 72 6f | 63 5f 38 20 28 41 72 72 |X Pro|c_8 (Arr|
|000015b0| 5f 31 5f 47 6c 6f 62 2c | 20 41 72 72 5f 32 5f 47 |_1_Glob,| Arr_2_G|
|000015c0| 6c 6f 62 2c 20 49 6e 74 | 5f 31 5f 4c 6f 63 2c 20 |lob, Int|_1_Loc, |
|000015d0| 49 6e 74 5f 33 5f 4c 6f | 63 29 3b 0a 58 20 20 20 |Int_3_Lo|c);.X |
|000015e0| 20 20 20 2f 2a 20 49 6e | 74 5f 47 6c 6f 62 20 3d | /* In|t_Glob =|
|000015f0| 3d 20 35 20 2a 2f 0a 58 | 20 20 20 20 50 72 6f 63 |= 5 */.X| Proc|
|00001600| 5f 31 20 28 50 74 72 5f | 47 6c 6f 62 29 3b 0a 58 |_1 (Ptr_|Glob);.X|
|00001610| 20 20 20 20 66 6f 72 20 | 28 43 68 5f 49 6e 64 65 | for |(Ch_Inde|
|00001620| 78 20 3d 20 27 41 27 3b | 20 43 68 5f 49 6e 64 65 |x = 'A';| Ch_Inde|
|00001630| 78 20 3c 3d 20 43 68 5f | 32 5f 47 6c 6f 62 3b 20 |x <= Ch_|2_Glob; |
|00001640| 2b 2b 43 68 5f 49 6e 64 | 65 78 29 0a 58 20 20 20 |++Ch_Ind|ex).X |
|00001650| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001660| 20 20 20 20 20 20 20 20 | 20 20 2f 2a 20 6c 6f 6f | | /* loo|
|00001670| 70 20 62 6f 64 79 20 65 | 78 65 63 75 74 65 64 20 |p body e|xecuted |
|00001680| 74 77 69 63 65 20 2a 2f | 0a 58 20 20 20 20 7b 0a |twice */|.X {.|
|00001690| 58 20 20 20 20 20 20 69 | 66 20 28 45 6e 75 6d 5f |X i|f (Enum_|
|000016a0| 4c 6f 63 20 3d 3d 20 46 | 75 6e 63 5f 31 20 28 43 |Loc == F|unc_1 (C|
|000016b0| 68 5f 49 6e 64 65 78 2c | 20 27 43 27 29 29 0a 58 |h_Index,| 'C')).X|
|000016c0| 20 20 20 20 20 20 20 20 | 20 20 2f 2a 20 74 68 65 | | /* the|
|000016d0| 6e 2c 20 6e 6f 74 20 65 | 78 65 63 75 74 65 64 20 |n, not e|xecuted |
|000016e0| 2a 2f 0a 58 20 20 20 20 | 20 20 20 20 7b 0a 58 20 |*/.X | {.X |
|000016f0| 20 20 20 20 20 20 20 50 | 72 6f 63 5f 36 20 28 49 | P|roc_6 (I|
|00001700| 64 65 6e 74 5f 31 2c 20 | 26 45 6e 75 6d 5f 4c 6f |dent_1, |&Enum_Lo|
|00001710| 63 29 3b 0a 58 20 20 20 | 20 20 20 20 20 73 74 72 |c);.X | str|
|00001720| 63 70 79 20 28 53 74 72 | 5f 32 5f 4c 6f 63 2c 20 |cpy (Str|_2_Loc, |
|00001730| 22 44 48 52 59 53 54 4f | 4e 45 20 50 52 4f 47 52 |"DHRYSTO|NE PROGR|
|00001740| 41 4d 2c 20 33 27 52 44 | 20 53 54 52 49 4e 47 22 |AM, 3'RD| STRING"|
|00001750| 29 3b 0a 58 20 20 20 20 | 20 20 20 20 49 6e 74 5f |);.X | Int_|
|00001760| 32 5f 4c 6f 63 20 3d 20 | 52 75 6e 5f 49 6e 64 65 |2_Loc = |Run_Inde|
|00001770| 78 3b 0a 58 20 20 20 20 | 20 20 20 20 49 6e 74 5f |x;.X | Int_|
|00001780| 47 6c 6f 62 20 3d 20 52 | 75 6e 5f 49 6e 64 65 78 |Glob = R|un_Index|
|00001790| 3b 0a 58 20 20 20 20 20 | 20 20 20 7d 0a 58 20 20 |;.X | }.X |
|000017a0| 20 20 7d 0a 58 20 20 20 | 20 20 20 2f 2a 20 49 6e | }.X | /* In|
|000017b0| 74 5f 31 5f 4c 6f 63 20 | 3d 3d 20 33 2c 20 49 6e |t_1_Loc |== 3, In|
|000017c0| 74 5f 32 5f 4c 6f 63 20 | 3d 3d 20 33 2c 20 49 6e |t_2_Loc |== 3, In|
|000017d0| 74 5f 33 5f 4c 6f 63 20 | 3d 3d 20 37 20 2a 2f 0a |t_3_Loc |== 7 */.|
|000017e0| 58 20 20 20 20 49 6e 74 | 5f 32 5f 4c 6f 63 20 3d |X Int|_2_Loc =|
|000017f0| 20 49 6e 74 5f 32 5f 4c | 6f 63 20 2a 20 49 6e 74 | Int_2_L|oc * Int|
|00001800| 5f 31 5f 4c 6f 63 3b 0a | 58 20 20 20 20 49 6e 74 |_1_Loc;.|X Int|
|00001810| 5f 31 5f 4c 6f 63 20 3d | 20 49 6e 74 5f 32 5f 4c |_1_Loc =| Int_2_L|
|00001820| 6f 63 20 2f 20 49 6e 74 | 5f 33 5f 4c 6f 63 3b 0a |oc / Int|_3_Loc;.|
|00001830| 58 20 20 20 20 49 6e 74 | 5f 32 5f 4c 6f 63 20 3d |X Int|_2_Loc =|
|00001840| 20 37 20 2a 20 28 49 6e | 74 5f 32 5f 4c 6f 63 20 | 7 * (In|t_2_Loc |
|00001850| 2d 20 49 6e 74 5f 33 5f | 4c 6f 63 29 20 2d 20 49 |- Int_3_|Loc) - I|
|00001860| 6e 74 5f 31 5f 4c 6f 63 | 3b 0a 58 20 20 20 20 20 |nt_1_Loc|;.X |
|00001870| 20 2f 2a 20 49 6e 74 5f | 31 5f 4c 6f 63 20 3d 3d | /* Int_|1_Loc ==|
|00001880| 20 31 2c 20 49 6e 74 5f | 32 5f 4c 6f 63 20 3d 3d | 1, Int_|2_Loc ==|
|00001890| 20 31 33 2c 20 49 6e 74 | 5f 33 5f 4c 6f 63 20 3d | 13, Int|_3_Loc =|
|000018a0| 3d 20 37 20 2a 2f 0a 58 | 20 20 20 20 50 72 6f 63 |= 7 */.X| Proc|
|000018b0| 5f 32 20 28 26 49 6e 74 | 5f 31 5f 4c 6f 63 29 3b |_2 (&Int|_1_Loc);|
|000018c0| 0a 58 20 20 20 20 20 20 | 2f 2a 20 49 6e 74 5f 31 |.X |/* Int_1|
|000018d0| 5f 4c 6f 63 20 3d 3d 20 | 35 20 2a 2f 0a 58 0a 58 |_Loc == |5 */.X.X|
|000018e0| 20 20 7d 20 2f 2a 20 6c | 6f 6f 70 20 22 66 6f 72 | } /* l|oop "for|
|000018f0| 20 52 75 6e 5f 49 6e 64 | 65 78 22 20 2a 2f 0a 58 | Run_Ind|ex" */.X|
|00001900| 0a 58 20 20 2f 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.X /***|********|
|00001910| 2a 2a 2a 2f 0a 58 20 20 | 2f 2a 20 53 74 6f 70 20 |***/.X |/* Stop |
|00001920| 74 69 6d 65 72 20 2a 2f | 0a 58 20 20 2f 2a 2a 2a |timer */|.X /***|
|00001930| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2f 0a 58 20 20 |********|***/.X |
|00001940| 0a 58 23 69 66 64 65 66 | 20 54 49 4d 45 53 0a 58 |.X#ifdef| TIMES.X|
|00001950| 20 20 74 69 6d 65 73 20 | 28 26 74 69 6d 65 5f 69 | times |(&time_i|
|00001960| 6e 66 6f 29 3b 0a 58 20 | 20 45 6e 64 5f 54 69 6d |nfo);.X | End_Tim|
|00001970| 65 20 3d 20 28 6c 6f 6e | 67 29 20 74 69 6d 65 5f |e = (lon|g) time_|
|00001980| 69 6e 66 6f 2e 74 6d 73 | 5f 75 74 69 6d 65 3b 0a |info.tms|_utime;.|
|00001990| 58 23 65 6e 64 69 66 0a | 58 23 69 66 64 65 66 20 |X#endif.|X#ifdef |
|000019a0| 54 49 4d 45 0a 58 20 20 | 45 6e 64 5f 54 69 6d 65 |TIME.X |End_Time|
|000019b0| 20 3d 20 74 69 6d 65 20 | 28 20 28 6c 6f 6e 67 20 | = time |( (long |
|000019c0| 2a 29 20 30 29 3b 0a 58 | 23 65 6e 64 69 66 0a 58 |*) 0);.X|#endif.X|
|000019d0| 0a 58 20 20 69 66 28 49 | 6e 74 5f 47 6c 6f 62 20 |.X if(I|nt_Glob |
|000019e0| 21 3d 20 49 4e 54 5f 47 | 4c 4f 42 29 0a 58 09 7b |!= INT_G|LOB).X.{|
|000019f0| 0a 58 20 20 09 66 70 72 | 69 6e 74 66 20 28 73 74 |.X .fpr|intf (st|
|00001a00| 64 65 72 72 2c 20 22 49 | 6e 74 5f 47 6c 6f 62 3a |derr, "I|nt_Glob:|
|00001a10| 20 20 20 20 20 20 20 20 | 20 20 20 20 25 64 5c 6e | | %d\n|
|00001a20| 22 2c 20 49 6e 74 5f 47 | 6c 6f 62 29 3b 0a 58 20 |", Int_G|lob);.X |
|00001a30| 20 09 66 70 72 69 6e 74 | 66 20 28 73 74 64 65 72 | .fprint|f (stder|
|00001a40| 72 2c 20 22 20 20 20 20 | 20 20 20 20 73 68 6f 75 |r, " | shou|
|00001a50| 6c 64 20 62 65 3a 20 20 | 20 25 64 5c 6e 22 2c 20 |ld be: | %d\n", |
|00001a60| 49 4e 54 5f 47 4c 4f 42 | 29 3b 0a 58 09 7d 0a 58 |INT_GLOB|);.X.}.X|
|00001a70| 20 20 69 66 28 42 6f 6f | 6c 5f 47 6c 6f 62 20 21 | if(Boo|l_Glob !|
|00001a80| 3d 20 42 4f 4f 4c 5f 47 | 4c 4f 42 29 0a 58 09 7b |= BOOL_G|LOB).X.{|
|00001a90| 0a 58 20 20 09 66 70 72 | 69 6e 74 66 20 28 73 74 |.X .fpr|intf (st|
|00001aa0| 64 65 72 72 2c 20 22 42 | 6f 6f 6c 5f 47 6c 6f 62 |derr, "B|ool_Glob|
|00001ab0| 3a 20 20 20 20 20 20 20 | 20 20 20 20 25 64 5c 6e |: | %d\n|
|00001ac0| 22 2c 20 42 6f 6f 6c 5f | 47 6c 6f 62 29 3b 0a 58 |", Bool_|Glob);.X|
|00001ad0| 20 20 09 66 70 72 69 6e | 74 66 20 28 73 74 64 65 | .fprin|tf (stde|
|00001ae0| 72 72 2c 20 22 20 20 20 | 20 20 20 20 20 73 68 6f |rr, " | sho|
|00001af0| 75 6c 64 20 62 65 3a 20 | 20 20 25 64 5c 6e 22 2c |uld be: | %d\n",|
|00001b00| 20 42 4f 4f 4c 5f 47 4c | 4f 42 29 3b 0a 58 09 7d | BOOL_GL|OB);.X.}|
|00001b10| 0a 58 20 20 69 66 28 43 | 68 5f 31 5f 47 6c 6f 62 |.X if(C|h_1_Glob|
|00001b20| 20 21 3d 20 27 41 27 29 | 0a 58 09 7b 0a 58 20 20 | != 'A')|.X.{.X |
|00001b30| 09 66 70 72 69 6e 74 66 | 20 28 73 74 64 65 72 72 |.fprintf| (stderr|
|00001b40| 2c 20 22 43 68 5f 31 5f | 47 6c 6f 62 3a 20 20 20 |, "Ch_1_|Glob: |
|00001b50| 20 20 20 20 20 20 20 20 | 25 63 5c 6e 22 2c 20 43 | |%c\n", C|
|00001b60| 68 5f 31 5f 47 6c 6f 62 | 29 3b 0a 58 20 20 09 66 |h_1_Glob|);.X .f|
|00001b70| 70 72 69 6e 74 66 20 28 | 73 74 64 65 72 72 2c 20 |printf (|stderr, |
|00001b80| 22 20 20 20 20 20 20 20 | 20 73 68 6f 75 6c 64 20 |" | should |
|00001b90| 62 65 3a 20 20 20 25 63 | 5c 6e 22 2c 20 27 41 27 |be: %c|\n", 'A'|
|00001ba0| 29 3b 0a 58 09 7d 0a 58 | 20 20 69 66 28 43 68 5f |);.X.}.X| if(Ch_|
|00001bb0| 32 5f 47 6c 6f 62 20 21 | 3d 20 27 42 27 29 0a 58 |2_Glob !|= 'B').X|
|00001bc0| 09 7b 0a 58 20 20 09 66 | 70 72 69 6e 74 66 20 28 |.{.X .f|printf (|
|00001bd0| 73 74 64 65 72 72 2c 20 | 22 43 68 5f 32 5f 47 6c |stderr, |"Ch_2_Gl|
|00001be0| 6f 62 3a 20 20 20 20 20 | 20 20 20 20 20 20 25 63 |ob: | %c|
|00001bf0| 5c 6e 22 2c 20 43 68 5f | 32 5f 47 6c 6f 62 29 3b |\n", Ch_|2_Glob);|
|00001c00| 0a 58 20 20 09 66 70 72 | 69 6e 74 66 20 28 73 74 |.X .fpr|intf (st|
|00001c10| 64 65 72 72 2c 20 22 20 | 20 20 20 20 20 20 20 73 |derr, " | s|
|00001c20| 68 6f 75 6c 64 20 62 65 | 3a 20 20 20 25 63 5c 6e |hould be|: %c\n|
|00001c30| 22 2c 20 27 42 27 29 3b | 0a 58 09 7d 0a 58 20 20 |", 'B');|.X.}.X |
|00001c40| 69 66 28 41 72 72 5f 31 | 5f 47 6c 6f 62 5b 41 52 |if(Arr_1|_Glob[AR|
|00001c50| 52 5f 31 5f 53 5a 5d 20 | 21 3d 20 41 52 52 5f 31 |R_1_SZ] |!= ARR_1|
|00001c60| 5f 56 41 4c 29 0a 58 09 | 7b 0a 58 20 20 09 66 70 |_VAL).X.|{.X .fp|
|00001c70| 72 69 6e 74 66 20 28 73 | 74 64 65 72 72 2c 20 22 |rintf (s|tderr, "|
|00001c80| 41 72 72 5f 31 5f 47 6c | 6f 62 5b 25 64 5d 3a 20 |Arr_1_Gl|ob[%d]: |
|00001c90| 20 20 20 20 20 20 25 64 | 5c 6e 22 2c 20 41 52 52 | %d|\n", ARR|
|00001ca0| 5f 31 5f 53 5a 2c 20 41 | 72 72 5f 31 5f 47 6c 6f |_1_SZ, A|rr_1_Glo|
|00001cb0| 62 5b 41 52 52 5f 31 5f | 53 5a 5d 29 3b 0a 58 20 |b[ARR_1_|SZ]);.X |
|00001cc0| 20 09 66 70 72 69 6e 74 | 66 20 28 73 74 64 65 72 | .fprint|f (stder|
|00001cd0| 72 2c 20 22 20 20 20 20 | 20 20 20 20 73 68 6f 75 |r, " | shou|
|00001ce0| 6c 64 20 62 65 3a 20 20 | 20 25 64 5c 6e 22 2c 20 |ld be: | %d\n", |
|00001cf0| 41 52 52 5f 31 5f 56 41 | 4c 29 3b 0a 58 09 7d 0a |ARR_1_VA|L);.X.}.|
|00001d00| 58 20 20 69 66 28 41 72 | 72 5f 32 5f 47 6c 6f 62 |X if(Ar|r_2_Glob|
|00001d10| 5b 38 5d 5b 37 5d 20 21 | 3d 20 28 4e 75 6d 62 65 |[8][7] !|= (Numbe|
|00001d20| 72 5f 4f 66 5f 52 75 6e | 73 20 2b 20 31 30 29 29 |r_Of_Run|s + 10))|
|00001d30| 0a 58 09 7b 0a 58 20 20 | 09 66 70 72 69 6e 74 66 |.X.{.X |.fprintf|
|00001d40| 20 28 73 74 64 65 72 72 | 2c 20 22 41 72 72 5f 32 | (stderr|, "Arr_2|
|00001d50| 5f 47 6c 6f 62 5b 38 5d | 5b 37 5d 3a 20 20 20 20 |_Glob[8]|[7]: |
|00001d60| 25 64 5c 6e 22 2c 20 41 | 72 72 5f 32 5f 47 6c 6f |%d\n", A|rr_2_Glo|
|00001d70| 62 5b 38 5d 5b 37 5d 29 | 3b 0a 58 20 20 09 66 70 |b[8][7])|;.X .fp|
|00001d80| 72 69 6e 74 66 20 28 73 | 74 64 65 72 72 2c 20 22 |rintf (s|tderr, "|
|00001d90| 20 20 20 20 20 20 20 20 | 73 68 6f 75 6c 64 20 62 | |should b|
|00001da0| 65 3a 20 20 20 25 64 5c | 6e 22 2c 4e 75 6d 62 65 |e: %d\|n",Numbe|
|00001db0| 72 5f 4f 66 5f 52 75 6e | 73 20 2b 20 31 30 29 3b |r_Of_Run|s + 10);|
|00001dc0| 0a 58 09 7d 0a 58 20 20 | 69 66 28 50 74 72 5f 47 |.X.}.X |if(Ptr_G|
|00001dd0| 6c 6f 62 2d 3e 44 69 73 | 63 72 20 21 3d 20 49 64 |lob->Dis|cr != Id|
|00001de0| 65 6e 74 5f 31 29 0a 58 | 09 7b 0a 58 20 20 09 66 |ent_1).X|.{.X .f|
|00001df0| 70 72 69 6e 74 66 20 28 | 73 74 64 65 72 72 2c 20 |printf (|stderr, |
|00001e00| 22 20 20 44 69 73 63 72 | 3a 20 20 20 20 20 20 20 |" Discr|: |
|00001e10| 20 20 20 20 20 20 25 64 | 5c 6e 22 2c 20 50 74 72 | %d|\n", Ptr|
|00001e20| 5f 47 6c 6f 62 2d 3e 44 | 69 73 63 72 29 3b 0a 58 |_Glob->D|iscr);.X|
|00001e30| 20 20 09 66 70 72 69 6e | 74 66 20 28 73 74 64 65 | .fprin|tf (stde|
|00001e40| 72 72 2c 20 22 20 20 20 | 20 20 20 20 20 73 68 6f |rr, " | sho|
|00001e50| 75 6c 64 20 62 65 3a 20 | 20 20 25 64 5c 6e 22 2c |uld be: | %d\n",|
|00001e60| 20 49 64 65 6e 74 5f 31 | 29 3b 0a 58 09 7d 0a 58 | Ident_1|);.X.}.X|
|00001e70| 23 69 66 64 65 66 20 43 | 4f 4d 50 4c 45 54 45 0a |#ifdef C|OMPLETE.|
|00001e80| 58 20 20 69 66 28 50 74 | 72 5f 47 6c 6f 62 2d 3e |X if(Pt|r_Glob->|
|00001e90| 76 61 72 69 61 6e 74 2e | 76 61 72 5f 31 2e 45 6e |variant.|var_1.En|
|00001ea0| 75 6d 5f 43 6f 6d 70 20 | 21 3d 20 32 29 0a 58 09 |um_Comp |!= 2).X.|
|00001eb0| 7b 0a 58 20 20 09 66 70 | 72 69 6e 74 66 20 28 73 |{.X .fp|rintf (s|
|00001ec0| 74 64 65 72 72 2c 20 22 | 20 20 45 6e 75 6d 5f 43 |tderr, "| Enum_C|
|00001ed0| 6f 6d 70 3a 20 20 20 20 | 20 20 20 20 20 25 64 5c |omp: | %d\|
|00001ee0| 6e 22 2c 20 50 74 72 5f | 47 6c 6f 62 2d 3e 76 61 |n", Ptr_|Glob->va|
|00001ef0| 72 69 61 6e 74 2e 76 61 | 72 5f 31 2e 45 6e 75 6d |riant.va|r_1.Enum|
|00001f00| 5f 43 6f 6d 70 29 3b 0a | 58 20 20 09 66 70 72 69 |_Comp);.|X .fpri|
|00001f10| 6e 74 66 20 28 73 74 64 | 65 72 72 2c 20 22 20 20 |ntf (std|err, " |
|00001f20| 20 20 20 20 20 20 73 68 | 6f 75 6c 64 20 62 65 3a | sh|ould be:|
|00001f30| 20 20 20 25 64 5c 6e 22 | 2c 20 32 29 3b 0a 58 09 | %d\n"|, 2);.X.|
|00001f40| 7d 0a 58 09 7b 0a 58 20 | 20 66 70 72 69 6e 74 66 |}.X.{.X | fprintf|
|00001f50| 20 28 73 74 64 65 72 72 | 2c 20 22 20 20 49 6e 74 | (stderr|, " Int|
|00001f60| 5f 43 6f 6d 70 3a 20 20 | 20 20 20 20 20 20 20 20 |_Comp: | |
|00001f70| 25 64 5c 6e 22 2c 20 50 | 74 72 5f 47 6c 6f 62 2d |%d\n", P|tr_Glob-|
|00001f80| 3e 76 61 72 69 61 6e 74 | 2e 76 61 72 5f 31 2e 49 |>variant|.var_1.I|
|00001f90| 6e 74 5f 43 6f 6d 70 29 | 3b 0a 58 20 20 66 70 72 |nt_Comp)|;.X fpr|
|00001fa0| 69 6e 74 66 20 28 73 74 | 64 65 72 72 2c 20 22 20 |intf (st|derr, " |
|00001fb0| 20 20 20 20 20 20 20 73 | 68 6f 75 6c 64 20 62 65 | s|hould be|
|00001fc0| 3a 20 20 20 25 64 5c 6e | 22 2c 20 31 37 29 3b 0a |: %d\n|", 17);.|
|00001fd0| 58 09 7d 0a 58 09 7b 0a | 58 20 20 66 70 72 69 6e |X.}.X.{.|X fprin|
|00001fe0| 74 66 20 28 73 74 64 65 | 72 72 2c 20 22 20 20 53 |tf (stde|rr, " S|
|00001ff0| 74 72 5f 43 6f 6d 70 3a | 20 20 20 20 20 20 20 20 |tr_Comp:| |
|00002000| 20 20 25 73 5c 6e 22 2c | 20 50 74 72 5f 47 6c 6f | %s\n",| Ptr_Glo|
|00002010| 62 2d 3e 76 61 72 69 61 | 6e 74 2e 76 61 72 5f 31 |b->varia|nt.var_1|
|00002020| 2e 53 74 72 5f 43 6f 6d | 70 29 3b 0a 58 20 20 66 |.Str_Com|p);.X f|
|00002030| 70 72 69 6e 74 66 20 28 | 73 74 64 65 72 72 2c 20 |printf (|stderr, |
|00002040| 22 20 20 20 20 20 20 20 | 20 73 68 6f 75 6c 64 20 |" | should |
|00002050| 62 65 3a 20 20 20 25 73 | 5c 6e 22 2c 20 53 54 52 |be: %s|\n", STR|
|00002060| 5f 30 5f 50 41 52 5f 52 | 45 46 29 3b 0a 58 09 7d |_0_PAR_R|EF);.X.}|
|00002070| 0a 58 09 7b 0a 58 20 20 | 66 70 72 69 6e 74 66 20 |.X.{.X |fprintf |
|00002080| 28 73 74 64 65 72 72 2c | 20 22 4e 65 78 74 5f 50 |(stderr,| "Next_P|
|00002090| 74 72 5f 47 6c 6f 62 2d | 3e 5c 6e 22 29 3b 0a 58 |tr_Glob-|>\n");.X|
|000020a0| 20 20 66 70 72 69 6e 74 | 66 20 28 73 74 64 65 72 | fprint|f (stder|
|000020b0| 72 2c 20 22 20 20 50 74 | 72 5f 43 6f 6d 70 3a 20 |r, " Pt|r_Comp: |
|000020c0| 20 20 20 20 20 20 20 20 | 20 25 64 5c 6e 22 2c 20 | | %d\n", |
|000020d0| 28 69 6e 74 29 20 4e 65 | 78 74 5f 50 74 72 5f 47 |(int) Ne|xt_Ptr_G|
|000020e0| 6c 6f 62 2d 3e 50 74 72 | 5f 43 6f 6d 70 29 3b 0a |lob->Ptr|_Comp);.|
|000020f0| 58 20 20 66 70 72 69 6e | 74 66 20 28 73 74 64 65 |X fprin|tf (stde|
|00002100| 72 72 2c 20 22 20 20 20 | 20 20 20 20 20 73 68 6f |rr, " | sho|
|00002110| 75 6c 64 20 62 65 3a 20 | 20 20 28 69 6d 70 6c 65 |uld be: | (imple|
|00002120| 6d 65 6e 74 61 74 69 6f | 6e 2d 64 65 70 65 6e 64 |mentatio|n-depend|
|00002130| 65 6e 74 29 2c 20 73 61 | 6d 65 20 61 73 20 61 62 |ent), sa|me as ab|
|00002140| 6f 76 65 5c 6e 22 29 3b | 0a 58 09 7d 0a 58 09 7b |ove\n");|.X.}.X.{|
|00002150| 0a 58 20 20 66 70 72 69 | 6e 74 66 20 28 73 74 64 |.X fpri|ntf (std|
|00002160| 65 72 72 2c 20 22 20 20 | 44 69 73 63 72 3a 20 20 |err, " |Discr: |
|00002170| 20 20 20 20 20 20 20 20 | 20 20 20 25 64 5c 6e 22 | | %d\n"|
|00002180| 2c 20 4e 65 78 74 5f 50 | 74 72 5f 47 6c 6f 62 2d |, Next_P|tr_Glob-|
|00002190| 3e 44 69 73 63 72 29 3b | 0a 58 20 20 66 70 72 69 |>Discr);|.X fpri|
|000021a0| 6e 74 66 20 28 73 74 64 | 65 72 72 2c 20 22 20 20 |ntf (std|err, " |
|000021b0| 20 20 20 20 20 20 73 68 | 6f 75 6c 64 20 62 65 3a | sh|ould be:|
|000021c0| 20 20 20 25 64 5c 6e 22 | 2c 20 30 29 3b 0a 58 09 | %d\n"|, 0);.X.|
|000021d0| 7d 0a 58 09 7b 0a 58 20 | 20 66 70 72 69 6e 74 66 |}.X.{.X | fprintf|
|000021e0| 20 28 73 74 64 65 72 72 | 2c 20 22 20 20 45 6e 75 | (stderr|, " Enu|
|000021f0| 6d 5f 43 6f 6d 70 3a 20 | 20 20 20 20 20 20 20 20 |m_Comp: | |
|00002200| 25 64 5c 6e 22 2c 20 4e | 65 78 74 5f 50 74 72 5f |%d\n", N|ext_Ptr_|
|00002210| 47 6c 6f 62 2d 3e 76 61 | 72 69 61 6e 74 2e 76 61 |Glob->va|riant.va|
|00002220| 72 5f 31 2e 45 6e 75 6d | 5f 43 6f 6d 70 29 3b 0a |r_1.Enum|_Comp);.|
|00002230| 58 20 20 66 70 72 69 6e | 74 66 20 28 73 74 64 65 |X fprin|tf (stde|
|00002240| 72 72 2c 20 22 20 20 20 | 20 20 20 20 20 73 68 6f |rr, " | sho|
|00002250| 75 6c 64 20 62 65 3a 20 | 20 20 25 64 5c 6e 22 2c |uld be: | %d\n",|
|00002260| 20 31 29 3b 0a 58 09 7d | 0a 58 09 7b 0a 58 20 20 | 1);.X.}|.X.{.X |
|00002270| 66 70 72 69 6e 74 66 20 | 28 73 74 64 65 72 72 2c |fprintf |(stderr,|
|00002280| 20 22 20 20 49 6e 74 5f | 43 6f 6d 70 3a 20 20 20 | " Int_|Comp: |
|00002290| 20 20 20 20 20 20 20 25 | 64 5c 6e 22 2c 20 4e 65 | %|d\n", Ne|
|000022a0| 78 74 5f 50 74 72 5f 47 | 6c 6f 62 2d 3e 76 61 72 |xt_Ptr_G|lob->var|
|000022b0| 69 61 6e 74 2e 76 61 72 | 5f 31 2e 49 6e 74 5f 43 |iant.var|_1.Int_C|
|000022c0| 6f 6d 70 29 3b 0a 58 20 | 20 66 70 72 69 6e 74 66 |omp);.X | fprintf|
|000022d0| 20 28 73 74 64 65 72 72 | 2c 20 22 20 20 20 20 20 | (stderr|, " |
|000022e0| 20 20 20 73 68 6f 75 6c | 64 20 62 65 3a 20 20 20 | shoul|d be: |
|000022f0| 25 64 5c 6e 22 2c 20 31 | 38 29 3b 0a 58 09 7d 0a |%d\n", 1|8);.X.}.|
|00002300| 58 23 65 6e 64 69 66 0a | 58 69 66 28 73 74 72 63 |X#endif.|Xif(strc|
|00002310| 6d 70 28 4e 65 78 74 5f | 50 74 72 5f 47 6c 6f 62 |mp(Next_|Ptr_Glob|
|00002320| 2d 3e 76 61 72 69 61 6e | 74 2e 76 61 72 5f 31 2e |->varian|t.var_1.|
|00002330| 53 74 72 5f 43 6f 6d 70 | 2c 20 53 54 52 5f 30 5f |Str_Comp|, STR_0_|
|00002340| 50 41 52 5f 52 45 46 29 | 29 0a 58 09 7b 0a 58 20 |PAR_REF)|).X.{.X |
|00002350| 20 66 70 72 69 6e 74 66 | 20 28 73 74 64 65 72 72 | fprintf| (stderr|
|00002360| 2c 20 22 20 20 53 74 72 | 5f 43 6f 6d 70 3a 20 20 |, " Str|_Comp: |
|00002370| 20 20 20 20 20 20 20 20 | 25 73 5c 6e 22 2c 0a 58 | |%s\n",.X|
|00002380| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002390| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000023a0| 4e 65 78 74 5f 50 74 72 | 5f 47 6c 6f 62 2d 3e 76 |Next_Ptr|_Glob->v|
|000023b0| 61 72 69 61 6e 74 2e 76 | 61 72 5f 31 2e 53 74 72 |ariant.v|ar_1.Str|
|000023c0| 5f 43 6f 6d 70 29 3b 0a | 58 20 20 66 70 72 69 6e |_Comp);.|X fprin|
|000023d0| 74 66 20 28 73 74 64 65 | 72 72 2c 20 22 20 20 20 |tf (stde|rr, " |
|000023e0| 20 20 20 20 20 73 68 6f | 75 6c 64 20 62 65 3a 20 | sho|uld be: |
|000023f0| 20 20 25 73 5c 6e 22 2c | 53 54 52 5f 30 5f 50 41 | %s\n",|STR_0_PA|
|00002400| 52 5f 52 45 46 29 3b 0a | 58 09 7d 0a 58 23 69 66 |R_REF);.|X.}.X#if|
|00002410| 64 65 66 20 43 4f 4d 50 | 4c 45 54 45 0a 58 09 7b |def COMP|LETE.X.{|
|00002420| 0a 58 20 20 66 70 72 69 | 6e 74 66 20 28 73 74 64 |.X fpri|ntf (std|
|00002430| 65 72 72 2c 20 22 49 6e | 74 5f 31 5f 4c 6f 63 3a |err, "In|t_1_Loc:|
|00002440| 20 20 20 20 20 20 20 20 | 20 20 20 25 64 5c 6e 22 | | %d\n"|
|00002450| 2c 20 49 6e 74 5f 31 5f | 4c 6f 63 29 3b 0a 58 20 |, Int_1_|Loc);.X |
|00002460| 20 66 70 72 69 6e 74 66 | 20 28 73 74 64 65 72 72 | fprintf| (stderr|
|00002470| 2c 20 22 20 20 20 20 20 | 20 20 20 73 68 6f 75 6c |, " | shoul|
|00002480| 64 20 62 65 3a 20 20 20 | 25 64 5c 6e 22 2c 20 35 |d be: |%d\n", 5|
|00002490| 29 3b 0a 58 09 7d 0a 58 | 09 7b 0a 58 20 20 66 70 |);.X.}.X|.{.X fp|
|000024a0| 72 69 6e 74 66 20 28 73 | 74 64 65 72 72 2c 20 22 |rintf (s|tderr, "|
|000024b0| 49 6e 74 5f 32 5f 4c 6f | 63 3a 20 20 20 20 20 20 |Int_2_Lo|c: |
|000024c0| 20 20 20 20 20 25 64 5c | 6e 22 2c 20 49 6e 74 5f | %d\|n", Int_|
|000024d0| 32 5f 4c 6f 63 29 3b 0a | 58 20 20 66 70 72 69 6e |2_Loc);.|X fprin|
|000024e0| 74 66 20 28 73 74 64 65 | 72 72 2c 20 22 20 20 20 |tf (stde|rr, " |
|000024f0| 20 20 20 20 20 73 68 6f | 75 6c 64 20 62 65 3a 20 | sho|uld be: |
|00002500| 20 20 25 64 5c 6e 22 2c | 20 31 33 29 3b 0a 58 09 | %d\n",| 13);.X.|
|00002510| 7d 0a 58 09 7b 0a 58 20 | 20 66 70 72 69 6e 74 66 |}.X.{.X | fprintf|
|00002520| 20 28 73 74 64 65 72 72 | 2c 20 22 49 6e 74 5f 33 | (stderr|, "Int_3|
|00002530| 5f 4c 6f 63 3a 20 20 20 | 20 20 20 20 20 20 20 20 |_Loc: | |
|00002540| 25 64 5c 6e 22 2c 20 49 | 6e 74 5f 33 5f 4c 6f 63 |%d\n", I|nt_3_Loc|
|00002550| 29 3b 0a 58 20 20 66 70 | 72 69 6e 74 66 20 28 73 |);.X fp|rintf (s|
|00002560| 74 64 65 72 72 2c 20 22 | 20 20 20 20 20 20 20 20 |tderr, "| |
|00002570| 73 68 6f 75 6c 64 20 62 | 65 3a 20 20 20 25 64 5c |should b|e: %d\|
|00002580| 6e 22 2c 20 37 29 3b 0a | 58 09 7d 0a 58 09 7b 0a |n", 7);.|X.}.X.{.|
|00002590| 58 20 20 66 70 72 69 6e | 74 66 20 28 73 74 64 65 |X fprin|tf (stde|
|000025a0| 72 72 2c 20 22 45 6e 75 | 6d 5f 4c 6f 63 3a 20 20 |rr, "Enu|m_Loc: |
|000025b0| 20 20 20 20 20 20 20 20 | 20 20 25 64 5c 6e 22 2c | | %d\n",|
|000025c0| 20 45 6e 75 6d 5f 4c 6f | 63 29 3b 0a 58 20 20 66 | Enum_Lo|c);.X f|
|000025d0| 70 72 69 6e 74 66 20 28 | 73 74 64 65 72 72 2c 20 |printf (|stderr, |
|000025e0| 22 20 20 20 20 20 20 20 | 20 73 68 6f 75 6c 64 20 |" | should |
|000025f0| 62 65 3a 20 20 20 25 64 | 5c 6e 22 2c 20 31 29 3b |be: %d|\n", 1);|
|00002600| 0a 58 09 7d 0a 58 23 65 | 6e 64 69 66 0a 58 20 20 |.X.}.X#e|ndif.X |
|00002610| 69 66 28 73 74 72 63 6d | 70 28 53 74 72 5f 31 5f |if(strcm|p(Str_1_|
|00002620| 4c 6f 63 2c 20 53 54 52 | 5f 31 5f 50 41 52 5f 52 |Loc, STR|_1_PAR_R|
|00002630| 45 46 29 29 0a 58 09 7b | 0a 58 20 20 09 66 70 72 |EF)).X.{|.X .fpr|
|00002640| 69 6e 74 66 20 28 73 74 | 64 65 72 72 2c 20 22 53 |intf (st|derr, "S|
|00002650| 74 72 5f 31 5f 4c 6f 63 | 3a 20 20 20 20 20 20 20 |tr_1_Loc|: |
|00002660| 20 20 20 20 25 73 5c 6e | 22 2c 20 53 74 72 5f 31 | %s\n|", Str_1|
|00002670| 5f 4c 6f 63 29 3b 0a 58 | 20 20 09 66 70 72 69 6e |_Loc);.X| .fprin|
|00002680| 74 66 20 28 73 74 64 65 | 72 72 2c 20 22 20 20 20 |tf (stde|rr, " |
|00002690| 20 20 20 20 20 73 68 6f | 75 6c 64 20 62 65 3a 20 | sho|uld be: |
|000026a0| 20 20 25 73 5c 6e 22 2c | 53 54 52 5f 31 5f 50 41 | %s\n",|STR_1_PA|
|000026b0| 52 5f 52 45 46 29 3b 0a | 58 09 7d 0a 58 20 20 69 |R_REF);.|X.}.X i|
|000026c0| 66 28 73 74 72 63 6d 70 | 28 53 74 72 5f 32 5f 4c |f(strcmp|(Str_2_L|
|000026d0| 6f 63 2c 20 53 54 52 5f | 32 5f 50 41 52 5f 52 45 |oc, STR_|2_PAR_RE|
|000026e0| 46 29 29 0a 58 09 7b 0a | 58 20 20 09 66 70 72 69 |F)).X.{.|X .fpri|
|000026f0| 6e 74 66 20 28 73 74 64 | 65 72 72 2c 20 22 53 74 |ntf (std|err, "St|
|00002700| 72 5f 32 5f 4c 6f 63 3a | 20 20 20 20 20 20 20 20 |r_2_Loc:| |
|00002710| 20 20 20 25 73 5c 6e 22 | 2c 20 53 74 72 5f 32 5f | %s\n"|, Str_2_|
|00002720| 4c 6f 63 29 3b 0a 58 20 | 20 09 66 70 72 69 6e 74 |Loc);.X | .fprint|
|00002730| 66 20 28 73 74 64 65 72 | 72 2c 20 22 20 20 20 20 |f (stder|r, " |
|00002740| 20 20 20 20 73 68 6f 75 | 6c 64 20 62 65 3a 20 20 | shou|ld be: |
|00002750| 20 25 73 5c 6e 22 2c 53 | 54 52 5f 32 5f 50 41 52 | %s\n",S|TR_2_PAR|
|00002760| 5f 52 45 46 29 3b 0a 58 | 20 20 20 20 20 20 20 20 |_REF);.X| |
|00002770| 7d 0a 58 0a 58 20 20 55 | 73 65 72 5f 54 69 6d 65 |}.X.X U|ser_Time|
|00002780| 20 3d 20 45 6e 64 5f 54 | 69 6d 65 20 2d 20 42 65 | = End_T|ime - Be|
|00002790| 67 69 6e 5f 54 69 6d 65 | 3b 0a 58 0a 58 20 20 69 |gin_Time|;.X.X i|
|000027a0| 66 20 28 55 73 65 72 5f | 54 69 6d 65 20 3c 20 54 |f (User_|Time < T|
|000027b0| 6f 6f 5f 53 6d 61 6c 6c | 5f 54 69 6d 65 29 0a 58 |oo_Small|_Time).X|
|000027c0| 20 20 7b 0a 58 20 20 20 | 20 66 70 72 69 6e 74 66 | {.X | fprintf|
|000027d0| 20 28 73 74 64 65 72 72 | 2c 20 22 4d 65 61 73 75 | (stderr|, "Measu|
|000027e0| 72 65 64 20 74 69 6d 65 | 20 74 6f 6f 20 73 6d 61 |red time| too sma|
|000027f0| 6c 6c 20 74 6f 20 6f 62 | 74 61 69 6e 20 6d 65 61 |ll to ob|tain mea|
|00002800| 6e 69 6e 67 66 75 6c 20 | 72 65 73 75 6c 74 73 5c |ningful |results\|
|00002810| 6e 22 29 3b 0a 58 20 20 | 20 20 66 70 72 69 6e 74 |n");.X | fprint|
|00002820| 66 20 28 73 74 64 65 72 | 72 2c 20 22 50 6c 65 61 |f (stder|r, "Plea|
|00002830| 73 65 20 69 6e 63 72 65 | 61 73 65 20 6e 75 6d 62 |se incre|ase numb|
|00002840| 65 72 20 6f 66 20 72 75 | 6e 73 5c 6e 22 29 3b 0a |er of ru|ns\n");.|
|00002850| 58 20 20 20 20 66 70 72 | 69 6e 74 66 20 28 73 74 |X fpr|intf (st|
|00002860| 64 65 72 72 2c 20 22 5c | 6e 22 29 3b 0a 58 20 20 |derr, "\|n");.X |
|00002870| 7d 0a 58 20 20 65 6c 73 | 65 0a 58 20 20 7b 0a 58 |}.X els|e.X {.X|
|00002880| 23 69 66 64 65 66 20 54 | 49 4d 45 0a 58 20 20 20 |#ifdef T|IME.X |
|00002890| 20 4d 69 63 72 6f 73 65 | 63 6f 6e 64 73 20 3d 20 | Microse|conds = |
|000028a0| 28 66 6c 6f 61 74 29 20 | 55 73 65 72 5f 54 69 6d |(float) |User_Tim|
|000028b0| 65 20 2a 20 4d 69 63 5f | 73 65 63 73 5f 50 65 72 |e * Mic_|secs_Per|
|000028c0| 5f 53 65 63 6f 6e 64 20 | 0a 58 20 20 20 20 20 20 |_Second |.X |
|000028d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000028e0| 20 20 2f 20 28 66 6c 6f | 61 74 29 20 4e 75 6d 62 | / (flo|at) Numb|
|000028f0| 65 72 5f 4f 66 5f 52 75 | 6e 73 3b 0a 58 20 20 20 |er_Of_Ru|ns;.X |
|00002900| 20 44 68 72 79 73 74 6f | 6e 65 73 5f 50 65 72 5f | Dhrysto|nes_Per_|
|00002910| 53 65 63 6f 6e 64 20 3d | 20 28 66 6c 6f 61 74 29 |Second =| (float)|
|00002920| 20 4e 75 6d 62 65 72 5f | 4f 66 5f 52 75 6e 73 20 | Number_|Of_Runs |
|00002930| 2f 20 28 66 6c 6f 61 74 | 29 20 55 73 65 72 5f 54 |/ (float|) User_T|
|00002940| 69 6d 65 3b 0a 58 23 65 | 6c 73 65 0a 58 20 20 20 |ime;.X#e|lse.X |
|00002950| 20 4d 69 63 72 6f 73 65 | 63 6f 6e 64 73 20 3d 20 | Microse|conds = |
|00002960| 28 66 6c 6f 61 74 29 20 | 55 73 65 72 5f 54 69 6d |(float) |User_Tim|
|00002970| 65 20 2a 20 4d 69 63 5f | 73 65 63 73 5f 50 65 72 |e * Mic_|secs_Per|
|00002980| 5f 53 65 63 6f 6e 64 20 | 0a 58 20 20 20 20 20 20 |_Second |.X |
|00002990| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000029a0| 20 20 2f 20 28 28 66 6c | 6f 61 74 29 20 48 5a 20 | / ((fl|oat) HZ |
|000029b0| 2a 20 28 28 66 6c 6f 61 | 74 29 20 4e 75 6d 62 65 |* ((floa|t) Numbe|
|000029c0| 72 5f 4f 66 5f 52 75 6e | 73 29 29 3b 0a 58 20 20 |r_Of_Run|s));.X |
|000029d0| 20 20 44 68 72 79 73 74 | 6f 6e 65 73 5f 50 65 72 | Dhryst|ones_Per|
|000029e0| 5f 53 65 63 6f 6e 64 20 | 3d 20 28 28 66 6c 6f 61 |_Second |= ((floa|
|000029f0| 74 29 20 48 5a 20 2a 20 | 28 66 6c 6f 61 74 29 20 |t) HZ * |(float) |
|00002a00| 4e 75 6d 62 65 72 5f 4f | 66 5f 52 75 6e 73 29 0a |Number_O|f_Runs).|
|00002a10| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X | |
|00002a20| 20 20 20 20 20 20 20 20 | 20 2f 20 28 66 6c 6f 61 | | / (floa|
|00002a30| 74 29 20 55 73 65 72 5f | 54 69 6d 65 3b 0a 58 23 |t) User_|Time;.X#|
|00002a40| 65 6e 64 69 66 0a 58 2f | 2a 2a 2a 2a 2a 2a 2a 2a |endif.X/|********|
|00002a50| 2a 2a 2a 2a 2a 2a 20 54 | 68 65 20 72 65 73 75 6c |****** T|he resul|
|00002a60| 74 73 20 67 6f 20 74 6f | 20 73 74 61 6e 64 61 72 |ts go to| standar|
|00002a70| 64 20 6f 75 74 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |d out **|********|
|00002a80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2f 0a 58 20 20 |********|***/.X |
|00002a90| 20 20 66 70 72 69 6e 74 | 66 20 28 73 74 64 65 72 | fprint|f (stder|
|00002aa0| 72 2c 22 4d 69 63 72 6f | 73 65 63 6f 6e 64 73 20 |r,"Micro|seconds |
|00002ab0| 66 6f 72 20 6f 6e 65 20 | 72 75 6e 20 74 68 72 6f |for one |run thro|
|00002ac0| 75 67 68 20 44 68 72 79 | 73 74 6f 6e 65 3a 20 22 |ugh Dhry|stone: "|
|00002ad0| 29 3b 0a 58 20 20 20 20 | 66 70 72 69 6e 74 66 20 |);.X |fprintf |
|00002ae0| 28 73 74 64 65 72 72 2c | 22 25 36 2e 31 66 20 5c |(stderr,|"%6.1f \|
|00002af0| 6e 22 2c 20 4d 69 63 72 | 6f 73 65 63 6f 6e 64 73 |n", Micr|oseconds|
|00002b00| 29 3b 0a 58 20 20 20 20 | 66 70 72 69 6e 74 66 20 |);.X |fprintf |
|00002b10| 28 73 74 64 65 72 72 2c | 22 44 68 72 79 73 74 6f |(stderr,|"Dhrysto|
|00002b20| 6e 65 73 20 70 65 72 20 | 53 65 63 6f 6e 64 3a 20 |nes per |Second: |
|00002b30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002b40| 20 20 20 20 20 22 29 3b | 0a 58 20 20 20 20 66 70 | ");|.X fp|
|00002b50| 72 69 6e 74 66 20 28 73 | 74 64 65 72 72 2c 22 25 |rintf (s|tderr,"%|
|00002b60| 36 2e 31 66 20 5c 6e 22 | 2c 20 44 68 72 79 73 74 |6.1f \n"|, Dhryst|
|00002b70| 6f 6e 65 73 5f 50 65 72 | 5f 53 65 63 6f 6e 64 29 |ones_Per|_Second)|
|00002b80| 3b 0a 58 20 20 20 20 66 | 70 72 69 6e 74 66 20 28 |;.X f|printf (|
|00002b90| 73 74 64 65 72 72 2c 22 | 5c 6e 22 29 3b 0a 58 20 |stderr,"|\n");.X |
|00002ba0| 20 7d 0a 58 20 20 0a 58 | 7d 0a 58 0a 58 0a 58 50 | }.X .X|}.X.X.XP|
|00002bb0| 72 6f 63 5f 31 20 28 50 | 74 72 5f 56 61 6c 5f 50 |roc_1 (P|tr_Val_P|
|00002bc0| 61 72 29 0a 58 2f 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ar).X/**|********|
|00002bd0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2f 0a 58 0a |********|****/.X.|
|00002be0| 58 52 45 47 20 52 65 63 | 5f 50 6f 69 6e 74 65 72 |XREG Rec|_Pointer|
|00002bf0| 20 50 74 72 5f 56 61 6c | 5f 50 61 72 3b 0a 58 20 | Ptr_Val|_Par;.X |
|00002c00| 20 20 20 2f 2a 20 65 78 | 65 63 75 74 65 64 20 6f | /* ex|ecuted o|
|00002c10| 6e 63 65 20 2a 2f 0a 58 | 7b 0a 58 20 20 52 45 47 |nce */.X|{.X REG|
|00002c20| 20 52 65 63 5f 50 6f 69 | 6e 74 65 72 20 4e 65 78 | Rec_Poi|nter Nex|
|00002c30| 74 5f 52 65 63 6f 72 64 | 20 3d 20 50 74 72 5f 56 |t_Record| = Ptr_V|
|00002c40| 61 6c 5f 50 61 72 2d 3e | 50 74 72 5f 43 6f 6d 70 |al_Par->|Ptr_Comp|
|00002c50| 3b 20 20 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |; .X | |
|00002c60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2f 2a 20 | | /* |
|00002c80| 3d 3d 20 50 74 72 5f 47 | 6c 6f 62 5f 4e 65 78 74 |== Ptr_G|lob_Next|
|00002c90| 20 2a 2f 0a 58 20 20 2f | 2a 20 4c 6f 63 61 6c 20 | */.X /|* Local |
|00002ca0| 76 61 72 69 61 62 6c 65 | 2c 20 69 6e 69 74 69 61 |variable|, initia|
|00002cb0| 6c 69 7a 65 64 20 77 69 | 74 68 20 50 74 72 5f 56 |lized wi|th Ptr_V|
|00002cc0| 61 6c 5f 50 61 72 2d 3e | 50 74 72 5f 43 6f 6d 70 |al_Par->|Ptr_Comp|
|00002cd0| 2c 20 20 20 20 2a 2f 0a | 58 20 20 2f 2a 20 63 6f |, */.|X /* co|
|00002ce0| 72 72 65 73 70 6f 6e 64 | 73 20 74 6f 20 22 72 65 |rrespond|s to "re|
|00002cf0| 6e 61 6d 65 22 20 69 6e | 20 41 64 61 2c 20 22 77 |name" in| Ada, "w|
|00002d00| 69 74 68 22 20 69 6e 20 | 50 61 73 63 61 6c 20 20 |ith" in |Pascal |
|00002d10| 20 20 20 20 20 20 20 20 | 20 2a 2f 0a 58 20 20 0a | | */.X .|
|00002d20| 58 20 20 73 74 72 75 63 | 74 61 73 73 69 67 6e 20 |X struc|tassign |
|00002d30| 28 2a 50 74 72 5f 56 61 | 6c 5f 50 61 72 2d 3e 50 |(*Ptr_Va|l_Par->P|
|00002d40| 74 72 5f 43 6f 6d 70 2c | 20 2a 50 74 72 5f 47 6c |tr_Comp,| *Ptr_Gl|
|00002d50| 6f 62 29 3b 20 0a 58 20 | 20 50 74 72 5f 56 61 6c |ob); .X | Ptr_Val|
|00002d60| 5f 50 61 72 2d 3e 76 61 | 72 69 61 6e 74 2e 76 61 |_Par->va|riant.va|
|00002d70| 72 5f 31 2e 49 6e 74 5f | 43 6f 6d 70 20 3d 20 35 |r_1.Int_|Comp = 5|
|00002d80| 3b 0a 58 20 20 4e 65 78 | 74 5f 52 65 63 6f 72 64 |;.X Nex|t_Record|
|00002d90| 2d 3e 76 61 72 69 61 6e | 74 2e 76 61 72 5f 31 2e |->varian|t.var_1.|
|00002da0| 49 6e 74 5f 43 6f 6d 70 | 20 0a 58 20 20 20 20 20 |Int_Comp| .X |
|00002db0| 20 20 20 3d 20 50 74 72 | 5f 56 61 6c 5f 50 61 72 | = Ptr|_Val_Par|
|00002dc0| 2d 3e 76 61 72 69 61 6e | 74 2e 76 61 72 5f 31 2e |->varian|t.var_1.|
|00002dd0| 49 6e 74 5f 43 6f 6d 70 | 3b 0a 58 20 20 4e 65 78 |Int_Comp|;.X Nex|
|00002de0| 74 5f 52 65 63 6f 72 64 | 2d 3e 50 74 72 5f 43 6f |t_Record|->Ptr_Co|
|00002df0| 6d 70 20 3d 20 50 74 72 | 5f 56 61 6c 5f 50 61 72 |mp = Ptr|_Val_Par|
|00002e00| 2d 3e 50 74 72 5f 43 6f | 6d 70 3b 0a 58 20 20 50 |->Ptr_Co|mp;.X P|
|00002e10| 72 6f 63 5f 33 20 28 26 | 4e 65 78 74 5f 52 65 63 |roc_3 (&|Next_Rec|
|00002e20| 6f 72 64 2d 3e 50 74 72 | 5f 43 6f 6d 70 29 3b 0a |ord->Ptr|_Comp);.|
|00002e30| 58 20 20 20 20 2f 2a 20 | 50 74 72 5f 56 61 6c 5f |X /* |Ptr_Val_|
|00002e40| 50 61 72 2d 3e 50 74 72 | 5f 43 6f 6d 70 2d 3e 50 |Par->Ptr|_Comp->P|
|00002e50| 74 72 5f 43 6f 6d 70 20 | 0a 58 20 20 20 20 20 20 |tr_Comp |.X |
|00002e60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002e70| 20 20 3d 3d 20 50 74 72 | 5f 47 6c 6f 62 2d 3e 50 | == Ptr|_Glob->P|
|00002e80| 74 72 5f 43 6f 6d 70 20 | 2a 2f 0a 58 20 20 69 66 |tr_Comp |*/.X if|
|00002e90| 20 28 4e 65 78 74 5f 52 | 65 63 6f 72 64 2d 3e 44 | (Next_R|ecord->D|
|00002ea0| 69 73 63 72 20 3d 3d 20 | 49 64 65 6e 74 5f 31 29 |iscr == |Ident_1)|
|00002eb0| 0a 58 20 20 20 20 2f 2a | 20 74 68 65 6e 2c 20 65 |.X /*| then, e|
|00002ec0| 78 65 63 75 74 65 64 20 | 2a 2f 0a 58 20 20 7b 0a |xecuted |*/.X {.|
|00002ed0| 58 20 20 20 20 4e 65 78 | 74 5f 52 65 63 6f 72 64 |X Nex|t_Record|
|00002ee0| 2d 3e 76 61 72 69 61 6e | 74 2e 76 61 72 5f 31 2e |->varian|t.var_1.|
|00002ef0| 49 6e 74 5f 43 6f 6d 70 | 20 3d 20 36 3b 0a 58 20 |Int_Comp| = 6;.X |
|00002f00| 20 20 20 50 72 6f 63 5f | 36 20 28 50 74 72 5f 56 | Proc_|6 (Ptr_V|
|00002f10| 61 6c 5f 50 61 72 2d 3e | 76 61 72 69 61 6e 74 2e |al_Par->|variant.|
|00002f20| 76 61 72 5f 31 2e 45 6e | 75 6d 5f 43 6f 6d 70 2c |var_1.En|um_Comp,|
|00002f30| 20 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 26 4e | .X | &N|
|00002f40| 65 78 74 5f 52 65 63 6f | 72 64 2d 3e 76 61 72 69 |ext_Reco|rd->vari|
|00002f50| 61 6e 74 2e 76 61 72 5f | 31 2e 45 6e 75 6d 5f 43 |ant.var_|1.Enum_C|
|00002f60| 6f 6d 70 29 3b 0a 58 20 | 20 20 20 4e 65 78 74 5f |omp);.X | Next_|
|00002f70| 52 65 63 6f 72 64 2d 3e | 50 74 72 5f 43 6f 6d 70 |Record->|Ptr_Comp|
|00002f80| 20 3d 20 50 74 72 5f 47 | 6c 6f 62 2d 3e 50 74 72 | = Ptr_G|lob->Ptr|
|00002f90| 5f 43 6f 6d 70 3b 0a 58 | 20 20 20 20 50 72 6f 63 |_Comp;.X| Proc|
|00002fa0| 5f 37 20 28 4e 65 78 74 | 5f 52 65 63 6f 72 64 2d |_7 (Next|_Record-|
|00002fb0| 3e 76 61 72 69 61 6e 74 | 2e 76 61 72 5f 31 2e 49 |>variant|.var_1.I|
|00002fc0| 6e 74 5f 43 6f 6d 70 2c | 20 31 30 2c 20 0a 58 20 |nt_Comp,| 10, .X |
|00002fd0| 20 20 20 20 20 20 20 20 | 20 20 26 4e 65 78 74 5f | | &Next_|
|00002fe0| 52 65 63 6f 72 64 2d 3e | 76 61 72 69 61 6e 74 2e |Record->|variant.|
|00002ff0| 76 61 72 5f 31 2e 49 6e | 74 5f 43 6f 6d 70 29 3b |var_1.In|t_Comp);|
|00003000| 0a 58 20 20 7d 0a 58 20 | 20 65 6c 73 65 20 2f 2a |.X }.X | else /*|
|00003010| 20 6e 6f 74 20 65 78 65 | 63 75 74 65 64 20 2a 2f | not exe|cuted */|
|00003020| 0a 58 20 20 20 20 73 74 | 72 75 63 74 61 73 73 69 |.X st|ructassi|
|00003030| 67 6e 20 28 2a 50 74 72 | 5f 56 61 6c 5f 50 61 72 |gn (*Ptr|_Val_Par|
|00003040| 2c 20 2a 50 74 72 5f 56 | 61 6c 5f 50 61 72 2d 3e |, *Ptr_V|al_Par->|
|00003050| 50 74 72 5f 43 6f 6d 70 | 29 3b 0a 58 7d 20 2f 2a |Ptr_Comp|);.X} /*|
|00003060| 20 50 72 6f 63 5f 31 20 | 2a 2f 0a 58 0a 58 0a 58 | Proc_1 |*/.X.X.X|
|00003070| 50 72 6f 63 5f 32 20 28 | 49 6e 74 5f 50 61 72 5f |Proc_2 (|Int_Par_|
|00003080| 52 65 66 29 0a 58 2f 2a | 2a 2a 2a 2a 2a 2a 2a 2a |Ref).X/*|********|
|00003090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2f 0a 58 20 20 20 20 |********|*/.X |
|000030a0| 2f 2a 20 65 78 65 63 75 | 74 65 64 20 6f 6e 63 65 |/* execu|ted once|
|000030b0| 20 2a 2f 0a 58 20 20 20 | 20 2f 2a 20 2a 49 6e 74 | */.X | /* *Int|
|000030c0| 5f 50 61 72 5f 52 65 66 | 20 3d 3d 20 31 2c 20 62 |_Par_Ref| == 1, b|
|000030d0| 65 63 6f 6d 65 73 20 34 | 20 2a 2f 0a 58 0a 58 4f |ecomes 4| */.X.XO|
|000030e0| 6e 65 5f 46 69 66 74 79 | 20 20 20 2a 49 6e 74 5f |ne_Fifty| *Int_|
|000030f0| 50 61 72 5f 52 65 66 3b | 0a 58 7b 0a 58 20 20 4f |Par_Ref;|.X{.X O|
|00003100| 6e 65 5f 46 69 66 74 79 | 20 20 49 6e 74 5f 4c 6f |ne_Fifty| Int_Lo|
|00003110| 63 3b 20 20 0a 58 20 20 | 45 6e 75 6d 65 72 61 74 |c; .X |Enumerat|
|00003120| 69 6f 6e 20 20 20 45 6e | 75 6d 5f 4c 6f 63 3b 0a |ion En|um_Loc;.|
|00003130| 58 0a 58 20 20 49 6e 74 | 5f 4c 6f 63 20 3d 20 2a |X.X Int|_Loc = *|
|00003140| 49 6e 74 5f 50 61 72 5f | 52 65 66 20 2b 20 31 30 |Int_Par_|Ref + 10|
|00003150| 3b 0a 58 20 20 64 6f 20 | 2f 2a 20 65 78 65 63 75 |;.X do |/* execu|
|00003160| 74 65 64 20 6f 6e 63 65 | 20 2a 2f 0a 58 20 20 20 |ted once| */.X |
|00003170| 20 69 66 20 28 43 68 5f | 31 5f 47 6c 6f 62 20 3d | if (Ch_|1_Glob =|
|00003180| 3d 20 27 41 27 29 0a 58 | 20 20 20 20 20 20 2f 2a |= 'A').X| /*|
|00003190| 20 74 68 65 6e 2c 20 65 | 78 65 63 75 74 65 64 20 | then, e|xecuted |
|000031a0| 2a 2f 0a 58 20 20 20 20 | 7b 0a 58 20 20 20 20 20 |*/.X |{.X |
|000031b0| 20 49 6e 74 5f 4c 6f 63 | 20 2d 3d 20 31 3b 0a 58 | Int_Loc| -= 1;.X|
|000031c0| 20 20 20 20 20 20 2a 49 | 6e 74 5f 50 61 72 5f 52 | *I|nt_Par_R|
|000031d0| 65 66 20 3d 20 49 6e 74 | 5f 4c 6f 63 20 2d 20 49 |ef = Int|_Loc - I|
|000031e0| 6e 74 5f 47 6c 6f 62 3b | 0a 58 20 20 20 20 20 20 |nt_Glob;|.X |
|000031f0| 45 6e 75 6d 5f 4c 6f 63 | 20 3d 20 49 64 65 6e 74 |Enum_Loc| = Ident|
|00003200| 5f 31 3b 0a 58 20 20 20 | 20 7d 20 2f 2a 20 69 66 |_1;.X | } /* if|
|00003210| 20 2a 2f 0a 58 20 20 77 | 68 69 6c 65 20 28 45 6e | */.X w|hile (En|
|00003220| 75 6d 5f 4c 6f 63 20 21 | 3d 20 49 64 65 6e 74 5f |um_Loc !|= Ident_|
|00003230| 31 29 3b 20 2f 2a 20 74 | 72 75 65 20 2a 2f 0a 58 |1); /* t|rue */.X|
|00003240| 7d 20 2f 2a 20 50 72 6f | 63 5f 32 20 2a 2f 0a 58 |} /* Pro|c_2 */.X|
|00003250| 0a 58 0a 58 50 72 6f 63 | 5f 33 20 28 50 74 72 5f |.X.XProc|_3 (Ptr_|
|00003260| 52 65 66 5f 50 61 72 29 | 0a 58 2f 2a 2a 2a 2a 2a |Ref_Par)|.X/*****|
|00003270| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003280| 2a 2f 0a 58 20 20 20 20 | 2f 2a 20 65 78 65 63 75 |*/.X |/* execu|
|00003290| 74 65 64 20 6f 6e 63 65 | 20 2a 2f 0a 58 20 20 20 |ted once| */.X |
|000032a0| 20 2f 2a 20 50 74 72 5f | 52 65 66 5f 50 61 72 20 | /* Ptr_|Ref_Par |
|000032b0| 62 65 63 6f 6d 65 73 20 | 50 74 72 5f 47 6c 6f 62 |becomes |Ptr_Glob|
|000032c0| 20 2a 2f 0a 58 0a 58 52 | 65 63 5f 50 6f 69 6e 74 | */.X.XR|ec_Point|
|000032d0| 65 72 20 2a 50 74 72 5f | 52 65 66 5f 50 61 72 3b |er *Ptr_|Ref_Par;|
|000032e0| 0a 58 0a 58 7b 0a 58 20 | 20 69 66 20 28 50 74 72 |.X.X{.X | if (Ptr|
|000032f0| 5f 47 6c 6f 62 20 21 3d | 20 4e 75 6c 6c 29 0a 58 |_Glob !=| Null).X|
|00003300| 20 20 20 20 2f 2a 20 74 | 68 65 6e 2c 20 65 78 65 | /* t|hen, exe|
|00003310| 63 75 74 65 64 20 2a 2f | 0a 58 20 20 20 20 2a 50 |cuted */|.X *P|
|00003320| 74 72 5f 52 65 66 5f 50 | 61 72 20 3d 20 50 74 72 |tr_Ref_P|ar = Ptr|
|00003330| 5f 47 6c 6f 62 2d 3e 50 | 74 72 5f 43 6f 6d 70 3b |_Glob->P|tr_Comp;|
|00003340| 0a 58 20 20 65 6c 73 65 | 20 2f 2a 20 6e 6f 74 20 |.X else| /* not |
|00003350| 65 78 65 63 75 74 65 64 | 20 2a 2f 0a 58 20 20 20 |executed| */.X |
|00003360| 20 49 6e 74 5f 47 6c 6f | 62 20 3d 20 31 30 30 3b | Int_Glo|b = 100;|
|00003370| 0a 58 20 20 50 72 6f 63 | 5f 37 20 28 31 30 2c 20 |.X Proc|_7 (10, |
|00003380| 49 6e 74 5f 47 6c 6f 62 | 2c 20 26 50 74 72 5f 47 |Int_Glob|, &Ptr_G|
|00003390| 6c 6f 62 2d 3e 76 61 72 | 69 61 6e 74 2e 76 61 72 |lob->var|iant.var|
|000033a0| 5f 31 2e 49 6e 74 5f 43 | 6f 6d 70 29 3b 0a 58 7d |_1.Int_C|omp);.X}|
|000033b0| 20 2f 2a 20 50 72 6f 63 | 5f 33 20 2a 2f 0a 58 0a | /* Proc|_3 */.X.|
|000033c0| 58 0a 58 0a 58 50 72 6f | 63 5f 34 20 28 29 20 2f |X.X.XPro|c_4 () /|
|000033d0| 2a 20 77 69 74 68 6f 75 | 74 20 70 61 72 61 6d 65 |* withou|t parame|
|000033e0| 74 65 72 73 20 2a 2f 0a | 58 2f 2a 2a 2a 2a 2a 2a |ters */.|X/******|
|000033f0| 2a 2f 0a 58 20 20 20 20 | 2f 2a 20 65 78 65 63 75 |*/.X |/* execu|
|00003400| 74 65 64 20 6f 6e 63 65 | 20 2a 2f 0a 58 7b 0a 58 |ted once| */.X{.X|
|00003410| 20 20 42 6f 6f 6c 65 61 | 6e 20 42 6f 6f 6c 5f 4c | Boolea|n Bool_L|
|00003420| 6f 63 3b 0a 58 0a 58 20 | 20 42 6f 6f 6c 5f 4c 6f |oc;.X.X | Bool_Lo|
|00003430| 63 20 3d 20 43 68 5f 31 | 5f 47 6c 6f 62 20 3d 3d |c = Ch_1|_Glob ==|
|00003440| 20 27 41 27 3b 0a 58 20 | 20 42 6f 6f 6c 5f 47 6c | 'A';.X | Bool_Gl|
|00003450| 6f 62 20 3d 20 42 6f 6f | 6c 5f 4c 6f 63 20 7c 20 |ob = Boo|l_Loc | |
|00003460| 42 6f 6f 6c 5f 47 6c 6f | 62 3b 0a 58 20 20 43 68 |Bool_Glo|b;.X Ch|
|00003470| 5f 32 5f 47 6c 6f 62 20 | 3d 20 27 42 27 3b 0a 58 |_2_Glob |= 'B';.X|
|00003480| 7d 20 2f 2a 20 50 72 6f | 63 5f 34 20 2a 2f 0a 58 |} /* Pro|c_4 */.X|
|00003490| 0a 58 0a 58 50 72 6f 63 | 5f 35 20 28 29 20 2f 2a |.X.XProc|_5 () /*|
|000034a0| 20 77 69 74 68 6f 75 74 | 20 70 61 72 61 6d 65 74 | without| paramet|
|000034b0| 65 72 73 20 2a 2f 0a 58 | 2f 2a 2a 2a 2a 2a 2a 2a |ers */.X|/*******|
|000034c0| 2f 0a 58 20 20 20 20 2f | 2a 20 65 78 65 63 75 74 |/.X /|* execut|
|000034d0| 65 64 20 6f 6e 63 65 20 | 2a 2f 0a 58 7b 0a 58 20 |ed once |*/.X{.X |
|000034e0| 20 43 68 5f 31 5f 47 6c | 6f 62 20 3d 20 27 41 27 | Ch_1_Gl|ob = 'A'|
|000034f0| 3b 0a 58 20 20 42 6f 6f | 6c 5f 47 6c 6f 62 20 3d |;.X Boo|l_Glob =|
|00003500| 20 66 61 6c 73 65 3b 0a | 58 7d 20 2f 2a 20 50 72 | false;.|X} /* Pr|
|00003510| 6f 63 5f 35 20 2a 2f 0a | 58 0a 58 0a 58 20 20 20 |oc_5 */.|X.X.X |
|00003520| 20 20 20 20 20 2f 2a 20 | 50 72 6f 63 65 64 75 72 | /* |Procedur|
|00003530| 65 20 66 6f 72 20 74 68 | 65 20 61 73 73 69 67 6e |e for th|e assign|
|00003540| 6d 65 6e 74 20 6f 66 20 | 73 74 72 75 63 74 75 72 |ment of |structur|
|00003550| 65 73 2c 20 20 20 20 20 | 20 20 20 20 20 2a 2f 0a |es, | */.|
|00003560| 58 20 20 20 20 20 20 20 | 20 2f 2a 20 69 66 20 74 |X | /* if t|
|00003570| 68 65 20 43 20 63 6f 6d | 70 69 6c 65 72 20 64 6f |he C com|piler do|
|00003580| 65 73 6e 27 74 20 73 75 | 70 70 6f 72 74 20 74 68 |esn't su|pport th|
|00003590| 69 73 20 66 65 61 74 75 | 72 65 20 20 20 20 20 20 |is featu|re |
|000035a0| 20 2a 2f 0a 58 23 69 66 | 64 65 66 20 20 4e 4f 53 | */.X#if|def NOS|
|000035b0| 54 52 55 43 54 41 53 53 | 49 47 4e 0a 58 6d 65 6d |TRUCTASS|IGN.Xmem|
|000035c0| 63 70 79 20 28 64 2c 20 | 73 2c 20 6c 29 0a 58 72 |cpy (d, |s, l).Xr|
|000035d0| 65 67 69 73 74 65 72 20 | 63 68 61 72 20 20 20 2a |egister |char *|
|000035e0| 64 3b 0a 58 72 65 67 69 | 73 74 65 72 20 63 68 61 |d;.Xregi|ster cha|
|000035f0| 72 20 20 20 2a 73 3b 0a | 58 72 65 67 69 73 74 65 |r *s;.|Xregiste|
|00003600| 72 20 69 6e 74 20 20 20 | 20 6c 3b 0a 58 7b 0a 58 |r int | l;.X{.X|
|00003610| 20 20 20 20 20 20 20 20 | 77 68 69 6c 65 20 28 6c | |while (l|
|00003620| 2d 2d 29 20 2a 64 2b 2b | 20 3d 20 2a 73 2b 2b 3b |--) *d++| = *s++;|
|00003630| 0a 58 7d 0a 58 23 65 6e | 64 69 66 0a 58 0a 58 2f |.X}.X#en|dif.X.X/|
|00003640| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003650| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003660| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003670| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003680| 2a 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |*.X | |
|00003690| 20 20 20 20 20 20 20 20 | 20 54 48 45 20 50 52 4f | | THE PRO|
|000036a0| 43 45 53 53 45 53 0a 58 | 20 2a 2a 2a 2a 2a 2a 2a |CESSES.X| *******|
|000036b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000036c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000036d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000036e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2f 0a 58 50 72 6f |********|**/.XPro|
|000036f0| 63 5f 36 20 28 45 6e 75 | 6d 5f 56 61 6c 5f 50 61 |c_6 (Enu|m_Val_Pa|
|00003700| 72 2c 20 45 6e 75 6d 5f | 52 65 66 5f 50 61 72 29 |r, Enum_|Ref_Par)|
|00003710| 0a 58 2f 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.X/*****|********|
|00003720| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003730| 2a 2a 2a 2a 2f 0a 58 20 | 20 20 20 2f 2a 20 65 78 |****/.X | /* ex|
|00003740| 65 63 75 74 65 64 20 6f | 6e 63 65 20 2a 2f 0a 58 |ecuted o|nce */.X|
|00003750| 20 20 20 20 2f 2a 20 45 | 6e 75 6d 5f 56 61 6c 5f | /* E|num_Val_|
|00003760| 50 61 72 20 3d 3d 20 49 | 64 65 6e 74 5f 33 2c 20 |Par == I|dent_3, |
|00003770| 45 6e 75 6d 5f 52 65 66 | 5f 50 61 72 20 62 65 63 |Enum_Ref|_Par bec|
|00003780| 6f 6d 65 73 20 49 64 65 | 6e 74 5f 32 20 2a 2f 0a |omes Ide|nt_2 */.|
|00003790| 58 0a 58 45 6e 75 6d 65 | 72 61 74 69 6f 6e 20 20 |X.XEnume|ration |
|000037a0| 45 6e 75 6d 5f 56 61 6c | 5f 50 61 72 3b 0a 58 45 |Enum_Val|_Par;.XE|
|000037b0| 6e 75 6d 65 72 61 74 69 | 6f 6e 20 2a 45 6e 75 6d |numerati|on *Enum|
|000037c0| 5f 52 65 66 5f 50 61 72 | 3b 0a 58 7b 0a 58 20 20 |_Ref_Par|;.X{.X |
|000037d0| 2a 45 6e 75 6d 5f 52 65 | 66 5f 50 61 72 20 3d 20 |*Enum_Re|f_Par = |
|000037e0| 45 6e 75 6d 5f 56 61 6c | 5f 50 61 72 3b 0a 58 20 |Enum_Val|_Par;.X |
|000037f0| 20 69 66 20 28 21 20 46 | 75 6e 63 5f 33 20 28 45 | if (! F|unc_3 (E|
|00003800| 6e 75 6d 5f 56 61 6c 5f | 50 61 72 29 29 0a 58 20 |num_Val_|Par)).X |
|00003810| 20 20 20 2f 2a 20 74 68 | 65 6e 2c 20 6e 6f 74 20 | /* th|en, not |
|00003820| 65 78 65 63 75 74 65 64 | 20 2a 2f 0a 58 20 20 20 |executed| */.X |
|00003830| 20 2a 45 6e 75 6d 5f 52 | 65 66 5f 50 61 72 20 3d | *Enum_R|ef_Par =|
|00003840| 20 49 64 65 6e 74 5f 34 | 3b 0a 58 20 20 73 77 69 | Ident_4|;.X swi|
|00003850| 74 63 68 20 28 45 6e 75 | 6d 5f 56 61 6c 5f 50 61 |tch (Enu|m_Val_Pa|
|00003860| 72 29 0a 58 20 20 7b 0a | 58 20 20 20 20 63 61 73 |r).X {.|X cas|
|00003870| 65 20 49 64 65 6e 74 5f | 31 3a 20 0a 58 20 20 20 |e Ident_|1: .X |
|00003880| 20 20 20 2a 45 6e 75 6d | 5f 52 65 66 5f 50 61 72 | *Enum|_Ref_Par|
|00003890| 20 3d 20 49 64 65 6e 74 | 5f 31 3b 0a 58 20 20 20 | = Ident|_1;.X |
|000038a0| 20 20 20 62 72 65 61 6b | 3b 0a 58 20 20 20 20 63 | break|;.X c|
|000038b0| 61 73 65 20 49 64 65 6e | 74 5f 32 3a 20 0a 58 20 |ase Iden|t_2: .X |
|000038c0| 20 20 20 20 20 69 66 20 | 28 49 6e 74 5f 47 6c 6f | if |(Int_Glo|
|000038d0| 62 20 3e 20 31 30 30 29 | 0a 58 20 20 20 20 20 20 |b > 100)|.X |
|000038e0| 20 20 2f 2a 20 74 68 65 | 6e 20 2a 2f 0a 58 20 20 | /* the|n */.X |
|000038f0| 20 20 20 20 2a 45 6e 75 | 6d 5f 52 65 66 5f 50 61 | *Enu|m_Ref_Pa|
|00003900| 72 20 3d 20 49 64 65 6e | 74 5f 31 3b 0a 58 20 20 |r = Iden|t_1;.X |
|00003910| 20 20 20 20 65 6c 73 65 | 20 2a 45 6e 75 6d 5f 52 | else| *Enum_R|
|00003920| 65 66 5f 50 61 72 20 3d | 20 49 64 65 6e 74 5f 34 |ef_Par =| Ident_4|
|00003930| 3b 0a 58 20 20 20 20 20 | 20 62 72 65 61 6b 3b 0a |;.X | break;.|
|00003940| 58 20 20 20 20 63 61 73 | 65 20 49 64 65 6e 74 5f |X cas|e Ident_|
|00003950| 33 3a 20 2f 2a 20 65 78 | 65 63 75 74 65 64 20 2a |3: /* ex|ecuted *|
|00003960| 2f 0a 58 20 20 20 20 20 | 20 2a 45 6e 75 6d 5f 52 |/.X | *Enum_R|
|00003970| 65 66 5f 50 61 72 20 3d | 20 49 64 65 6e 74 5f 32 |ef_Par =| Ident_2|
|00003980| 3b 0a 58 20 20 20 20 20 | 20 62 72 65 61 6b 3b 0a |;.X | break;.|
|00003990| 58 20 20 20 20 63 61 73 | 65 20 49 64 65 6e 74 5f |X cas|e Ident_|
|000039a0| 34 3a 20 62 72 65 61 6b | 3b 0a 58 20 20 20 20 63 |4: break|;.X c|
|000039b0| 61 73 65 20 49 64 65 6e | 74 5f 35 3a 20 0a 58 20 |ase Iden|t_5: .X |
|000039c0| 20 20 20 20 20 2a 45 6e | 75 6d 5f 52 65 66 5f 50 | *En|um_Ref_P|
|000039d0| 61 72 20 3d 20 49 64 65 | 6e 74 5f 33 3b 0a 58 20 |ar = Ide|nt_3;.X |
|000039e0| 20 20 20 20 20 62 72 65 | 61 6b 3b 0a 58 20 20 7d | bre|ak;.X }|
|000039f0| 20 2f 2a 20 73 77 69 74 | 63 68 20 2a 2f 0a 58 7d | /* swit|ch */.X}|
|00003a00| 20 2f 2a 20 50 72 6f 63 | 5f 36 20 2a 2f 0a 58 0a | /* Proc|_6 */.X.|
|00003a10| 58 0a 58 50 72 6f 63 5f | 37 20 28 49 6e 74 5f 31 |X.XProc_|7 (Int_1|
|00003a20| 5f 50 61 72 5f 56 61 6c | 2c 20 49 6e 74 5f 32 5f |_Par_Val|, Int_2_|
|00003a30| 50 61 72 5f 56 61 6c 2c | 20 49 6e 74 5f 50 61 72 |Par_Val,| Int_Par|
|00003a40| 5f 52 65 66 29 0a 58 2f | 2a 2a 2a 2a 2a 2a 2a 2a |_Ref).X/|********|
|00003a50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003a60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003a70| 2a 2a 2a 2a 2a 2a 2f 0a | 58 20 20 20 20 2f 2a 20 |******/.|X /* |
|00003a80| 65 78 65 63 75 74 65 64 | 20 74 68 72 65 65 20 74 |executed| three t|
|00003a90| 69 6d 65 73 20 20 20 20 | 20 20 20 20 20 20 20 20 |imes | |
|00003aa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003ab0| 20 20 20 20 20 20 20 20 | 20 20 2a 2f 20 0a 58 20 | | */ .X |
|00003ac0| 20 20 20 2f 2a 20 66 69 | 72 73 74 20 63 61 6c 6c | /* fi|rst call|
|00003ad0| 3a 20 20 20 20 20 20 49 | 6e 74 5f 31 5f 50 61 72 |: I|nt_1_Par|
|00003ae0| 5f 56 61 6c 20 3d 3d 20 | 32 2c 20 49 6e 74 5f 32 |_Val == |2, Int_2|
|00003af0| 5f 50 61 72 5f 56 61 6c | 20 3d 3d 20 33 2c 20 20 |_Par_Val| == 3, |
|00003b00| 2a 2f 0a 58 20 20 20 20 | 2f 2a 20 20 20 20 20 20 |*/.X |/* |
|00003b10| 20 20 20 20 20 20 20 20 | 20 20 20 20 49 6e 74 5f | | Int_|
|00003b20| 50 61 72 5f 52 65 66 20 | 62 65 63 6f 6d 65 73 20 |Par_Ref |becomes |
|00003b30| 37 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |7 | |
|00003b40| 20 20 20 20 20 2a 2f 0a | 58 20 20 20 20 2f 2a 20 | */.|X /* |
|00003b50| 73 65 63 6f 6e 64 20 63 | 61 6c 6c 3a 20 20 20 20 |second c|all: |
|00003b60| 20 49 6e 74 5f 31 5f 50 | 61 72 5f 56 61 6c 20 3d | Int_1_P|ar_Val =|
|00003b70| 3d 20 31 30 2c 20 49 6e | 74 5f 32 5f 50 61 72 5f |= 10, In|t_2_Par_|
|00003b80| 56 61 6c 20 3d 3d 20 35 | 2c 20 2a 2f 0a 58 20 20 |Val == 5|, */.X |
|00003b90| 20 20 2f 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 | /* | |
|00003ba0| 20 20 20 20 20 20 49 6e | 74 5f 50 61 72 5f 52 65 | In|t_Par_Re|
|00003bb0| 66 20 62 65 63 6f 6d 65 | 73 20 31 37 20 20 20 20 |f become|s 17 |
|00003bc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2a | | *|
|00003bd0| 2f 0a 58 20 20 20 20 2f | 2a 20 74 68 69 72 64 20 |/.X /|* third |
|00003be0| 63 61 6c 6c 3a 20 20 20 | 20 20 20 49 6e 74 5f 31 |call: | Int_1|
|00003bf0| 5f 50 61 72 5f 56 61 6c | 20 3d 3d 20 36 2c 20 49 |_Par_Val| == 6, I|
|00003c00| 6e 74 5f 32 5f 50 61 72 | 5f 56 61 6c 20 3d 3d 20 |nt_2_Par|_Val == |
|00003c10| 31 30 2c 20 2a 2f 0a 58 | 20 20 20 20 2f 2a 20 20 |10, */.X| /* |
|00003c20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003c30| 49 6e 74 5f 50 61 72 5f | 52 65 66 20 62 65 63 6f |Int_Par_|Ref beco|
|00003c40| 6d 65 73 20 31 38 20 20 | 20 20 20 20 20 20 20 20 |mes 18 | |
|00003c50| 20 20 20 20 20 20 20 20 | 20 2a 2f 0a 58 4f 6e 65 | | */.XOne|
|00003c60| 5f 46 69 66 74 79 20 20 | 20 20 20 20 20 49 6e 74 |_Fifty | Int|
|00003c70| 5f 31 5f 50 61 72 5f 56 | 61 6c 3b 0a 58 4f 6e 65 |_1_Par_V|al;.XOne|
|00003c80| 5f 46 69 66 74 79 20 20 | 20 20 20 20 20 49 6e 74 |_Fifty | Int|
|00003c90| 5f 32 5f 50 61 72 5f 56 | 61 6c 3b 0a 58 4f 6e 65 |_2_Par_V|al;.XOne|
|00003ca0| 5f 46 69 66 74 79 20 20 | 20 20 20 20 2a 49 6e 74 |_Fifty | *Int|
|00003cb0| 5f 50 61 72 5f 52 65 66 | 3b 0a 58 7b 0a 58 20 20 |_Par_Ref|;.X{.X |
|00003cc0| 4f 6e 65 5f 46 69 66 74 | 79 20 49 6e 74 5f 4c 6f |One_Fift|y Int_Lo|
|00003cd0| 63 3b 0a 58 0a 58 20 20 | 49 6e 74 5f 4c 6f 63 20 |c;.X.X |Int_Loc |
|00003ce0| 3d 20 49 6e 74 5f 31 5f | 50 61 72 5f 56 61 6c 20 |= Int_1_|Par_Val |
|00003cf0| 2b 20 32 3b 0a 58 20 20 | 2a 49 6e 74 5f 50 61 72 |+ 2;.X |*Int_Par|
|00003d00| 5f 52 65 66 20 3d 20 49 | 6e 74 5f 32 5f 50 61 72 |_Ref = I|nt_2_Par|
|00003d10| 5f 56 61 6c 20 2b 20 49 | 6e 74 5f 4c 6f 63 3b 0a |_Val + I|nt_Loc;.|
|00003d20| 58 7d 20 2f 2a 20 50 72 | 6f 63 5f 37 20 2a 2f 0a |X} /* Pr|oc_7 */.|
|00003d30| 58 0a 58 0a 58 50 72 6f | 63 5f 38 20 28 41 72 72 |X.X.XPro|c_8 (Arr|
|00003d40| 5f 31 5f 50 61 72 5f 52 | 65 66 2c 20 41 72 72 5f |_1_Par_R|ef, Arr_|
|00003d50| 32 5f 50 61 72 5f 52 65 | 66 2c 20 49 6e 74 5f 31 |2_Par_Re|f, Int_1|
|00003d60| 5f 50 61 72 5f 56 61 6c | 2c 20 49 6e 74 5f 32 5f |_Par_Val|, Int_2_|
|00003d70| 50 61 72 5f 56 61 6c 29 | 0a 58 2f 2a 2a 2a 2a 2a |Par_Val)|.X/*****|
|00003d80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003d90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003da0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003db0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003dc0| 2f 0a 58 20 20 20 20 2f | 2a 20 65 78 65 63 75 74 |/.X /|* execut|
|00003dd0| 65 64 20 6f 6e 63 65 20 | 20 20 20 20 20 2a 2f 0a |ed once | */.|
|00003de0| 58 20 20 20 20 2f 2a 20 | 49 6e 74 5f 50 61 72 5f |X /* |Int_Par_|
|00003df0| 56 61 6c 5f 31 20 3d 3d | 20 33 20 2a 2f 0a 58 20 |Val_1 ==| 3 */.X |
|00003e00| 20 20 20 2f 2a 20 49 6e | 74 5f 50 61 72 5f 56 61 | /* In|t_Par_Va|
|00003e10| 6c 5f 32 20 3d 3d 20 37 | 20 2a 2f 0a 58 41 72 72 |l_2 == 7| */.XArr|
|00003e20| 5f 31 5f 44 69 6d 20 20 | 20 20 20 20 20 41 72 72 |_1_Dim | Arr|
|00003e30| 5f 31 5f 50 61 72 5f 52 | 65 66 3b 0a 58 41 72 72 |_1_Par_R|ef;.XArr|
|00003e40| 5f 32 5f 44 69 6d 20 20 | 20 20 20 20 20 41 72 72 |_2_Dim | Arr|
|00003e50| 5f 32 5f 50 61 72 5f 52 | 65 66 3b 0a 58 69 6e 74 |_2_Par_R|ef;.Xint|
|00003e60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 49 6e 74 | | Int|
|00003e70| 5f 31 5f 50 61 72 5f 56 | 61 6c 3b 0a 58 69 6e 74 |_1_Par_V|al;.Xint|
|00003e80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 49 6e 74 | | Int|
|00003e90| 5f 32 5f 50 61 72 5f 56 | 61 6c 3b 0a 58 7b 0a 58 |_2_Par_V|al;.X{.X|
|00003ea0| 20 20 52 45 47 20 4f 6e | 65 5f 46 69 66 74 79 20 | REG On|e_Fifty |
|00003eb0| 49 6e 74 5f 49 6e 64 65 | 78 3b 0a 58 20 20 52 45 |Int_Inde|x;.X RE|
|00003ec0| 47 20 4f 6e 65 5f 46 69 | 66 74 79 20 49 6e 74 5f |G One_Fi|fty Int_|
|00003ed0| 4c 6f 63 3b 0a 58 0a 58 | 20 20 49 6e 74 5f 4c 6f |Loc;.X.X| Int_Lo|
|00003ee0| 63 20 3d 20 49 6e 74 5f | 31 5f 50 61 72 5f 56 61 |c = Int_|1_Par_Va|
|00003ef0| 6c 20 2b 20 35 3b 0a 58 | 20 20 41 72 72 5f 31 5f |l + 5;.X| Arr_1_|
|00003f00| 50 61 72 5f 52 65 66 20 | 5b 49 6e 74 5f 4c 6f 63 |Par_Ref |[Int_Loc|
|00003f10| 5d 20 3d 20 49 6e 74 5f | 32 5f 50 61 72 5f 56 61 |] = Int_|2_Par_Va|
|00003f20| 6c 3b 0a 58 20 20 41 72 | 72 5f 31 5f 50 61 72 5f |l;.X Ar|r_1_Par_|
|00003f30| 52 65 66 20 5b 49 6e 74 | 5f 4c 6f 63 2b 31 5d 20 |Ref [Int|_Loc+1] |
|00003f40| 3d 20 41 72 72 5f 31 5f | 50 61 72 5f 52 65 66 20 |= Arr_1_|Par_Ref |
|00003f50| 5b 49 6e 74 5f 4c 6f 63 | 5d 3b 0a 58 20 20 41 72 |[Int_Loc|];.X Ar|
|00003f60| 72 5f 31 5f 50 61 72 5f | 52 65 66 20 5b 49 6e 74 |r_1_Par_|Ref [Int|
|00003f70| 5f 4c 6f 63 2b 33 30 5d | 20 3d 20 49 6e 74 5f 4c |_Loc+30]| = Int_L|
|00003f80| 6f 63 3b 0a 58 20 20 66 | 6f 72 20 28 49 6e 74 5f |oc;.X f|or (Int_|
|00003f90| 49 6e 64 65 78 20 3d 20 | 49 6e 74 5f 4c 6f 63 3b |Index = |Int_Loc;|
|00003fa0| 20 49 6e 74 5f 49 6e 64 | 65 78 20 3c 3d 20 49 6e | Int_Ind|ex <= In|
|00003fb0| 74 5f 4c 6f 63 2b 31 3b | 20 2b 2b 49 6e 74 5f 49 |t_Loc+1;| ++Int_I|
|00003fc0| 6e 64 65 78 29 0a 58 20 | 20 20 20 41 72 72 5f 32 |ndex).X | Arr_2|
|00003fd0| 5f 50 61 72 5f 52 65 66 | 20 5b 49 6e 74 5f 4c 6f |_Par_Ref| [Int_Lo|
|00003fe0| 63 5d 20 5b 49 6e 74 5f | 49 6e 64 65 78 5d 20 3d |c] [Int_|Index] =|
|00003ff0| 20 49 6e 74 5f 4c 6f 63 | 3b 0a 58 20 20 41 72 72 | Int_Loc|;.X Arr|
|00004000| 5f 32 5f 50 61 72 5f 52 | 65 66 20 5b 49 6e 74 5f |_2_Par_R|ef [Int_|
|00004010| 4c 6f 63 5d 20 5b 49 6e | 74 5f 4c 6f 63 2d 31 5d |Loc] [In|t_Loc-1]|
|00004020| 20 2b 3d 20 31 3b 0a 58 | 20 20 41 72 72 5f 32 5f | += 1;.X| Arr_2_|
|00004030| 50 61 72 5f 52 65 66 20 | 5b 49 6e 74 5f 4c 6f 63 |Par_Ref |[Int_Loc|
|00004040| 2b 32 30 5d 20 5b 49 6e | 74 5f 4c 6f 63 5d 20 3d |+20] [In|t_Loc] =|
|00004050| 20 41 72 72 5f 31 5f 50 | 61 72 5f 52 65 66 20 5b | Arr_1_P|ar_Ref [|
|00004060| 49 6e 74 5f 4c 6f 63 5d | 3b 0a 58 20 20 49 6e 74 |Int_Loc]|;.X Int|
|00004070| 5f 47 6c 6f 62 20 3d 20 | 35 3b 0a 58 7d 20 2f 2a |_Glob = |5;.X} /*|
|00004080| 20 50 72 6f 63 5f 38 20 | 2a 2f 0a 58 0a 58 0a 58 | Proc_8 |*/.X.X.X|
|00004090| 45 6e 75 6d 65 72 61 74 | 69 6f 6e 20 46 75 6e 63 |Enumerat|ion Func|
|000040a0| 5f 31 20 28 43 68 5f 31 | 5f 50 61 72 5f 56 61 6c |_1 (Ch_1|_Par_Val|
|000040b0| 2c 20 43 68 5f 32 5f 50 | 61 72 5f 56 61 6c 29 0a |, Ch_2_P|ar_Val).|
|000040c0| 58 2f 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |X/******|********|
|000040d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000040e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000040f0| 2a 2a 2a 2f 0a 58 20 20 | 20 20 2f 2a 20 65 78 65 |***/.X | /* exe|
|00004100| 63 75 74 65 64 20 74 68 | 72 65 65 20 74 69 6d 65 |cuted th|ree time|
|00004110| 73 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |s | |
|00004120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004130| 20 20 20 20 20 20 20 20 | 20 20 2a 2f 0a 58 20 20 | | */.X |
|00004140| 20 20 2f 2a 20 66 69 72 | 73 74 20 63 61 6c 6c 3a | /* fir|st call:|
|00004150| 20 20 20 20 20 20 43 68 | 5f 31 5f 50 61 72 5f 56 | Ch|_1_Par_V|
|00004160| 61 6c 20 3d 3d 20 27 48 | 27 2c 20 43 68 5f 32 5f |al == 'H|', Ch_2_|
|00004170| 50 61 72 5f 56 61 6c 20 | 3d 3d 20 27 52 27 20 20 |Par_Val |== 'R' |
|00004180| 20 20 2a 2f 0a 58 20 20 | 20 20 2f 2a 20 73 65 63 | */.X | /* sec|
|00004190| 6f 6e 64 20 63 61 6c 6c | 3a 20 20 20 20 20 43 68 |ond call|: Ch|
|000041a0| 5f 31 5f 50 61 72 5f 56 | 61 6c 20 3d 3d 20 27 41 |_1_Par_V|al == 'A|
|000041b0| 27 2c 20 43 68 5f 32 5f | 50 61 72 5f 56 61 6c 20 |', Ch_2_|Par_Val |
|000041c0| 3d 3d 20 27 43 27 20 20 | 20 20 2a 2f 0a 58 20 20 |== 'C' | */.X |
|000041d0| 20 20 2f 2a 20 74 68 69 | 72 64 20 63 61 6c 6c 3a | /* thi|rd call:|
|000041e0| 20 20 20 20 20 20 43 68 | 5f 31 5f 50 61 72 5f 56 | Ch|_1_Par_V|
|000041f0| 61 6c 20 3d 3d 20 27 42 | 27 2c 20 43 68 5f 32 5f |al == 'B|', Ch_2_|
|00004200| 50 61 72 5f 56 61 6c 20 | 3d 3d 20 27 43 27 20 20 |Par_Val |== 'C' |
|00004210| 20 20 2a 2f 0a 58 0a 58 | 43 61 70 69 74 61 6c 5f | */.X.X|Capital_|
|00004220| 4c 65 74 74 65 72 20 20 | 20 43 68 5f 31 5f 50 61 |Letter | Ch_1_Pa|
|00004230| 72 5f 56 61 6c 3b 0a 58 | 43 61 70 69 74 61 6c 5f |r_Val;.X|Capital_|
|00004240| 4c 65 74 74 65 72 20 20 | 20 43 68 5f 32 5f 50 61 |Letter | Ch_2_Pa|
|00004250| 72 5f 56 61 6c 3b 0a 58 | 7b 0a 58 20 20 43 61 70 |r_Val;.X|{.X Cap|
|00004260| 69 74 61 6c 5f 4c 65 74 | 74 65 72 20 20 20 20 20 |ital_Let|ter |
|00004270| 20 20 20 43 68 5f 31 5f | 4c 6f 63 3b 0a 58 20 20 | Ch_1_|Loc;.X |
|00004280| 43 61 70 69 74 61 6c 5f | 4c 65 74 74 65 72 20 20 |Capital_|Letter |
|00004290| 20 20 20 20 20 20 43 68 | 5f 32 5f 4c 6f 63 3b 0a | Ch|_2_Loc;.|
|000042a0| 58 0a 58 20 20 43 68 5f | 31 5f 4c 6f 63 20 3d 20 |X.X Ch_|1_Loc = |
|000042b0| 43 68 5f 31 5f 50 61 72 | 5f 56 61 6c 3b 0a 58 20 |Ch_1_Par|_Val;.X |
|000042c0| 20 43 68 5f 32 5f 4c 6f | 63 20 3d 20 43 68 5f 31 | Ch_2_Lo|c = Ch_1|
|000042d0| 5f 4c 6f 63 3b 0a 58 20 | 20 69 66 20 28 43 68 5f |_Loc;.X | if (Ch_|
|000042e0| 32 5f 4c 6f 63 20 21 3d | 20 43 68 5f 32 5f 50 61 |2_Loc !=| Ch_2_Pa|
|000042f0| 72 5f 56 61 6c 29 0a 58 | 20 20 20 20 2f 2a 20 74 |r_Val).X| /* t|
|00004300| 68 65 6e 2c 20 65 78 65 | 63 75 74 65 64 20 2a 2f |hen, exe|cuted */|
|00004310| 0a 58 20 20 20 20 72 65 | 74 75 72 6e 20 28 49 64 |.X re|turn (Id|
|00004320| 65 6e 74 5f 31 29 3b 0a | 58 20 20 65 6c 73 65 20 |ent_1);.|X else |
|00004330| 20 2f 2a 20 6e 6f 74 20 | 65 78 65 63 75 74 65 64 | /* not |executed|
|00004340| 20 2a 2f 0a 58 20 20 7b | 0a 58 20 20 20 20 43 68 | */.X {|.X Ch|
|00004350| 5f 31 5f 47 6c 6f 62 20 | 3d 20 43 68 5f 31 5f 4c |_1_Glob |= Ch_1_L|
|00004360| 6f 63 3b 0a 58 20 20 20 | 20 72 65 74 75 72 6e 20 |oc;.X | return |
|00004370| 28 49 64 65 6e 74 5f 32 | 29 3b 0a 58 20 20 20 7d |(Ident_2|);.X }|
|00004380| 0a 58 7d 20 2f 2a 20 46 | 75 6e 63 5f 31 20 2a 2f |.X} /* F|unc_1 */|
|00004390| 0a 58 0a 58 0a 58 42 6f | 6f 6c 65 61 6e 20 46 75 |.X.X.XBo|olean Fu|
|000043a0| 6e 63 5f 32 20 28 53 74 | 72 5f 31 5f 50 61 72 5f |nc_2 (St|r_1_Par_|
|000043b0| 52 65 66 2c 20 53 74 72 | 5f 32 5f 50 61 72 5f 52 |Ref, Str|_2_Par_R|
|000043c0| 65 66 29 0a 58 2f 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ef).X/**|********|
|000043d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000043e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000043f0| 2a 2a 2a 2a 2a 2a 2a 2f | 0a 58 20 20 20 20 2f 2a |*******/|.X /*|
|00004400| 20 65 78 65 63 75 74 65 | 64 20 6f 6e 63 65 20 2a | execute|d once *|
|00004410| 2f 0a 58 20 20 20 20 2f | 2a 20 53 74 72 5f 31 5f |/.X /|* Str_1_|
|00004420| 50 61 72 5f 52 65 66 20 | 3d 3d 20 22 44 48 52 59 |Par_Ref |== "DHRY|
|00004430| 53 54 4f 4e 45 20 50 52 | 4f 47 52 41 4d 2c 20 31 |STONE PR|OGRAM, 1|
|00004440| 27 53 54 20 53 54 52 49 | 4e 47 22 20 2a 2f 0a 58 |'ST STRI|NG" */.X|
|00004450| 20 20 20 20 2f 2a 20 53 | 74 72 5f 32 5f 50 61 72 | /* S|tr_2_Par|
|00004460| 5f 52 65 66 20 3d 3d 20 | 22 44 48 52 59 53 54 4f |_Ref == |"DHRYSTO|
|00004470| 4e 45 20 50 52 4f 47 52 | 41 4d 2c 20 32 27 4e 44 |NE PROGR|AM, 2'ND|
|00004480| 20 53 54 52 49 4e 47 22 | 20 2a 2f 0a 58 0a 58 53 | STRING"| */.X.XS|
|00004490| 74 72 5f 33 30 20 20 53 | 74 72 5f 31 5f 50 61 72 |tr_30 S|tr_1_Par|
|000044a0| 5f 52 65 66 3b 0a 58 53 | 74 72 5f 33 30 20 20 53 |_Ref;.XS|tr_30 S|
|000044b0| 74 72 5f 32 5f 50 61 72 | 5f 52 65 66 3b 0a 58 7b |tr_2_Par|_Ref;.X{|
|000044c0| 0a 58 20 20 52 45 47 20 | 4f 6e 65 5f 54 68 69 72 |.X REG |One_Thir|
|000044d0| 74 79 20 20 20 20 20 20 | 20 20 49 6e 74 5f 4c 6f |ty | Int_Lo|
|000044e0| 63 3b 0a 58 20 20 20 20 | 20 20 43 61 70 69 74 61 |c;.X | Capita|
|000044f0| 6c 5f 4c 65 74 74 65 72 | 20 20 20 20 43 68 5f 4c |l_Letter| Ch_L|
|00004500| 6f 63 3b 0a 58 0a 58 20 | 20 49 6e 74 5f 4c 6f 63 |oc;.X.X | Int_Loc|
|00004510| 20 3d 20 32 3b 0a 58 20 | 20 77 68 69 6c 65 20 28 | = 2;.X | while (|
|00004520| 49 6e 74 5f 4c 6f 63 20 | 3c 3d 20 32 29 20 2f 2a |Int_Loc |<= 2) /*|
|00004530| 20 6c 6f 6f 70 20 62 6f | 64 79 20 65 78 65 63 75 | loop bo|dy execu|
|00004540| 74 65 64 20 6f 6e 63 65 | 20 2a 2f 0a 58 20 20 20 |ted once| */.X |
|00004550| 20 69 66 20 28 46 75 6e | 63 5f 31 20 28 53 74 72 | if (Fun|c_1 (Str|
|00004560| 5f 31 5f 50 61 72 5f 52 | 65 66 5b 49 6e 74 5f 4c |_1_Par_R|ef[Int_L|
|00004570| 6f 63 5d 2c 0a 58 20 20 | 20 20 20 20 20 20 20 20 |oc],.X | |
|00004580| 20 20 20 20 20 20 53 74 | 72 5f 32 5f 50 61 72 5f | St|r_2_Par_|
|00004590| 52 65 66 5b 49 6e 74 5f | 4c 6f 63 2b 31 5d 29 20 |Ref[Int_|Loc+1]) |
|000045a0| 3d 3d 20 49 64 65 6e 74 | 5f 31 29 0a 58 20 20 20 |== Ident|_1).X |
|000045b0| 20 20 20 2f 2a 20 74 68 | 65 6e 2c 20 65 78 65 63 | /* th|en, exec|
|000045c0| 75 74 65 64 20 2a 2f 0a | 58 20 20 20 20 7b 0a 58 |uted */.|X {.X|
|000045d0| 20 20 20 20 20 20 43 68 | 5f 4c 6f 63 20 3d 20 27 | Ch|_Loc = '|
|000045e0| 41 27 3b 0a 58 20 20 20 | 20 20 20 49 6e 74 5f 4c |A';.X | Int_L|
|000045f0| 6f 63 20 2b 3d 20 31 3b | 0a 58 20 20 20 20 7d 20 |oc += 1;|.X } |
|00004600| 2f 2a 20 69 66 2c 20 77 | 68 69 6c 65 20 2a 2f 0a |/* if, w|hile */.|
|00004610| 58 20 20 69 66 20 28 43 | 68 5f 4c 6f 63 20 3e 3d |X if (C|h_Loc >=|
|00004620| 20 27 57 27 20 26 26 20 | 43 68 5f 4c 6f 63 20 3c | 'W' && |Ch_Loc <|
|00004630| 20 27 5a 27 29 0a 58 20 | 20 20 20 2f 2a 20 74 68 | 'Z').X | /* th|
|00004640| 65 6e 2c 20 6e 6f 74 20 | 65 78 65 63 75 74 65 64 |en, not |executed|
|00004650| 20 2a 2f 0a 58 20 20 20 | 20 49 6e 74 5f 4c 6f 63 | */.X | Int_Loc|
|00004660| 20 3d 20 37 3b 0a 58 20 | 20 69 66 20 28 43 68 5f | = 7;.X | if (Ch_|
|00004670| 4c 6f 63 20 3d 3d 20 27 | 52 27 29 0a 58 20 20 20 |Loc == '|R').X |
|00004680| 20 2f 2a 20 74 68 65 6e | 2c 20 6e 6f 74 20 65 78 | /* then|, not ex|
|00004690| 65 63 75 74 65 64 20 2a | 2f 0a 58 20 20 20 20 72 |ecuted *|/.X r|
|000046a0| 65 74 75 72 6e 20 28 74 | 72 75 65 29 3b 0a 58 20 |eturn (t|rue);.X |
|000046b0| 20 65 6c 73 65 20 2f 2a | 20 65 78 65 63 75 74 65 | else /*| execute|
|000046c0| 64 20 2a 2f 0a 58 20 20 | 7b 0a 58 20 20 20 20 69 |d */.X |{.X i|
|000046d0| 66 20 28 73 74 72 63 6d | 70 20 28 53 74 72 5f 31 |f (strcm|p (Str_1|
|000046e0| 5f 50 61 72 5f 52 65 66 | 2c 20 53 74 72 5f 32 5f |_Par_Ref|, Str_2_|
|000046f0| 50 61 72 5f 52 65 66 29 | 20 3e 20 30 29 0a 58 20 |Par_Ref)| > 0).X |
|00004700| 20 20 20 20 20 2f 2a 20 | 74 68 65 6e 2c 20 6e 6f | /* |then, no|
|00004710| 74 20 65 78 65 63 75 74 | 65 64 20 2a 2f 0a 58 20 |t execut|ed */.X |
|00004720| 20 20 20 7b 0a 58 20 20 | 20 20 20 20 49 6e 74 5f | {.X | Int_|
|00004730| 4c 6f 63 20 2b 3d 20 37 | 3b 0a 58 20 20 20 20 20 |Loc += 7|;.X |
|00004740| 20 49 6e 74 5f 47 6c 6f | 62 20 3d 20 49 6e 74 5f | Int_Glo|b = Int_|
|00004750| 4c 6f 63 3b 0a 58 20 20 | 20 20 20 20 72 65 74 75 |Loc;.X | retu|
|00004760| 72 6e 20 28 74 72 75 65 | 29 3b 0a 58 20 20 20 20 |rn (true|);.X |
|00004770| 7d 0a 58 20 20 20 20 65 | 6c 73 65 20 2f 2a 20 65 |}.X e|lse /* e|
|00004780| 78 65 63 75 74 65 64 20 | 2a 2f 0a 58 20 20 20 20 |xecuted |*/.X |
|00004790| 20 20 72 65 74 75 72 6e | 20 28 66 61 6c 73 65 29 | return| (false)|
|000047a0| 3b 0a 58 20 20 7d 20 2f | 2a 20 69 66 20 43 68 5f |;.X } /|* if Ch_|
|000047b0| 4c 6f 63 20 2a 2f 0a 58 | 7d 20 2f 2a 20 46 75 6e |Loc */.X|} /* Fun|
|000047c0| 63 5f 32 20 2a 2f 0a 58 | 0a 58 0a 58 42 6f 6f 6c |c_2 */.X|.X.XBool|
|000047d0| 65 61 6e 20 46 75 6e 63 | 5f 33 20 28 45 6e 75 6d |ean Func|_3 (Enum|
|000047e0| 5f 50 61 72 5f 56 61 6c | 29 0a 58 2f 2a 2a 2a 2a |_Par_Val|).X/****|
|000047f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004800| 2a 2a 2a 2a 2a 2a 2a 2f | 0a 58 20 20 20 20 2f 2a |*******/|.X /*|
|00004810| 20 65 78 65 63 75 74 65 | 64 20 6f 6e 63 65 20 20 | execute|d once |
|00004820| 20 20 20 20 20 20 2a 2f | 0a 58 20 20 20 20 2f 2a | */|.X /*|
|00004830| 20 45 6e 75 6d 5f 50 61 | 72 5f 56 61 6c 20 3d 3d | Enum_Pa|r_Val ==|
|00004840| 20 49 64 65 6e 74 5f 33 | 20 2a 2f 0a 58 45 6e 75 | Ident_3| */.XEnu|
|00004850| 6d 65 72 61 74 69 6f 6e | 20 45 6e 75 6d 5f 50 61 |meration| Enum_Pa|
|00004860| 72 5f 56 61 6c 3b 0a 58 | 7b 0a 58 20 20 45 6e 75 |r_Val;.X|{.X Enu|
|00004870| 6d 65 72 61 74 69 6f 6e | 20 45 6e 75 6d 5f 4c 6f |meration| Enum_Lo|
|00004880| 63 3b 0a 58 0a 58 20 20 | 45 6e 75 6d 5f 4c 6f 63 |c;.X.X |Enum_Loc|
|00004890| 20 3d 20 45 6e 75 6d 5f | 50 61 72 5f 56 61 6c 3b | = Enum_|Par_Val;|
|000048a0| 0a 58 20 20 69 66 20 28 | 45 6e 75 6d 5f 4c 6f 63 |.X if (|Enum_Loc|
|000048b0| 20 3d 3d 20 49 64 65 6e | 74 5f 33 29 0a 58 20 20 | == Iden|t_3).X |
|000048c0| 20 20 2f 2a 20 74 68 65 | 6e 2c 20 65 78 65 63 75 | /* the|n, execu|
|000048d0| 74 65 64 20 2a 2f 0a 58 | 20 20 20 20 72 65 74 75 |ted */.X| retu|
|000048e0| 72 6e 20 28 74 72 75 65 | 29 3b 0a 58 7d 20 2f 2a |rn (true|);.X} /*|
|000048f0| 20 46 75 6e 63 5f 33 20 | 2a 2f 0a 58 0a 45 4e 44 | Func_3 |*/.X.END|
|00004900| 5f 4f 46 5f 46 49 4c 45 | 0a 69 66 20 74 65 73 74 |_OF_FILE|.if test|
|00004910| 20 31 37 30 38 35 20 2d | 6e 65 20 60 77 63 20 2d | 17085 -|ne `wc -|
|00004920| 63 20 3c 27 64 68 72 79 | 2e 63 27 60 3b 20 74 68 |c <'dhry|.c'`; th|
|00004930| 65 6e 0a 20 20 20 20 65 | 63 68 6f 20 73 68 61 72 |en. e|cho shar|
|00004940| 3a 20 5c 22 27 64 68 72 | 79 2e 63 27 5c 22 20 75 |: \"'dhr|y.c'\" u|
|00004950| 6e 70 61 63 6b 65 64 20 | 77 69 74 68 20 77 72 6f |npacked |with wro|
|00004960| 6e 67 20 73 69 7a 65 21 | 0a 66 69 0a 63 68 6d 6f |ng size!|.fi.chmo|
|00004970| 64 20 2b 78 20 27 64 68 | 72 79 2e 63 27 0a 23 20 |d +x 'dh|ry.c'.# |
|00004980| 65 6e 64 20 6f 66 20 27 | 64 68 72 79 2e 63 27 0a |end of '|dhry.c'.|
|00004990| 66 69 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 64 |fi.if te|st -f 'd|
|000049a0| 68 72 79 2e 68 27 20 2d | 61 20 22 24 7b 31 7d 22 |hry.h' -|a "${1}"|
|000049b0| 20 21 3d 20 22 2d 63 22 | 20 3b 20 74 68 65 6e 20 | != "-c"| ; then |
|000049c0| 0a 20 20 65 63 68 6f 20 | 73 68 61 72 3a 20 57 69 |. echo |shar: Wi|
|000049d0| 6c 6c 20 6e 6f 74 20 63 | 6c 6f 62 62 65 72 20 65 |ll not c|lobber e|
|000049e0| 78 69 73 74 69 6e 67 20 | 66 69 6c 65 20 5c 22 27 |xisting |file \"'|
|000049f0| 64 68 72 79 2e 68 27 5c | 22 0a 65 6c 73 65 0a 65 |dhry.h'\|".else.e|
|00004a00| 63 68 6f 20 73 68 61 72 | 3a 20 45 78 74 72 61 63 |cho shar|: Extrac|
|00004a10| 74 69 6e 67 20 5c 22 27 | 64 68 72 79 2e 68 27 5c |ting \"'|dhry.h'\|
|00004a20| 22 20 5c 28 31 39 30 37 | 35 20 63 68 61 72 61 63 |" \(1907|5 charac|
|00004a30| 74 65 72 73 5c 29 0a 73 | 65 64 20 22 73 2f 5e 58 |ters\).s|ed "s/^X|
|00004a40| 2f 2f 22 20 3e 27 64 68 | 72 79 2e 68 27 20 3c 3c |//" >'dh|ry.h' <<|
|00004a50| 27 45 4e 44 5f 4f 46 5f | 46 49 4c 45 27 0a 58 2f |'END_OF_|FILE'.X/|
|00004a60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004a70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004a80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004a90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004aa0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00004ab0| 58 20 2a 20 20 54 68 65 | 20 42 59 54 45 20 55 4e |X * The| BYTE UN|
|00004ac0| 49 58 20 42 65 6e 63 68 | 6d 61 72 6b 73 20 2d 20 |IX Bench|marks - |
|00004ad0| 52 65 6c 65 61 73 65 20 | 32 0a 58 20 2a 20 20 20 |Release |2.X * |
|00004ae0| 20 20 20 20 20 20 20 4d | 6f 64 75 6c 65 3a 20 64 | M|odule: d|
|00004af0| 68 72 79 2e 68 20 20 20 | 53 49 44 3a 20 32 2e 34 |hry.h |SID: 2.4|
|00004b00| 20 34 2f 31 37 2f 39 30 | 20 31 36 3a 34 35 3a 33 | 4/17/90| 16:45:3|
|00004b10| 38 0a 58 20 2a 20 20 20 | 20 20 20 20 20 20 20 0a |8.X * | .|
|00004b20| 58 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |X ******|********|
|00004b30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004b40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004b50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004b60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004b70| 2a 0a 58 20 2a 20 42 75 | 67 20 72 65 70 6f 72 74 |*.X * Bu|g report|
|00004b80| 73 2c 20 70 61 74 63 68 | 65 73 2c 20 63 6f 6d 6d |s, patch|es, comm|
|00004b90| 65 6e 74 73 2c 20 73 75 | 67 67 65 73 74 69 6f 6e |ents, su|ggestion|
|00004ba0| 73 20 73 68 6f 75 6c 64 | 20 62 65 20 73 65 6e 74 |s should| be sent|
|00004bb0| 20 74 6f 3a 0a 58 20 2a | 0a 58 20 2a 09 42 65 6e | to:.X *|.X *.Ben|
|00004bc0| 20 53 6d 69 74 68 20 6f | 72 20 52 69 63 6b 20 47 | Smith o|r Rick G|
|00004bd0| 72 65 68 61 6e 20 61 74 | 20 42 59 54 45 20 4d 61 |rehan at| BYTE Ma|
|00004be0| 67 61 7a 69 6e 65 0a 58 | 20 2a 09 62 65 6e 73 6d |gazine.X| *.bensm|
|00004bf0| 69 74 68 40 62 69 78 70 | 62 2e 55 55 43 50 20 20 |ith@bixp|b.UUCP |
|00004c00| 20 20 72 69 63 6b 5f 67 | 40 62 69 78 70 62 2e 55 | rick_g|@bixpb.U|
|00004c10| 55 43 50 0a 58 20 2a 0a | 58 20 2a 2a 2a 2a 2a 2a |UCP.X *.|X ******|
|00004c20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004c30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004c40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004c50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004c60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 58 20 2a 20 20 4d |********|*.X * M|
|00004c70| 6f 64 69 66 69 63 61 74 | 69 6f 6e 20 4c 6f 67 3a |odificat|ion Log:|
|00004c80| 0a 58 20 2a 20 61 64 64 | 61 70 74 65 64 20 66 72 |.X * add|apted fr|
|00004c90| 6f 6d 3a 0a 58 20 2a 0a | 58 20 2a 2a 2a 2a 2a 2a |om:.X *.|X ******|
|00004ca0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004cb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004cc0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004cd0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004ce0| 2a 2a 2a 2a 2a 2a 2a 2a | 2f 0a 58 2f 2a 0a 58 20 |********|/.X/*.X |
|00004cf0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004d00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004d10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004d20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004d30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0a 58 20 2a |********|****.X *|
|00004d40| 0a 58 20 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X * | |
|00004d50| 20 20 20 20 20 20 20 22 | 44 48 52 59 53 54 4f 4e | "|DHRYSTON|
|00004d60| 45 22 20 42 65 6e 63 68 | 6d 61 72 6b 20 50 72 6f |E" Bench|mark Pro|
|00004d70| 67 72 61 6d 0a 58 20 2a | 20 20 20 20 20 20 20 20 |gram.X *| |
|00004d80| 20 20 20 20 20 20 20 20 | 20 20 20 2d 2d 2d 2d 2d | | -----|
|00004d90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004da0| 2d 2d 2d 2d 2d 2d 2d 2d | 0a 58 20 2a 20 20 20 20 |--------|.X * |
|00004db0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004dc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004dd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004de0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004df0| 20 20 20 20 20 20 20 20 | 0a 58 20 2a 20 20 56 65 | |.X * Ve|
|00004e00| 72 73 69 6f 6e 3a 20 20 | 20 20 43 2c 20 56 65 72 |rsion: | C, Ver|
|00004e10| 73 69 6f 6e 20 32 2e 30 | 0a 58 20 2a 20 20 20 20 |sion 2.0|.X * |
|00004e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004e30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004e40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004e50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004e60| 20 20 20 20 20 20 20 20 | 0a 58 20 2a 20 20 46 69 | |.X * Fi|
|00004e70| 6c 65 3a 20 20 20 20 20 | 20 20 64 68 72 79 5f 67 |le: | dhry_g|
|00004e80| 6c 6f 62 61 6c 2e 68 20 | 28 70 61 72 74 20 31 20 |lobal.h |(part 1 |
|00004e90| 6f 66 20 33 29 0a 58 20 | 2a 0a 58 20 2a 20 20 44 |of 3).X |*.X * D|
|00004ea0| 61 74 65 3a 20 20 20 20 | 20 20 20 4d 61 72 63 68 |ate: | March|
|00004eb0| 20 33 2c 20 31 39 38 38 | 0a 58 20 2a 0a 58 20 2a | 3, 1988|.X *.X *|
|00004ec0| 20 20 41 75 74 68 6f 72 | 3a 20 20 20 20 20 52 65 | Author|: Re|
|00004ed0| 69 6e 68 6f 6c 64 20 50 | 2e 20 57 65 69 63 6b 65 |inhold P|. Weicke|
|00004ee0| 72 0a 58 20 2a 20 20 20 | 20 20 20 20 20 20 20 20 |r.X * | |
|00004ef0| 20 20 20 20 20 20 20 20 | 20 20 20 53 69 65 6d 65 | | Sieme|
|00004f00| 6e 73 20 41 47 2c 20 45 | 20 53 54 45 20 33 35 0a |ns AG, E| STE 35.|
|00004f10| 58 20 2a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X * | |
|00004f20| 20 20 20 20 20 20 20 20 | 20 50 6f 73 74 66 61 63 | | Postfac|
|00004f30| 68 20 33 32 34 30 0a 58 | 20 2a 20 20 20 20 20 20 |h 3240.X| * |
|00004f40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004f50| 38 35 32 30 20 45 72 6c | 61 6e 67 65 6e 0a 58 20 |8520 Erl|angen.X |
|00004f60| 2a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |* | |
|00004f70| 20 20 20 20 20 20 20 47 | 65 72 6d 61 6e 79 20 28 | G|ermany (|
|00004f80| 57 65 73 74 29 0a 58 20 | 2a 20 20 20 20 20 20 20 |West).X |* |
|00004f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004fa0| 20 20 20 20 20 20 20 50 | 68 6f 6e 65 3a 20 20 5b | P|hone: [|
|00004fb0| 78 78 78 2d 34 39 5d 2d | 39 31 33 31 2d 37 2d 32 |xxx-49]-|9131-7-2|
|00004fc0| 30 33 33 30 0a 58 20 2a | 20 20 20 20 20 20 20 20 |0330.X *| |
|00004fd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004fe0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 28 38 | | (8|
|00004ff0| 2d 31 37 20 43 65 6e 74 | 72 61 6c 20 45 75 72 6f |-17 Cent|ral Euro|
|00005000| 70 65 61 6e 20 54 69 6d | 65 29 0a 58 20 2a 20 20 |pean Tim|e).X * |
|00005010| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005020| 20 20 20 20 20 20 20 20 | 20 20 20 20 55 73 65 6e | | Usen|
|00005030| 65 74 3a 20 2e 2e 21 6d | 63 76 61 78 21 75 6e 69 |et: ..!m|cvax!uni|
|00005040| 64 6f 21 65 73 74 65 76 | 61 78 21 77 65 69 63 6b |do!estev|ax!weick|
|00005050| 65 72 0a 58 20 2a 0a 58 | 20 2a 20 20 20 20 20 20 |er.X *.X| * |
|00005060| 20 20 20 20 20 20 20 20 | 4f 72 69 67 69 6e 61 6c | |Original|
|00005070| 20 56 65 72 73 69 6f 6e | 20 28 69 6e 20 41 64 61 | Version| (in Ada|
|00005080| 29 20 70 75 62 6c 69 73 | 68 65 64 20 69 6e 0a 58 |) publis|hed in.X|
|00005090| 20 2a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | * | |
|000050a0| 22 43 6f 6d 6d 75 6e 69 | 63 61 74 69 6f 6e 73 20 |"Communi|cations |
|000050b0| 6f 66 20 74 68 65 20 41 | 43 4d 22 20 76 6f 6c 2e |of the A|CM" vol.|
|000050c0| 20 32 37 2e 2c 20 6e 6f | 2e 20 31 30 20 28 4f 63 | 27., no|. 10 (Oc|
|000050d0| 74 2e 20 31 39 38 34 29 | 2c 0a 58 20 2a 20 20 20 |t. 1984)|,.X * |
|000050e0| 20 20 20 20 20 20 20 20 | 20 20 20 70 70 2e 20 31 | | pp. 1|
|000050f0| 30 31 33 20 2d 20 31 30 | 33 30 2c 20 74 6f 67 65 |013 - 10|30, toge|
|00005100| 74 68 65 72 20 77 69 74 | 68 20 74 68 65 20 73 74 |ther wit|h the st|
|00005110| 61 74 69 73 74 69 63 73 | 0a 58 20 2a 20 20 20 20 |atistics|.X * |
|00005120| 20 20 20 20 20 20 20 20 | 20 20 6f 6e 20 77 68 69 | | on whi|
|00005130| 63 68 20 74 68 65 20 64 | 69 73 74 72 69 62 75 74 |ch the d|istribut|
|00005140| 69 6f 6e 20 6f 66 20 73 | 74 61 74 65 6d 65 6e 74 |ion of s|tatement|
|00005150| 73 20 65 74 63 2e 20 69 | 73 20 62 61 73 65 64 2e |s etc. i|s based.|
|00005160| 0a 58 20 2a 0a 58 20 2a | 20 20 20 20 20 20 20 20 |.X *.X *| |
|00005170| 20 20 20 20 20 20 49 6e | 20 74 68 69 73 20 43 20 | In| this C |
|00005180| 76 65 72 73 69 6f 6e 2c | 20 74 68 65 20 66 6f 6c |version,| the fol|
|00005190| 6c 6f 77 69 6e 67 20 43 | 20 6c 69 62 72 61 72 79 |lowing C| library|
|000051a0| 20 66 75 6e 63 74 69 6f | 6e 73 20 61 72 65 20 75 | functio|ns are u|
|000051b0| 73 65 64 3a 0a 58 20 2a | 20 20 20 20 20 20 20 20 |sed:.X *| |
|000051c0| 20 20 20 20 20 20 2d 20 | 73 74 72 63 70 79 2c 20 | - |strcpy, |
|000051d0| 73 74 72 63 6d 70 20 28 | 69 6e 73 69 64 65 20 74 |strcmp (|inside t|
|000051e0| 68 65 20 6d 65 61 73 75 | 72 65 6d 65 6e 74 20 6c |he measu|rement l|
|000051f0| 6f 6f 70 29 0a 58 20 2a | 20 20 20 20 20 20 20 20 |oop).X *| |
|00005200| 20 20 20 20 20 20 2d 20 | 70 72 69 6e 74 66 2c 20 | - |printf, |
|00005210| 73 63 61 6e 66 20 28 6f | 75 74 73 69 64 65 20 74 |scanf (o|utside t|
|00005220| 68 65 20 6d 65 61 73 75 | 72 65 6d 65 6e 74 20 6c |he measu|rement l|
|00005230| 6f 6f 70 29 0a 58 20 2a | 20 20 20 20 20 20 20 20 |oop).X *| |
|00005240| 20 20 20 20 20 20 49 6e | 20 61 64 64 69 74 69 6f | In| additio|
|00005250| 6e 2c 20 55 4e 49 58 20 | 73 79 73 74 65 6d 20 63 |n, UNIX |system c|
|00005260| 61 6c 6c 73 20 22 74 69 | 6d 65 73 20 28 29 22 20 |alls "ti|mes ()" |
|00005270| 6f 72 20 22 74 69 6d 65 | 20 28 29 22 0a 58 20 2a |or "time| ()".X *|
|00005280| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 61 72 | | ar|
|00005290| 65 20 75 73 65 64 20 66 | 6f 72 20 65 78 65 63 75 |e used f|or execu|
|000052a0| 74 69 6f 6e 20 74 69 6d | 65 20 6d 65 61 73 75 72 |tion tim|e measur|
|000052b0| 65 6d 65 6e 74 2e 20 46 | 6f 72 20 6d 65 61 73 75 |ement. F|or measu|
|000052c0| 72 65 6d 65 6e 74 73 0a | 58 20 2a 20 20 20 20 20 |rements.|X * |
|000052d0| 20 20 20 20 20 20 20 20 | 20 6f 6e 20 6f 74 68 65 | | on othe|
|000052e0| 72 20 73 79 73 74 65 6d | 73 2c 20 74 68 65 73 65 |r system|s, these|
|000052f0| 20 63 61 6c 6c 73 20 68 | 61 76 65 20 74 6f 20 62 | calls h|ave to b|
|00005300| 65 20 63 68 61 6e 67 65 | 64 2e 0a 58 20 2a 0a 58 |e change|d..X *.X|
|00005310| 20 2a 20 20 43 6f 6c 6c | 65 63 74 69 6f 6e 20 6f | * Coll|ection o|
|00005320| 66 20 52 65 73 75 6c 74 | 73 3a 0a 58 20 2a 20 20 |f Result|s:.X * |
|00005330| 20 20 20 20 20 20 20 20 | 20 20 20 20 52 65 69 6e | | Rein|
|00005340| 68 6f 6c 64 20 57 65 69 | 63 6b 65 72 20 28 61 64 |hold Wei|cker (ad|
|00005350| 64 72 65 73 73 20 73 65 | 65 20 61 62 6f 76 65 29 |dress se|e above)|
|00005360| 20 61 6e 64 0a 58 20 2a | 20 20 20 20 20 20 20 20 | and.X *| |
|00005370| 20 20 20 20 20 20 0a 58 | 20 2a 20 20 20 20 20 20 | .X| * |
|00005380| 20 20 20 20 20 20 20 20 | 52 69 63 6b 20 52 69 63 | |Rick Ric|
|00005390| 68 61 72 64 73 6f 6e 0a | 58 20 2a 20 20 20 20 20 |hardson.|X * |
|000053a0| 20 20 20 20 20 20 20 20 | 20 50 43 20 52 65 73 65 | | PC Rese|
|000053b0| 61 72 63 68 2e 20 49 6e | 63 2e 0a 58 20 2a 20 20 |arch. In|c..X * |
|000053c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 39 34 20 41 | | 94 A|
|000053d0| 70 70 6c 65 20 4f 72 63 | 68 61 72 64 20 44 72 69 |pple Orc|hard Dri|
|000053e0| 76 65 0a 58 20 2a 20 20 | 20 20 20 20 20 20 20 20 |ve.X * | |
|000053f0| 20 20 20 20 54 69 6e 74 | 6f 6e 20 46 61 6c 6c 73 | Tint|on Falls|
|00005400| 2c 20 4e 4a 20 30 37 37 | 32 34 0a 58 20 2a 20 20 |, NJ 077|24.X * |
|00005410| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005420| 20 20 20 20 50 68 6f 6e | 65 3a 20 20 28 32 30 31 | Phon|e: (201|
|00005430| 29 20 38 33 34 2d 31 33 | 37 38 20 28 39 2d 31 37 |) 834-13|78 (9-17|
|00005440| 20 45 53 54 29 20 20 20 | 20 20 20 20 20 20 20 20 | EST) | |
|00005450| 20 20 20 20 0a 58 20 2a | 20 20 20 20 20 20 20 20 | .X *| |
|00005460| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 55 73 | | Us|
|00005470| 65 6e 65 74 3a 20 2e 2e | 2e 21 73 65 69 73 6d 6f |enet: ..|.!seismo|
|00005480| 21 75 75 6e 65 74 21 70 | 63 72 61 74 21 72 69 63 |!uunet!p|crat!ric|
|00005490| 6b 0a 58 20 2a 0a 58 20 | 2a 20 20 20 20 20 20 50 |k.X *.X |* P|
|000054a0| 6c 65 61 73 65 20 73 65 | 6e 64 20 72 65 73 75 6c |lease se|nd resul|
|000054b0| 74 73 20 74 6f 20 52 65 | 69 6e 68 6f 6c 64 20 57 |ts to Re|inhold W|
|000054c0| 65 69 63 6b 65 72 20 61 | 6e 64 2f 6f 72 20 52 69 |eicker a|nd/or Ri|
|000054d0| 63 6b 20 52 69 63 68 61 | 72 64 73 6f 6e 2e 0a 58 |ck Richa|rdson..X|
|000054e0| 20 2a 20 20 20 20 20 20 | 43 6f 6d 70 6c 65 74 65 | * |Complete|
|000054f0| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 20 73 68 6f | informa|tion sho|
|00005500| 75 6c 64 20 62 65 20 67 | 69 76 65 6e 20 6f 6e 20 |uld be g|iven on |
|00005510| 68 61 72 64 77 61 72 65 | 20 61 6e 64 20 73 6f 66 |hardware| and sof|
|00005520| 74 77 61 72 65 20 75 73 | 65 64 2e 0a 58 20 2a 20 |tware us|ed..X * |
|00005530| 20 20 20 20 20 48 61 72 | 64 77 61 72 65 20 69 6e | Har|dware in|
|00005540| 66 6f 72 6d 61 74 69 6f | 6e 20 69 6e 63 6c 75 64 |formatio|n includ|
|00005550| 65 73 3a 20 4d 61 63 68 | 69 6e 65 20 74 79 70 65 |es: Mach|ine type|
|00005560| 2c 20 43 50 55 2c 20 74 | 79 70 65 20 61 6e 64 20 |, CPU, t|ype and |
|00005570| 73 69 7a 65 0a 58 20 2a | 20 20 20 20 20 20 6f 66 |size.X *| of|
|00005580| 20 63 61 63 68 65 73 3b | 20 66 6f 72 20 6d 69 63 | caches;| for mic|
|00005590| 72 6f 70 72 6f 63 65 73 | 73 6f 72 73 3a 20 63 6c |roproces|sors: cl|
|000055a0| 6f 63 6b 20 66 72 65 71 | 75 65 6e 63 79 2c 20 6d |ock freq|uency, m|
|000055b0| 65 6d 6f 72 79 20 73 70 | 65 65 64 0a 58 20 2a 20 |emory sp|eed.X * |
|000055c0| 20 20 20 20 20 28 6e 75 | 6d 62 65 72 20 6f 66 20 | (nu|mber of |
|000055d0| 77 61 69 74 20 73 74 61 | 74 65 73 29 2e 0a 58 20 |wait sta|tes)..X |
|000055e0| 2a 20 20 20 20 20 20 53 | 6f 66 74 77 61 72 65 20 |* S|oftware |
|000055f0| 69 6e 66 6f 72 6d 61 74 | 69 6f 6e 20 69 6e 63 6c |informat|ion incl|
|00005600| 75 64 65 73 3a 20 43 6f | 6d 70 69 6c 65 72 20 28 |udes: Co|mpiler (|
|00005610| 61 6e 64 20 72 75 6e 74 | 69 6d 65 20 6c 69 62 72 |and runt|ime libr|
|00005620| 61 72 79 29 0a 58 20 2a | 20 20 20 20 20 20 6d 61 |ary).X *| ma|
|00005630| 6e 75 66 61 63 74 75 72 | 65 72 20 61 6e 64 20 76 |nufactur|er and v|
|00005640| 65 72 73 69 6f 6e 2c 20 | 63 6f 6d 70 69 6c 61 74 |ersion, |compilat|
|00005650| 69 6f 6e 20 73 77 69 74 | 63 68 65 73 2c 20 4f 53 |ion swit|ches, OS|
|00005660| 20 76 65 72 73 69 6f 6e | 2e 0a 58 20 2a 20 20 20 | version|..X * |
|00005670| 20 20 20 54 68 65 20 4f | 70 65 72 61 74 69 6e 67 | The O|perating|
|00005680| 20 53 79 73 74 65 6d 20 | 76 65 72 73 69 6f 6e 20 | System |version |
|00005690| 6d 61 79 20 67 69 76 65 | 20 61 6e 20 69 6e 64 69 |may give| an indi|
|000056a0| 63 61 74 69 6f 6e 20 61 | 62 6f 75 74 20 74 68 65 |cation a|bout the|
|000056b0| 0a 58 20 2a 20 20 20 20 | 20 20 63 6f 6d 70 69 6c |.X * | compil|
|000056c0| 65 72 3b 20 44 68 72 79 | 73 74 6f 6e 65 20 69 74 |er; Dhry|stone it|
|000056d0| 73 65 6c 66 20 70 65 72 | 66 6f 72 6d 73 20 6e 6f |self per|forms no|
|000056e0| 20 4f 53 20 63 61 6c 6c | 73 20 69 6e 20 74 68 65 | OS call|s in the|
|000056f0| 20 6d 65 61 73 75 72 65 | 6d 65 6e 74 20 6c 6f 6f | measure|ment loo|
|00005700| 70 2e 0a 58 20 2a 0a 58 | 20 2a 20 20 20 20 20 20 |p..X *.X| * |
|00005710| 54 68 65 20 63 6f 6d 70 | 6c 65 74 65 20 6f 75 74 |The comp|lete out|
|00005720| 70 75 74 20 67 65 6e 65 | 72 61 74 65 64 20 62 79 |put gene|rated by|
|00005730| 20 74 68 65 20 70 72 6f | 67 72 61 6d 20 73 68 6f | the pro|gram sho|
|00005740| 75 6c 64 20 62 65 20 6d | 61 69 6c 65 64 0a 58 20 |uld be m|ailed.X |
|00005750| 2a 20 20 20 20 20 20 73 | 75 63 68 20 74 68 61 74 |* s|uch that|
|00005760| 20 61 74 20 6c 65 61 73 | 74 20 73 6f 6d 65 20 63 | at leas|t some c|
|00005770| 68 65 63 6b 73 20 66 6f | 72 20 63 6f 72 72 65 63 |hecks fo|r correc|
|00005780| 74 6e 65 73 73 20 63 61 | 6e 20 62 65 20 6d 61 64 |tness ca|n be mad|
|00005790| 65 2e 0a 58 20 2a 0a 58 | 20 2a 2a 2a 2a 2a 2a 2a |e..X *.X| *******|
|000057a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000057b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000057c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000057d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000057e0| 2a 2a 2a 2a 0a 58 20 2a | 0a 58 20 2a 20 20 48 69 |****.X *|.X * Hi|
|000057f0| 73 74 6f 72 79 3a 20 20 | 20 20 54 68 69 73 20 76 |story: | This v|
|00005800| 65 72 73 69 6f 6e 20 43 | 2f 32 2e 30 20 68 61 73 |ersion C|/2.0 has|
|00005810| 20 62 65 65 6e 20 6d 61 | 64 65 20 66 6f 72 20 74 | been ma|de for t|
|00005820| 77 6f 20 72 65 61 73 6f | 6e 73 3a 0a 58 20 2a 0a |wo reaso|ns:.X *.|
|00005830| 58 20 2a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X * | |
|00005840| 20 31 29 20 54 68 65 72 | 65 20 69 73 20 61 6e 20 | 1) Ther|e is an |
|00005850| 6f 62 76 69 6f 75 73 20 | 6e 65 65 64 20 66 6f 72 |obvious |need for|
|00005860| 20 61 20 63 6f 6d 6d 6f | 6e 20 43 20 76 65 72 73 | a commo|n C vers|
|00005870| 69 6f 6e 20 6f 66 0a 58 | 20 2a 20 20 20 20 20 20 |ion of.X| * |
|00005880| 20 20 20 20 20 20 20 20 | 44 68 72 79 73 74 6f 6e | |Dhryston|
|00005890| 65 2c 20 73 69 6e 63 65 | 20 43 20 69 73 20 61 74 |e, since| C is at|
|000058a0| 20 70 72 65 73 65 6e 74 | 20 74 68 65 20 6d 6f 73 | present| the mos|
|000058b0| 74 20 70 6f 70 75 6c 61 | 72 20 73 79 73 74 65 6d |t popula|r system|
|000058c0| 0a 58 20 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X * | |
|000058d0| 20 20 70 72 6f 67 72 61 | 6d 6d 69 6e 67 20 6c 61 | progra|mming la|
|000058e0| 6e 67 75 61 67 65 20 66 | 6f 72 20 74 68 65 20 63 |nguage f|or the c|
|000058f0| 6c 61 73 73 20 6f 66 20 | 70 72 6f 63 65 73 73 6f |lass of |processo|
|00005900| 72 73 0a 58 20 2a 20 20 | 20 20 20 20 20 20 20 20 |rs.X * | |
|00005910| 20 20 20 20 28 6d 69 63 | 72 6f 63 6f 6d 70 75 74 | (mic|rocomput|
|00005920| 65 72 73 2c 20 6d 69 6e | 69 63 6f 6d 70 75 74 65 |ers, min|icompute|
|00005930| 72 73 29 20 77 68 65 72 | 65 20 44 68 72 79 73 74 |rs) wher|e Dhryst|
|00005940| 6f 6e 65 20 69 73 20 75 | 73 65 64 20 6d 6f 73 74 |one is u|sed most|
|00005950| 2e 0a 58 20 2a 20 20 20 | 20 20 20 20 20 20 20 20 |..X * | |
|00005960| 20 20 20 54 68 65 72 65 | 20 73 68 6f 75 6c 64 20 | There| should |
|00005970| 62 65 2c 20 61 73 20 66 | 61 72 20 61 73 20 70 6f |be, as f|ar as po|
|00005980| 73 73 69 62 6c 65 2c 20 | 6f 6e 6c 79 20 6f 6e 65 |ssible, |only one|
|00005990| 20 43 20 76 65 72 73 69 | 6f 6e 20 6f 66 0a 58 20 | C versi|on of.X |
|000059a0| 2a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 44 |* | D|
|000059b0| 68 72 79 73 74 6f 6e 65 | 20 73 75 63 68 20 74 68 |hrystone| such th|
|000059c0| 61 74 20 72 65 73 75 6c | 74 73 20 63 61 6e 20 62 |at resul|ts can b|
|000059d0| 65 20 63 6f 6d 70 61 72 | 65 64 20 77 69 74 68 6f |e compar|ed witho|
|000059e0| 75 74 0a 58 20 2a 20 20 | 20 20 20 20 20 20 20 20 |ut.X * | |
|000059f0| 20 20 20 20 72 65 73 74 | 72 69 63 74 69 6f 6e 73 | rest|rictions|
|00005a00| 2e 20 49 6e 20 74 68 65 | 20 70 61 73 74 2c 20 74 |. In the| past, t|
|00005a10| 68 65 20 43 20 76 65 72 | 73 69 6f 6e 73 20 64 69 |he C ver|sions di|
|00005a20| 73 74 72 69 62 75 74 65 | 64 0a 58 20 2a 20 20 20 |stribute|d.X * |
|00005a30| 20 20 20 20 20 20 20 20 | 20 20 20 62 79 20 52 69 | | by Ri|
|00005a40| 63 6b 20 52 69 63 68 61 | 72 64 73 6f 6e 20 28 56 |ck Richa|rdson (V|
|00005a50| 65 72 73 69 6f 6e 20 31 | 2e 31 29 20 61 6e 64 20 |ersion 1|.1) and |
|00005a60| 62 79 20 52 65 69 6e 68 | 6f 6c 64 20 57 65 69 63 |by Reinh|old Weic|
|00005a70| 6b 65 72 0a 58 20 2a 20 | 20 20 20 20 20 20 20 20 |ker.X * | |
|00005a80| 20 20 20 20 20 68 61 64 | 20 73 6d 61 6c 6c 20 28 | had| small (|
|00005a90| 74 68 6f 75 67 68 20 6e | 6f 74 20 73 69 67 6e 69 |though n|ot signi|
|00005aa0| 66 69 63 61 6e 74 29 20 | 64 69 66 66 65 72 65 6e |ficant) |differen|
|00005ab0| 63 65 73 2e 0a 58 20 2a | 0a 58 20 2a 20 20 20 20 |ces..X *|.X * |
|00005ac0| 20 20 20 20 20 20 20 20 | 20 20 32 29 20 41 73 20 | | 2) As |
|00005ad0| 66 61 72 20 61 73 20 69 | 74 20 69 73 20 70 6f 73 |far as i|t is pos|
|00005ae0| 73 69 62 6c 65 20 77 69 | 74 68 6f 75 74 20 63 68 |sible wi|thout ch|
|00005af0| 61 6e 67 65 73 20 74 6f | 20 74 68 65 20 44 68 72 |anges to| the Dhr|
|00005b00| 79 73 74 6f 6e 65 0a 58 | 20 2a 20 20 20 20 20 20 |ystone.X| * |
|00005b10| 20 20 20 20 20 20 20 20 | 73 74 61 74 69 73 74 69 | |statisti|
|00005b20| 63 73 2c 20 6f 70 74 69 | 6d 69 7a 69 6e 67 20 63 |cs, opti|mizing c|
|00005b30| 6f 6d 70 69 6c 65 72 73 | 20 73 68 6f 75 6c 64 20 |ompilers| should |
|00005b40| 62 65 20 70 72 65 76 65 | 6e 74 65 64 20 66 72 6f |be preve|nted fro|
|00005b50| 6d 0a 58 20 2a 20 20 20 | 20 20 20 20 20 20 20 20 |m.X * | |
|00005b60| 20 20 20 72 65 6d 6f 76 | 69 6e 67 20 73 69 67 6e | remov|ing sign|
|00005b70| 69 66 69 63 61 6e 74 20 | 73 74 61 74 65 6d 65 6e |ificant |statemen|
|00005b80| 74 73 2e 0a 58 20 2a 0a | 58 20 2a 20 20 20 20 20 |ts..X *.|X * |
|00005b90| 20 20 20 20 20 20 20 20 | 20 54 68 69 73 20 43 20 | | This C |
|00005ba0| 76 65 72 73 69 6f 6e 20 | 68 61 73 20 62 65 65 6e |version |has been|
|00005bb0| 20 64 65 76 65 6c 6f 70 | 65 64 20 69 6e 20 63 6f | develop|ed in co|
|00005bc0| 6f 70 65 72 61 74 69 6f | 6e 20 77 69 74 68 0a 58 |operatio|n with.X|
|00005bd0| 20 2a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | * | |
|00005be0| 52 69 63 6b 20 52 69 63 | 68 61 72 64 73 6f 6e 20 |Rick Ric|hardson |
|00005bf0| 28 54 69 6e 74 6f 6e 20 | 46 61 6c 6c 73 2c 20 4e |(Tinton |Falls, N|
|00005c00| 4a 29 2c 20 69 74 20 69 | 6e 63 6f 72 70 6f 72 61 |J), it i|ncorpora|
|00005c10| 74 65 73 20 6d 61 6e 79 | 0a 58 20 2a 20 20 20 20 |tes many|.X * |
|00005c20| 20 20 20 20 20 20 20 20 | 20 20 69 64 65 61 73 20 | | ideas |
|00005c30| 66 72 6f 6d 20 74 68 65 | 20 22 56 65 72 73 69 6f |from the| "Versio|
|00005c40| 6e 20 31 2e 31 22 20 64 | 69 73 74 72 69 62 75 74 |n 1.1" d|istribut|
|00005c50| 65 64 20 70 72 65 76 69 | 6f 75 73 6c 79 20 62 79 |ed previ|ously by|
|00005c60| 0a 58 20 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X * | |
|00005c70| 20 20 68 69 6d 20 6f 76 | 65 72 20 74 68 65 20 55 | him ov|er the U|
|00005c80| 4e 49 58 20 6e 65 74 77 | 6f 72 6b 20 55 73 65 6e |NIX netw|ork Usen|
|00005c90| 65 74 2e 0a 58 20 2a 20 | 20 20 20 20 20 20 20 20 |et..X * | |
|00005ca0| 20 20 20 20 20 49 20 61 | 6c 73 6f 20 74 68 61 6e | I a|lso than|
|00005cb0| 6b 20 43 68 61 69 6d 20 | 42 65 6e 65 64 65 6c 61 |k Chaim |Benedela|
|00005cc0| 63 20 28 4e 61 74 69 6f | 6e 61 6c 20 53 65 6d 69 |c (Natio|nal Semi|
|00005cd0| 63 6f 6e 64 75 63 74 6f | 72 29 2c 0a 58 20 2a 20 |conducto|r),.X * |
|00005ce0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 44 61 76 | | Dav|
|00005cf0| 69 64 20 44 69 74 7a 65 | 6c 20 28 53 55 4e 29 2c |id Ditze|l (SUN),|
|00005d00| 20 45 61 72 6c 20 4b 69 | 6c 6c 69 61 6e 20 61 6e | Earl Ki|llian an|
|00005d10| 64 20 4a 6f 68 6e 20 4d | 61 73 68 65 79 20 28 4d |d John M|ashey (M|
|00005d20| 49 50 53 29 2c 0a 58 20 | 2a 20 20 20 20 20 20 20 |IPS),.X |* |
|00005d30| 20 20 20 20 20 20 20 41 | 6c 61 6e 20 53 6d 69 74 | A|lan Smit|
|00005d40| 68 20 61 6e 64 20 52 61 | 66 61 65 6c 20 53 61 61 |h and Ra|fael Saa|
|00005d50| 76 65 64 72 61 2d 42 61 | 72 72 65 72 61 20 28 55 |vedra-Ba|rrera (U|
|00005d60| 43 20 61 74 20 42 65 72 | 6b 65 6c 65 79 29 0a 58 |C at Ber|keley).X|
|00005d70| 20 2a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | * | |
|00005d80| 66 6f 72 20 74 68 65 69 | 72 20 68 65 6c 70 20 77 |for thei|r help w|
|00005d90| 69 74 68 20 63 6f 6d 6d | 65 6e 74 73 20 6f 6e 20 |ith comm|ents on |
|00005da0| 65 61 72 6c 69 65 72 20 | 76 65 72 73 69 6f 6e 73 |earlier |versions|
|00005db0| 20 6f 66 20 74 68 65 0a | 58 20 2a 20 20 20 20 20 | of the.|X * |
|00005dc0| 20 20 20 20 20 20 20 20 | 20 62 65 6e 63 68 6d 61 | | benchma|
|00005dd0| 72 6b 2e 0a 58 20 2a 0a | 58 20 2a 20 20 43 68 61 |rk..X *.|X * Cha|
|00005de0| 6e 67 65 73 3a 20 20 20 | 20 49 6e 20 74 68 65 20 |nges: | In the |
|00005df0| 69 6e 69 74 69 61 6c 69 | 7a 61 74 69 6f 6e 20 70 |initiali|zation p|
|00005e00| 61 72 74 2c 20 74 68 69 | 73 20 76 65 72 73 69 6f |art, thi|s versio|
|00005e10| 6e 20 66 6f 6c 6c 6f 77 | 73 20 6d 6f 73 74 6c 79 |n follow|s mostly|
|00005e20| 0a 58 20 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X * | |
|00005e30| 20 20 52 69 63 6b 20 52 | 69 63 68 61 72 64 73 6f | Rick R|ichardso|
|00005e40| 6e 27 73 20 76 65 72 73 | 69 6f 6e 20 64 69 73 74 |n's vers|ion dist|
|00005e50| 72 69 62 75 74 65 64 20 | 76 69 61 20 55 73 65 6e |ributed |via Usen|
|00005e60| 65 74 2c 20 6e 6f 74 20 | 74 68 65 0a 58 20 2a 20 |et, not |the.X * |
|00005e70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 76 65 72 | | ver|
|00005e80| 73 69 6f 6e 20 64 69 73 | 74 72 69 62 75 74 65 64 |sion dis|tributed|
|00005e90| 20 65 61 72 6c 69 65 72 | 20 76 69 61 20 66 6c 6f | earlier| via flo|
|00005ea0| 70 70 79 20 64 69 73 6b | 20 62 79 20 52 65 69 6e |ppy disk| by Rein|
|00005eb0| 68 6f 6c 64 20 57 65 69 | 63 6b 65 72 2e 0a 58 20 |hold Wei|cker..X |
|00005ec0| 2a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 41 |* | A|
|00005ed0| 73 20 61 20 63 6f 6e 63 | 65 73 73 69 6f 6e 20 74 |s a conc|ession t|
|00005ee0| 6f 20 6f 6c 64 65 72 20 | 63 6f 6d 70 69 6c 65 72 |o older |compiler|
|00005ef0| 73 2c 20 6e 61 6d 65 73 | 20 68 61 76 65 20 62 65 |s, names| have be|
|00005f00| 65 6e 20 6d 61 64 65 0a | 58 20 2a 20 20 20 20 20 |en made.|X * |
|00005f10| 20 20 20 20 20 20 20 20 | 20 75 6e 69 71 75 65 20 | | unique |
|00005f20| 77 69 74 68 69 6e 20 74 | 68 65 20 66 69 72 73 74 |within t|he first|
|00005f30| 20 38 20 63 68 61 72 61 | 63 74 65 72 73 2e 0a 58 | 8 chara|cters..X|
|00005f40| 20 2a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | * | |
|00005f50| 49 6e 73 69 64 65 20 74 | 68 65 20 6d 65 61 73 75 |Inside t|he measu|
|00005f60| 72 65 6d 65 6e 74 20 6c | 6f 6f 70 2c 20 74 68 69 |rement l|oop, thi|
|00005f70| 73 20 76 65 72 73 69 6f | 6e 20 66 6f 6c 6c 6f 77 |s versio|n follow|
|00005f80| 73 20 74 68 65 0a 58 20 | 2a 20 20 20 20 20 20 20 |s the.X |* |
|00005f90| 20 20 20 20 20 20 20 76 | 65 72 73 69 6f 6e 20 70 | v|ersion p|
|00005fa0| 72 65 76 69 6f 75 73 6c | 79 20 64 69 73 74 72 69 |reviousl|y distri|
|00005fb0| 62 75 74 65 64 20 62 79 | 20 52 65 69 6e 68 6f 6c |buted by| Reinhol|
|00005fc0| 64 20 57 65 69 63 6b 65 | 72 2e 0a 58 20 2a 0a 58 |d Weicke|r..X *.X|
|00005fd0| 20 2a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | * | |
|00005fe0| 41 74 20 73 65 76 65 72 | 61 6c 20 70 6c 61 63 65 |At sever|al place|
|00005ff0| 73 20 69 6e 20 74 68 65 | 20 62 65 6e 63 68 6d 61 |s in the| benchma|
|00006000| 72 6b 2c 20 63 6f 64 65 | 20 68 61 73 20 62 65 65 |rk, code| has bee|
|00006010| 6e 20 61 64 64 65 64 2c | 0a 58 20 2a 20 20 20 20 |n added,|.X * |
|00006020| 20 20 20 20 20 20 20 20 | 20 20 62 75 74 20 77 69 | | but wi|
|00006030| 74 68 69 6e 20 74 68 65 | 20 6d 65 61 73 75 72 65 |thin the| measure|
|00006040| 6d 65 6e 74 20 6c 6f 6f | 70 20 6f 6e 6c 79 20 69 |ment loo|p only i|
|00006050| 6e 20 62 72 61 6e 63 68 | 65 73 20 74 68 61 74 20 |n branch|es that |
|00006060| 0a 58 20 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X * | |
|00006070| 20 20 61 72 65 20 6e 6f | 74 20 65 78 65 63 75 74 | are no|t execut|
|00006080| 65 64 2e 20 54 68 65 20 | 69 6e 74 65 6e 74 69 6f |ed. The |intentio|
|00006090| 6e 20 69 73 20 74 68 61 | 74 20 6f 70 74 69 6d 69 |n is tha|t optimi|
|000060a0| 7a 69 6e 67 20 63 6f 6d | 70 69 6c 65 72 73 0a 58 |zing com|pilers.X|
|000060b0| 20 2a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | * | |
|000060c0| 73 68 6f 75 6c 64 20 62 | 65 20 70 72 65 76 65 6e |should b|e preven|
|000060d0| 74 65 64 20 66 72 6f 6d | 20 6d 6f 76 69 6e 67 20 |ted from| moving |
|000060e0| 63 6f 64 65 20 6f 75 74 | 20 6f 66 20 74 68 65 20 |code out| of the |
|000060f0| 6d 65 61 73 75 72 65 6d | 65 6e 74 0a 58 20 2a 20 |measurem|ent.X * |
|00006100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 6c 6f 6f | | loo|
|00006110| 70 2c 20 6f 72 20 66 72 | 6f 6d 20 72 65 6d 6f 76 |p, or fr|om remov|
|00006120| 69 6e 67 20 63 6f 64 65 | 20 61 6c 74 6f 67 65 74 |ing code| altoget|
|00006130| 68 65 72 2e 20 53 69 6e | 63 65 20 74 68 65 20 73 |her. Sin|ce the s|
|00006140| 74 61 74 65 6d 65 6e 74 | 73 0a 58 20 2a 20 20 20 |tatement|s.X * |
|00006150| 20 20 20 20 20 20 20 20 | 20 20 20 74 68 61 74 20 | | that |
|00006160| 61 72 65 20 65 78 65 63 | 75 74 65 64 20 77 69 74 |are exec|uted wit|
|00006170| 68 69 6e 20 74 68 65 20 | 6d 65 61 73 75 72 65 6d |hin the |measurem|
|00006180| 65 6e 74 20 6c 6f 6f 70 | 20 68 61 76 65 20 4e 4f |ent loop| have NO|
|00006190| 54 20 62 65 65 6e 0a 58 | 20 2a 20 20 20 20 20 20 |T been.X| * |
|000061a0| 20 20 20 20 20 20 20 20 | 63 68 61 6e 67 65 64 2c | |changed,|
|000061b0| 20 74 68 65 20 6e 75 6d | 62 65 72 73 20 64 65 66 | the num|bers def|
|000061c0| 69 6e 69 6e 67 20 74 68 | 65 20 22 44 68 72 79 73 |ining th|e "Dhrys|
|000061d0| 74 6f 6e 65 20 64 69 73 | 74 72 69 62 75 74 69 6f |tone dis|tributio|
|000061e0| 6e 22 0a 58 20 2a 20 20 | 20 20 20 20 20 20 20 20 |n".X * | |
|000061f0| 20 20 20 20 28 64 69 73 | 74 72 69 62 75 74 69 6f | (dis|tributio|
|00006200| 6e 20 6f 66 20 73 74 61 | 74 65 6d 65 6e 74 73 2c |n of sta|tements,|
|00006210| 20 6f 70 65 72 61 6e 64 | 20 74 79 70 65 73 20 61 | operand| types a|
|00006220| 6e 64 20 6c 6f 63 61 6c | 69 74 79 29 0a 58 20 2a |nd local|ity).X *|
|00006230| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 73 74 | | st|
|00006240| 69 6c 6c 20 68 6f 6c 64 | 2e 20 45 78 63 65 70 74 |ill hold|. Except|
|00006250| 20 66 6f 72 20 73 6f 70 | 68 69 73 74 69 63 61 74 | for sop|histicat|
|00006260| 65 64 20 6f 70 74 69 6d | 69 7a 69 6e 67 20 63 6f |ed optim|izing co|
|00006270| 6d 70 69 6c 65 72 73 2c | 0a 58 20 2a 20 20 20 20 |mpilers,|.X * |
|00006280| 20 20 20 20 20 20 20 20 | 20 20 65 78 65 63 75 74 | | execut|
|00006290| 69 6f 6e 20 74 69 6d 65 | 73 20 66 6f 72 20 74 68 |ion time|s for th|
|000062a0| 69 73 20 76 65 72 73 69 | 6f 6e 20 73 68 6f 75 6c |is versi|on shoul|
|000062b0| 64 20 62 65 20 74 68 65 | 20 73 61 6d 65 20 61 73 |d be the| same as|
|000062c0| 0a 58 20 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X * | |
|000062d0| 20 20 66 6f 72 20 70 72 | 65 76 69 6f 75 73 20 76 | for pr|evious v|
|000062e0| 65 72 73 69 6f 6e 73 2e | 0a 58 20 2a 20 20 20 20 |ersions.|.X * |
|000062f0| 20 20 20 20 20 20 20 20 | 20 20 0a 58 20 2a 20 20 | | .X * |
|00006300| 20 20 20 20 20 20 20 20 | 20 20 20 20 53 69 6e 63 | | Sinc|
|00006310| 65 20 69 74 20 68 61 73 | 20 70 72 6f 76 65 6e 20 |e it has| proven |
|00006320| 64 69 66 66 69 63 75 6c | 74 20 74 6f 20 73 75 62 |difficul|t to sub|
|00006330| 74 72 61 63 74 20 74 68 | 65 20 74 69 6d 65 20 66 |tract th|e time f|
|00006340| 6f 72 20 74 68 65 0a 58 | 20 2a 20 20 20 20 20 20 |or the.X| * |
|00006350| 20 20 20 20 20 20 20 20 | 6d 65 61 73 75 72 65 6d | |measurem|
|00006360| 65 6e 74 20 6c 6f 6f 70 | 20 6f 76 65 72 68 65 61 |ent loop| overhea|
|00006370| 64 20 69 6e 20 61 20 63 | 6f 72 72 65 63 74 20 77 |d in a c|orrect w|
|00006380| 61 79 2c 20 74 68 65 20 | 6c 6f 6f 70 20 63 68 65 |ay, the |loop che|
|00006390| 63 6b 0a 58 20 2a 20 20 | 20 20 20 20 20 20 20 20 |ck.X * | |
|000063a0| 20 20 20 20 68 61 73 20 | 62 65 65 6e 20 6d 61 64 | has |been mad|
|000063b0| 65 20 61 20 70 61 72 74 | 20 6f 66 20 74 68 65 20 |e a part| of the |
|000063c0| 62 65 6e 63 68 6d 61 72 | 6b 2e 20 54 68 69 73 20 |benchmar|k. This |
|000063d0| 64 6f 65 73 20 68 61 76 | 65 0a 58 20 2a 20 20 20 |does hav|e.X * |
|000063e0| 20 20 20 20 20 20 20 20 | 20 20 20 61 6e 20 69 6d | | an im|
|000063f0| 70 61 63 74 20 2d 20 74 | 68 6f 75 67 68 20 61 20 |pact - t|hough a |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.