Commit 86176f77 authored by Pietro Abate's avatar Pietro Abate

[r2004-07-08 17:15:32 by cmiachon] int_any

Original author: cmiachon
Date: 2004-07-08 17:15:32+00:00
parent 932288b1
......@@ -473,6 +473,20 @@ let any = {
absent= false;
}
let int_any = {
hash = 0;
times = BoolPair.empty;
xml = BoolPair.empty;
arrow = BoolPair.empty;
record= BoolRec.empty;
ints = Intervals.any;
atoms = Atoms.empty;
chars = Chars.empty;
abstract = Abstract.empty;
absent= false;
}
let non_constructed =
{ any with
hash = 0;
......
......@@ -67,6 +67,7 @@ val diff : t -> t -> t
val neg : t -> t
val empty : t
val any : t
val int_any : t
val any_node : Node.t
......
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