projects
/
tatoo.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Update to latest master of remake.
[tatoo.git]
/
src
/
qNameSet.ml
diff --git
a/src/qNameSet.ml
b/src/qNameSet.ml
index
91309e0
..
95228bd
100644
(file)
--- a/
src/qNameSet.ml
+++ b/
src/qNameSet.ml
@@
-24,7
+24,10
@@
let printer fmt e test conv inv is_any =
if test e then print_finite fmt e conv
else
let () = Format.fprintf fmt "%s" Pretty.big_sigma in
if test e then print_finite fmt e conv
else
let () = Format.fprintf fmt "%s" Pretty.big_sigma in
- if not (is_any e) then begin Format.fprintf fmt "-";print_finite fmt (inv e) conv end
+ if not (is_any e) then begin
+ Format.fprintf fmt "-";
+ print_finite fmt (inv e) conv
+ end
let print fmt e = printer fmt e is_finite elements complement is_any
let print fmt e = printer fmt e is_finite elements complement is_any