]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/components/ng_kernel/nCicUntrusted.ml
Different behaviour of OCaml 4.0.
[helm.git] / matita / components / ng_kernel / nCicUntrusted.ml
index ba5ad9f5ad6480e744b9ea9bb53a0a3840721412..5df06d28d001cdfbc0d74a84e15fbbc2f5f1b91c 100644 (file)
@@ -269,7 +269,7 @@ let rec replace_in_subst i f = function
 ;;
           
 let set_kind newkind attrs = 
-  newkind :: List.filter (fun x -> not (is_kind x)) attrs 
+  (newkind :> NCic.meta_attr) :: List.filter (fun x -> not (is_kind x)) attrs 
 ;;
 
 let max_kind k1 k2 =