summaryrefslogtreecommitdiff
path: root/testcode/hello1.pas
blob: c53c0d225a3a1a3633df357e11cbd1aa29f65794 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
{ Hello World in Pascal, for testing SLOCCount.
  This is multi-line, testing curly braces. }
(* This is another multi-line comment.
   Here's another line. *)
(* This is { another } test. **)
program Hello;
begin     (* Main *)
   writeln ('Hello, world.');
   writeln ('It''s a test!');
   writeln ('Show that newlines are detected')
end.      (* Main *)