File: pascal

package info (click to toggle)
le 1.14.3-1
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 3,176 kB
  • ctags: 3,324
  • sloc: cpp: 18,354; ansic: 12,912; sh: 3,622; makefile: 83
file content (14 lines) | stat: -rw-r--r-- 437 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
# -*- LE-syntax -*-
# Pascal mode, by Raphael Geissert <atomo64@gmail.com>
c3={[^}]*?}
c3='[^'\n]*?'
ci1,2=([^[:alnum:]_]|^)(\
begin|end|program\
|if|in|else|do|while|then|for|(down)?to|until|repeat|case|with|of\
|and|or|not\
|var|type|real|integer|char|boolean|string|nil|array|const|file|packed|byte\
|procedure|record|set\
|new|function|goto|label|uses\
)([^[:alnum:]_]|$)
ci2,1=^end(\.)
ci2=<|>|;|\(|\)|\[|\]|:|=|[+*/-]|div|mod|\.\.