Megatest

Hex Artifact Content
Login

Artifact 312a36066eb58ea28b9242e078f8f32e9e691885:


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 20 20 4c 69 63 65 6e 73 65 20 47 50 4c  ;;   License GPL
0050: 2e 0a 0a 28 65 78 70 65 63 74 3a 72 65 71 75 69  ...(expect:requi
0060: 72 65 64 20 69 6e 20 22 4c 6f 67 46 69 6c 65 42  red in "LogFileB
0070: 6f 64 79 22 20 3e 20 30 20 22 41 20 66 69 6c 65  ody" > 0 "A file
0080: 20 6e 61 6d 65 20 74 68 61 74 20 73 68 6f 75 6c   name that shoul
0090: 64 20 6e 65 76 65 72 20 65 78 69 73 74 21 22 20  d never exist!" 
00a0: 23 2f 54 68 69 73 20 69 73 20 61 20 61 77 66 75  #/This is a awfu
00b0: 6c 6c 79 20 73 74 75 70 69 64 20 66 69 6c 65 20  lly stupid file 
00c0: 6e 61 6d 65 20 74 68 61 74 20 73 68 6f 75 6c 64  name that should
00d0: 20 6e 65 76 65 72 20 62 65 20 66 6f 75 6e 64 20   never be found 
00e0: 69 6e 20 74 68 65 20 74 65 6d 70 20 64 69 72 2f  in the temp dir/
00f0: 29 0a 0a 3b 3b 20 28 65 78 70 65 63 74 3a 77 61  )..;; (expect:wa
0100: 72 6e 69 6e 67 20 20 69 6e 20 22 4c 6f 67 46 69  rning  in "LogFi
0110: 6c 65 42 6f 64 79 22 20 20 3d 20 30 20 22 41 6e  leBody"  = 0 "An
0120: 79 20 77 61 72 6e 69 6e 67 22 20 23 2f 57 41 52  y warning" #/WAR
0130: 4e 49 4e 47 2f 29 0a 3b 3b 20 28 65 78 70 65 63  NING/).;; (expec
0140: 74 3a 65 72 72 6f 72 20 20 20 20 69 6e 20 22 4c  t:error    in "L
0150: 6f 67 46 69 6c 65 42 6f 64 79 22 20 20 3d 20 30  ogFileBody"  = 0
0160: 20 22 41 6e 79 20 65 72 72 6f 72 22 20 20 28 6c   "Any error"  (l
0170: 69 73 74 20 23 2f 45 52 52 4f 52 2f 20 23 2f 2e  ist #/ERROR/ #/.
0180: 2a 2f 29 29 20 3b 3b 20 66 6f 72 63 65 20 61 6e  */)) ;; force an
0190: 20 65 72 72 6f 72 0a                              error.