Parent Directory
| 
Revision Log
| 
Patch
| revision 812 by abate, Tue Jul 10 18:04:55 2007 UTC | revision 853 by abate, Tue Jul 10 18:07:22 2007 UTC | |
|---|---|---|
| # | Line 118 | Line 118 |
| 118 | | SeqCapture of id * regexp | | SeqCapture of id * regexp |
| 119 | ||
| 120 | ||
| 121 | let pat_true = mknoloc (Internal Builtin_defs.true_type) | |
| 122 | let pat_false = mknoloc (Internal Builtin_defs.false_type) | |
| 123 | let cst_true = Const (Types.Atom Builtin_defs.true_atom) | |
| 124 | let cst_false = Const (Types.Atom Builtin_defs.false_atom) | |
| 125 | ||
| 126 | let cst_nil = Const Sequence.nil_cst | |
| 127 | let pat_nil = mknoloc (Internal (Sequence.nil_type)) |
|
||||||||
| CVS Admin">CVS Admin | ViewVC Help |
| Powered by ViewVC 1.1.5 |