Mercurial Mercurial > hg > lexing / annotate
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
progs/tests/totest.txt
author Christian Urban <christian dot urban at kcl dot ac dot uk>
Sat, 09 Apr 2016 09:51:00 +0100
changeset 161 2778715487a9
child 195 c2d36c3cf8ad
permissions -rw-r--r--
added test cases from the haskell repository
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
161
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     1
 
01	a+			xaax	(1,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     2
 
03	(a?)((ab)?)		ab	(0,2)(0,0)(0,2)(0,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     3
 
04	(a?)((ab)?)(b?)		ab	(0,2)(0,1)(1,1)(?,?)(1,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     4
 
05	((a?)((ab)?))(b?)	ab	(0,2)(0,2)(0,0)(0,2)(0,2)(2,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     5
 
06	(a?)(((ab)?)(b?))	ab	(0,2)(0,1)(1,2)(1,1)(?,?)(1,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     6
 
07	(.?)			x	(0,1)(0,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     7
 
08	(.?){1}			x	(0,1)(0,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     8
 
09	(.?)(.?)		x	(0,1)(0,1)(1,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     9
 
10	(.?){2}			x	(0,1)(1,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    10
 
11	(.?)*			x	(0,1)(0,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    11
 
12	(.?.?)			xxx	(0,2)(0,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    12
 
13	(.?.?){1}		xxx	(0,2)(0,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    13
 
14	(.?.?)(.?.?)		xxx	(0,3)(0,2)(2,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    14
 
15	(.?.?){2}		xxx	(0,3)(2,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    15
 
16	(.?.?)(.?.?)(.?.?)	xxx	(0,3)(0,2)(2,3)(3,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    16
 
17	(.?.?){3}		xxx	(0,3)(3,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    17
 
18	(.?.?)*			xxx	(0,3)(2,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    18
 
19	a?((ab)?)(b?)		ab	(0,2)(1,1)(?,?)(1,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    19
 
20	(a?)((ab)?)b?		ab	(0,2)(0,1)(1,1)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    20
 
21	a?((ab)?)b?		ab	(0,2)(1,1)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    21
 
22	(a*){2}			xxxxx	(0,0)(0,0)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    22
 
23	(ab?)(b?a)		aba	(0,3)(0,2)(2,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    23
 
24	(a|ab)(ba|a)		aba	(0,3)(0,2)(2,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    24
 
25	(a|ab|ba)		aba	(0,2)(0,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    25
 
26	(a|ab|ba)(a|ab|ba)	aba	(0,3)(0,2)(2,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    26
 
27	(a|ab|ba)*		aba	(0,3)(2,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    27
 
28	(aba|a*b)		ababa	(0,3)(0,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    28
 
29	(aba|a*b)(aba|a*b)	ababa	(0,5)(0,2)(2,5)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    29
 
1029	(aba|a*b)(aba|a*b)(aba|a*b)	ababa	NOMATCH
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    30
 
30	(aba|a*b)*		ababa	(0,5)(2,5)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    31
 
31	(aba|ab|a)		ababa	(0,3)(0,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    32
 
32	(aba|ab|a)(aba|ab|a)	ababa	(0,5)(0,2)(2,5)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    33
 
1032	(aba|ab|a)(aba|ab|a)(aba|ab|a)	ababa	(0,5)(0,2)(2,4)(4,5)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    34
 
33	(aba|ab|a)*		ababa	(0,5)(2,5)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    35
 
34	(a(b)?)			aba	(0,2)(0,2)(1,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    36
 
35	(a(b)?)(a(b)?)		aba	(0,3)(0,2)(1,2)(2,3)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    37
 
36	(a(b)?)+		aba	(0,3)(2,3)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    38
 
37	(.*)(.*)		xx	(0,2)(0,2)(2,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    39
 
38	.*(.*)			xx	(0,2)(2,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    40
 
39	(a.*z|b.*y)		azbazby	(0,5)(0,5)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    41
 
40	(a.*z|b.*y)(a.*z|b.*y)	azbazby	(0,7)(0,5)(5,7)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    42
 
41	(a.*z|b.*y)*		azbazby	(0,7)(5,7)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    43
 
42	(.|..)(.*)		ab	(0,2)(0,2)(2,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    44
 
43	((..)*(...)*)			xxx		(0,3)(0,3)(?,?)(0,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    45
 
44	((..)*(...)*)((..)*(...)*)	xxx		(0,3)(0,3)(?,?)(0,3)(3,3)(?,?)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    46
 
45	((..)*(...)*)*			xxx		(0,3)(0,3)(?,?)(0,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    47
 
83	(aa(b(b))?)+		aabbaa	(0,6)(4,6)(?,?)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    48
 
84	(a(b)?)+		aba	(0,3)(2,3)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    49
 
85	([ab]+)([bc]+)([cd]*)		abcd		(0,4)(0,2)(2,3)(3,4)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    50
 
90	^(A([^B]*))?(B(.*))?		Aa		(0,2)(0,2)(1,2)(?,?)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    51
 
91	^(A([^B]*))?(B(.*))?		Bb		(0,2)(?,?)(?,?)(0,2)(1,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    52
 
110	(^){0,3}		a	(0,0)(0,0)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    53
 
111	($){0,3}		a	(0,0)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    54
 
112	(^){1,3}		a	(0,0)(0,0)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    55
 
113	($){1,3}		a	(1,1)(1,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    56
 
200	((s^)|(s)|(^)|($)|(^.))*	searchme	(0,1)(0,1)(?,?)(0,1)(?,?)(?,?)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    57
 
201	s(()|^)e	searchme	(0,2)(1,1)(1,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    58
 
202	s(^|())e	searchme	(0,2)(1,1)(1,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    59
 
203	s(^|())e	searchme	(0,2)(1,1)(1,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    60
 
204	s()?e	searchme	(0,2)(1,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    61
 
205	s(^)?e	searchme	(0,2)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    62
 
206	((s)|(e)|(a))*	searchme	(0,3)(2,3)(?,?)(?,?)(2,3)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    63
 
207	((s)|(e)|())*	searchme	(0,2)(1,2)(?,?)(1,2)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    64
 
208	((b*)|c(c*))*	cbb	(0,3)(1,3)(1,3)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    65
 
209	(yyy|(x?)){2,4}	yyyyyy	(0,6)(3,6)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    66
 
210	($)|()	xxx	(0,0)(?,?)(0,0)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    67
 
211	$()|^()	ac\n	(0,0)(?,?)(0,0)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    68
 
212	^()|$()	ac\n	(0,0)(0,0)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    69
 
213	($)?(.)	__	(0,1)(?,?)(0,1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    70
 
214	(.|()|())*	c	(0,1)(0,1)(?,?)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    71
 
215	((a)|(b)){2,}	ab	(0,2)(1,2)(?,?)(1,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    72
 
216	.()|((.)?)	NULL	(0,0)(?,?)(0,0)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    73
 
217	(.|$){2,}	xx	(0,2)(1,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    74
 
218	(.|$){2,2}	xx	(0,2)(1,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    75
 
219	(.){2,}	xx	(0,2)(1,2)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    76
 
220	(a|())(b|())(c|())	abc	(0,3)(0,1)(?,?)(1,2)(?,?)(2,3)(?,?)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    77
 
220	ab()c|ab()c()	abc	(0,3)(2,2)(-1,-1)(-1,-1)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    78
 
250	(b(c)|d(e))*	bcde	(0,4)(2,4)(-1,-1)(3,4)
2778715487a9 added test cases from the haskell repository
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    79
 
251	(a(b)*)*	aba	(0,3)(2,3)(-1,-1)
lexing