Commit 0d53b175 authored by Pietro Abate's avatar Pietro Abate
Browse files

[r2003-11-20 11:26:04 by afrisch] Prep. pour CQL

Original author: afrisch
Date: 2003-11-20 11:26:04+00:00
parent dd0a91d4
open Parser.Hook
#load "pa_extend.cmo";;
EXTEND
GLOBAL: expr pat;
expr: [
"top" [
"select"; e = expr;
"from";l = LIST1 [ x= pat ; "in"; e = expr -> (x,e)] SEP "," ;
z=OPT["where" ; w = cond -> w] -> assert false
] ];
cond:
[
["`";"true" -> assert false ] ];
END
\ No newline at end of file
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment