Artifact 1c532ab9c977ddede0427009bace1cc4bf49c303:
- File tests/fullrun/runfirst/wasting_time.logpro — part of check-in [e06ef7ae11] at 2012-04-21 23:36:51 on branch extend-test-get-path — Moved the full run test suite to fullrun (user: matt, size: 284) [annotate] [blame] [check-ins using]
- File tests/fullrun/singletest/wasting_time.logpro — part of check-in [e06ef7ae11] at 2012-04-21 23:36:51 on branch extend-test-get-path — Moved the full run test suite to fullrun (user: matt, size: 284) [annotate] [blame] [check-ins using]
- File tests/fullrun/singletest2/wasting_time.logpro — part of check-in [e06ef7ae11] at 2012-04-21 23:36:51 on branch extend-test-get-path — Moved the full run test suite to fullrun (user: matt, size: 284) [annotate] [blame] [check-ins using]
- File tests/fullrun/tests/runfirst/wasting_time.logpro — part of check-in [423f168820] at 2012-04-22 00:03:24 on branch extend-test-get-path — Arduously moved tests to the tests dir (user: matt, size: 284) [annotate] [blame] [check-ins using]
- File tests/fullrun/tests/singletest/wasting_time.logpro — part of check-in [423f168820] at 2012-04-22 00:03:24 on branch extend-test-get-path — Arduously moved tests to the tests dir (user: matt, size: 284) [annotate] [blame] [check-ins using]
- File tests/fullrun/tests/singletest2/wasting_time.logpro — part of check-in [423f168820] at 2012-04-22 00:03:24 on branch extend-test-get-path — Arduously moved tests to the tests dir (user: matt, size: 284) [annotate] [blame] [check-ins using]
- File tests/tests/runfirst/wasting_time.logpro — part of check-in [8d68c68080] at 2011-06-07 00:25:55 on branch trunk — Added table based iteration (user: mrwellan, size: 284) [annotate] [blame] [check-ins using]
- File tests/tests/singletest/wasting_time.logpro — part of check-in [5d48bcf740] at 2011-06-18 22:20:44 on branch experimental — Adding a singletest (i.e. no items) (user: mrwellan, size: 284) [annotate] [blame] [check-ins using]
- File tests/tests/singletest2/wasting_time.logpro — part of check-in [a6f2ac3f35] at 2011-06-19 12:03:53 on branch experimental — Added some additional tests to the example run (user: mrwellan, size: 284) [annotate] [blame] [check-ins using]
0000: 3b 3b 20 70 75 74 20 73 74 75 66 66 20 68 65 72 ;; put stuff her 0010: 65 0a 0a 3b 3b 20 4e 4f 54 45 3a 20 54 68 69 73 e..;; NOTE: This 0020: 20 69 73 20 6e 6f 74 20 6c 65 67 69 74 20 6c 6f is not legit lo 0030: 67 70 72 6f 20 63 6f 64 65 21 21 21 20 0a 0a 3b gpro code!!! ..; 0040: 3b 20 54 65 73 74 20 66 6f 72 20 30 3d 50 41 53 ; Test for 0=PAS 0050: 53 2c 20 31 3d 57 41 52 4e 2c 20 3e 32 20 3d 20 S, 1=WARN, >2 = 0060: 46 41 49 4c 0a 0a 3b 3b 20 28 64 65 66 69 6e 65 FAIL..;; (define 0070: 20 73 65 61 73 6f 6e 20 28 67 65 74 2d 65 6e 76 season (get-env 0080: 69 72 6f 6e 6d 65 6e 74 2d 76 61 72 69 61 62 6c ironment-variabl 0090: 65 20 22 53 45 41 53 4f 4e 22 29 29 0a 3b 3b 20 e "SEASON")).;; 00a0: 0a 3b 3b 20 28 65 78 69 74 20 0a 3b 3b 20 20 28 .;; (exit .;; ( 00b0: 63 61 73 65 20 28 73 74 72 69 6e 67 2d 3e 73 79 case (string->sy 00c0: 6d 62 6f 6c 20 73 65 61 73 6f 6e 29 0a 3b 3b 20 mbol season).;; 00d0: 20 20 20 28 28 73 75 6d 6d 65 72 29 20 30 29 0a ((summer) 0). 00e0: 3b 3b 20 20 20 20 28 28 77 69 6e 74 65 72 29 20 ;; ((winter) 00f0: 31 29 0a 3b 3b 20 20 20 20 28 28 66 61 6c 6c 29 1).;; ((fall) 0100: 20 20 20 32 29 0a 3b 3b 20 20 20 20 28 65 6c 73 2).;; (els 0110: 65 20 20 20 20 20 30 29 29 29 0a 0a e 0)))..