Artifact
2f4a727ae7e852facdf1c2f8af87090578cdeaa6:
0000: 3b 3b 20 28 63 29 20 32 30 30 36 2c 32 30 30 37 ;; (c) 2006,2007
0010: 2c 32 30 30 38 2c 32 30 30 39 20 4d 61 74 74 68 ,2008,2009 Matth
0020: 65 77 20 57 65 6c 6c 61 6e 64 20 6d 61 74 74 40 ew Welland matt@
0030: 6b 69 61 74 6f 61 2e 63 6f 6d 0a 3b 3b 20 20 0a kiatoa.com.;; .
0040: 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 69 73 20 ;; This file is
0050: 70 61 72 74 20 6f 66 20 4d 65 67 61 74 65 73 74 part of Megatest
0060: 2e 0a 3b 3b 20 0a 3b 3b 20 20 20 20 20 4d 65 67 ..;; .;; Meg
0070: 61 74 65 73 74 20 69 73 20 66 72 65 65 20 73 6f atest is free so
0080: 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 ftware: you can
0090: 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 redistribute it
00a0: 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b and/or modify.;;
00b0: 20 20 20 20 20 69 74 20 75 6e 64 65 72 20 74 68 it under th
00c0: 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 e terms of the G
00d0: 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 NU General Publi
00e0: 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 c License as pub
00f0: 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 20 20 20 lished by.;;
0100: 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 the Free Softwa
0110: 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 re Foundation, e
0120: 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 ither version 3
0130: 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 of the License,
0140: 6f 72 0a 3b 3b 20 20 20 20 20 28 61 74 20 79 6f or.;; (at yo
0150: 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c ur option) any l
0160: 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b ater version..;;
0170: 20 0a 3b 3b 20 20 20 20 20 4d 65 67 61 74 65 73 .;; Megates
0180: 74 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 t is distributed
0190: 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 in the hope tha
01a0: 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 t it will be use
01b0: 66 75 6c 2c 0a 3b 3b 20 20 20 20 20 62 75 74 20 ful,.;; but
01c0: 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 WITHOUT ANY WARR
01d0: 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 ANTY; without ev
01e0: 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 en the implied w
01f0: 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 20 20 arranty of.;;
0200: 20 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 MERCHANTABILIT
0210: 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 Y or FITNESS FOR
0220: 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 A PARTICULAR PU
0230: 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a RPOSE. See the.
0240: 3b 3b 20 20 20 20 20 47 4e 55 20 47 65 6e 65 72 ;; GNU Gener
0250: 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 al Public Licens
0260: 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 e for more detai
0270: 6c 73 2e 0a 3b 3b 20 0a 3b 3b 20 20 20 20 20 59 ls..;; .;; Y
0280: 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 ou should have r
0290: 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f eceived a copy o
02a0: 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 f the GNU Genera
02b0: 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 l Public License
02c0: 0a 3b 3b 20 20 20 20 20 61 6c 6f 6e 67 20 77 69 .;; along wi
02d0: 74 68 20 4d 65 67 61 74 65 73 74 2e 20 20 49 66 th Megatest. If
02e0: 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 3a not, see <http:
02f0: 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 //www.gnu.org/li
0300: 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 20 20 20 censes/>...;;
0310: 4c 69 63 65 6e 73 65 20 47 50 4c 2e 0a 0a 0a 28 License GPL....(
0320: 65 78 70 65 63 74 3a 72 65 71 75 69 72 65 64 20 expect:required
0330: 69 6e 20 22 4c 6f 67 46 69 6c 65 42 6f 64 79 22 in "LogFileBody"
0340: 20 3e 20 30 20 22 4d 75 73 74 20 62 65 20 73 6f > 0 "Must be so
0350: 6d 65 20 66 69 6c 65 73 20 69 6e 20 74 68 65 20 me files in the
0360: 64 69 72 22 20 23 2f 2e 2a 2f 29 0a 0a 28 65 78 dir" #/.*/)..(ex
0370: 70 65 63 74 3a 69 67 6e 6f 72 65 20 20 20 69 6e pect:ignore in
0380: 20 22 4c 6f 67 46 69 6c 65 42 6f 64 79 22 20 20 "LogFileBody"
0390: 3c 20 39 39 20 22 49 67 6e 6f 72 65 20 74 68 65 < 99 "Ignore the
03a0: 20 77 6f 72 64 20 65 72 72 6f 72 20 69 6e 20 63 word error in c
03b0: 6f 6d 6d 65 6e 74 73 22 20 23 2f 5e 5c 2f 5c 2f omments" #/^\/\/
03c0: 2e 2a 65 72 72 6f 72 2f 29 0a 28 65 78 70 65 63 .*error/).(expec
03d0: 74 3a 77 61 72 6e 69 6e 67 20 20 69 6e 20 22 4c t:warning in "L
03e0: 6f 67 46 69 6c 65 42 6f 64 79 22 20 20 3d 20 30 ogFileBody" = 0
03f0: 20 22 41 6e 79 20 77 61 72 6e 69 6e 67 22 20 23 "Any warning" #
0400: 2f 57 41 52 4e 49 4e 47 2f 29 0a 28 65 78 70 65 /WARNING/).(expe
0410: 63 74 3a 65 72 72 6f 72 20 20 20 20 69 6e 20 22 ct:error in "
0420: 4c 6f 67 46 69 6c 65 42 6f 64 79 22 20 20 3d 20 LogFileBody" =
0430: 30 20 22 41 6e 79 20 65 72 72 6f 72 22 20 20 28 0 "Any error" (
0440: 6c 69 73 74 20 23 2f 45 52 52 4f 52 2f 20 23 2f list #/ERROR/ #/
0450: 65 72 72 6f 72 2f 29 29 20 3b 3b 20 62 75 74 20 error/)) ;; but
0460: 64 69 73 61 6c 6c 6f 77 20 61 6e 79 20 6f 74 68 disallow any oth
0470: 65 72 20 65 72 72 6f 72 73 0a er errors.