]> matita.cs.unibo.it Git - helm.git/commitdiff
Different behaviour of OCaml 4.0.
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Tue, 4 Mar 2014 11:56:12 +0000 (11:56 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Tue, 4 Mar 2014 11:56:12 +0000 (11:56 +0000)
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 =