Commit 1aa7065a authored by Pietro Abate's avatar Pietro Abate
Browse files

[r2003-11-27 15:35:58 by cmiachon] Empty log message

Original author: cmiachon
Date: 2003-11-27 15:35:58+00:00
parent e7d00655
......@@ -57,8 +57,10 @@ otherwise we can use <book year=1991--*>[...] *)
let q7x =
let q = order (
select <book year=y>([b]/<title>_)
from b in [doc]/<book>[ _* <publisher>['Addison-Wesley'];_],
y in [doc]/@year
from b in [doc]/<book>[_* <publisher>"Addison-Wesley";_],
y in [b]/@year
where int_of(y) >> 1991
) in <bib>q;;
(* problem with using a function of order, is that the type is infered as [Any*]
*)
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