diff options
Diffstat (limited to 't/trivial.pas')
| -rw-r--r-- | t/trivial.pas | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/t/trivial.pas b/t/trivial.pas index 3be4ca5..52a6ebe 100644 --- a/t/trivial.pas +++ b/t/trivial.pas @@ -11,6 +11,18 @@ var gvp:^char; gva:array[0..4] of integer; +(**)function {}comment_test({}):integer{};(**) +{comment} +begin{ +begin(* this is in a comment *) +end; +} +comment_test:=1 +(* +{begin end; also in a comment} +*)(**)(****)(* *)(***) +end; + function arithmetic_test(a:integer;b:char;c:real):integer; var d:integer; @@ -218,15 +230,3 @@ begin pa^.m4[1].m1[2]:=1234; record_test:=a.m3[6]+pa^.m3[a.m1]+a.m4[1].m1[2]; end; - -(**)function {}comment_test({}):integer{};(**) -{comment} -begin{ -begin(* this is in a comment *) -end; -} -comment_test:=1 -(* -{begin end; also in a comment} -*)(**)(****)(* *)(***) -end; |
