Commit d255fd3b authored by Pietro Abate's avatar Pietro Abate
Browse files

[r2004-01-08 12:34:02 by cmiachon] fichiers deplaces

Original author: cmiachon
Date: 2004-01-08 12:34:05+00:00
parent 789032d8
(* include "tests/cql/doc.cd";; *)
let q1x =
<bib>
select <book year=y>([b]/<title>_)
......@@ -12,3 +14,5 @@ select <book year=y> t
from <bib>[b::Book*] in [doc],
<book year=y>[t::Title _+ <publisher>"Addison-Wesley";_] in b
where int_of(y)>>1991 ;;
......@@ -48,5 +48,4 @@ in let result ( [] : [] ) : [<title>[_* 'XML' ;_]*] =
in result [] ;;
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