Annotation of gforth/other-tests.fs, revision 1.2
1.1 anton 1: \ various tests, especially for bugs that have been fixed
2:
3: \ combination of marker and locals
4: marker foo1
5: marker foo2
6: foo2
7:
8: : bar { xxx yyy } ;
9:
10: foo1
11:
12: \ comments across several lines
13:
14: ( fjklfjlas;d
15: abort" ( does not work across lines"
1.2 ! anton 16: )
! 17:
! 18: s" ( testing ( without delimited by newline in non-files" evaluate
! 19:
! 20: \ last test!
! 21: \ testing '(' without ')' at end-of-file
! 22: ." expect ``warning: ')' missing''" cr
! 23: (
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>