1
2
3
4
5
6
7
8
9
10
11
|
;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
;;
;; License GPL.
;;(expect:required in "LogFileBody" > 0 "Must be some files in the dir" #/.*/)
;; Force a warn for this test
(expect:warning in "LogFileBody" = 0 "Any warning" #/.*/)
|
>
>
|
<
<
|
1
2
3
4
5
6
7
8
9
10
11
|
;; (c) 2006,2007,2008,2009 Matthew Welland matt@kiatoa.com
;;
;; License GPL.
;; Force a warn for this test
(expect:warning in "LogFileBody" = 0 "Any warning" #/.*/)
(expect:required in "LogFileBody" > 0 "Must be some files in the dir" #/.*/)
(expect:ignore in "LogFileBody" < 99 "Ignore the word error in comments" #/^\/\/.*error/)
(expect:error in "LogFileBody" = 0 "Any error" (list #/ERROR/ #/error/)) ;; but disallow any other errors
|