File: TestCasing.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 (23 lines) | stat: -rw-r--r-- 519 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
 
$01246
/*-------------------------------------------------------------------------
Test of case insensitive scanners.
----------------------------------------------------------------------------*/
COMPILER Test
IGNORECASE

CHARACTERS
	letter = 'A'..'Z' + 'a'..'z'.
	digit  = '0'..'9'.
	suffix = 'F'.

TOKENS
  ident = letter {letter}.
  float1 = digit {digit} suffix.
  float2 = digit {digit} 'E' digit {digit}.
  A = "AAA".

PRODUCTIONS

Test = A "AAA" "AAa" "AaA" "Aaa" "aAA" "aAa" "aaA" "aaa" "BBb" "bbB".

END Test.