File: TestChars.ATG

package info (click to toggle)
coco-doc 20050316-1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 876 kB
  • ctags: 1
  • sloc: makefile: 29
file content (25 lines) | stat: -rw-r--r-- 490 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
$01246
/*-------------------------------------------------------------------------
Test of CHARACTERS definition
----------------------------------------------------------------------------*/
COMPILER Test

CHARACTERS
  lower   = "abcdefghijklmnopqrstuvwxyz".
  upper   = 'A' ..'Z'.
  letter  = lower + upper.
  noquote = ANY - '\''.
  idchar  = letter + '0' .. '9'.
  LF      = '\n'.

TOKENS
  ident = letter {idchar}.

IGNORE
  '\r' + LF + '\u0009'

PRODUCTIONS

Test = ident.

END Test.