File: test.pas

package info (click to toggle)
source-highlight 3.1.7-1
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 10,332 kB
  • ctags: 5,233
  • sloc: sh: 11,270; cpp: 10,206; ansic: 9,515; makefile: 1,865; lex: 1,200; yacc: 1,021; php: 213; perl: 211; awk: 98; erlang: 94; lisp: 90; java: 75; ruby: 69; python: 61; asm: 43; ml: 38; ada: 36; haskell: 27; xml: 23; cs: 11; sql: 8; tcl: 6; sed: 4
file content (17 lines) | stat: -rw-r--r-- 350 bytes parent folder | download | duplicates (10) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
{
 this is just a test for Pascal
 { I'm afraid I don't remember much of Pascal :-)
  so I'll use simple BEGIN END...
  }
 }
Begin
   (* simple hello world! *)
   WRITELN "Hello World";
End

(* Probably it is not even correct :-) *)

(* the IF and VAR inside MYIFVAR must not be highlighted as keyword *)
IF MYIFVAR THEN
   WRITELN "Hello World";
END