X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Focaml%2Fgrafite_engine%2FgrafiteMisc.ml;h=5b86293db639ca02f767ebe9cc97e2dbf16e71e5;hb=ed670d5c4b3d41955caa31a281087e341b1b7611;hp=227cd382b955cf1a349739ddc8b7d01b1727fcd5;hpb=827e35d6058ebba3a4a4fa6eb3c160f0cd0fd1e8;p=helm.git diff --git a/helm/ocaml/grafite_engine/grafiteMisc.ml b/helm/ocaml/grafite_engine/grafiteMisc.ml index 227cd382b..5b86293db 100644 --- a/helm/ocaml/grafite_engine/grafiteMisc.ml +++ b/helm/ocaml/grafite_engine/grafiteMisc.ml @@ -23,6 +23,8 @@ * http://helm.cs.unibo.it/ *) +(* $Id$ *) + let is_empty buri = List.for_all (function