1ZZCOVTST;OSEHRA/JPS -- Test routine for Coverage Parsing;4/28/2014 2 ; (tab) This is series of comments 3 ; (tab) it should all be not executable 4 ; (spaces) one of these sets might be a problem 5 ; (spaces) we will have to see. 6EN ; This entry point shouldn't be found without fixing 7 N D 8 S D=1 ;An executable line 9 D T1^ZZCOVTST 10 I '$$T5 W "RETURNED FROM t5",! 11 Q 12 ; This line not executable 13 D T6^ZZCOVTST 14 ; 15% ; a line to test for a problem where % was dropped 16 N Do,Re,Mi 17 S Do="A#" 18T1 ; This line should always be found 19 N D 20 S D=2 21 W !,D,!,"This is the second entry point",! 22 D T2^ZZCOVTST(D) 23 Q 24 ; 25T2(EQ) ; This is debatable and only called with ENT^ROU notation 26 N D 27 S D=3 28 W !,D,!,EQ,"This is the third entry point",! 29 D T3^ZZCOVTST 30 Q 31 ; 32T3 N D S D=4 W D,!,"Fourth Entry point",! Q 33 ; 34T4 N D S D=5 W "Shouldn't be executed" 35 W "Lots to not do" 36 Q 37T5(EQ) ;this entry point is called with a $$ notation 38 W "THIS IS THE $$ NOTATION!",! 39 Q 0 40T6 ; An entry point to show comments inside of "DO" blocks 41 D 42 . W "This is executable code",! 43 . ;This is a comment inside the do block, not executable 44 . S ZZBLAH="blah" 45 W "Ending T6",! 46 ; 47