src/Pure/type_infer.ML
changeset 2989 8189a4870d19
parent 2980 98ad57d99427
child 3510 24d235feeb2a
     1.1 --- a/src/Pure/type_infer.ML	Fri Apr 18 11:54:54 1997 +0200
     1.2 +++ b/src/Pure/type_infer.ML	Fri Apr 18 11:55:14 1997 +0200
     1.3 @@ -257,7 +257,7 @@
     1.4      (* adjust sorts of parameters *)
     1.5  
     1.6      fun not_in_sort x S' S =
     1.7 -      "Type variable " ^ x ^ "::" ^ Sorts.str_of_sort S' ^ " not in sort " ^
     1.8 +      "Variable " ^ x ^ "::" ^ Sorts.str_of_sort S' ^ " not of sort " ^
     1.9          Sorts.str_of_sort S ^ ".";
    1.10  
    1.11      fun meet _ [] = ()