| author | wenzelm |
| Fri, 18 Apr 1997 11:55:14 +0200 | |
| changeset 2989 | 8189a4870d19 |
| parent 2988 | d38f330e58b3 |
| child 2990 | 271062b8c461 |
--- a/src/Pure/type_infer.ML Fri Apr 18 11:54:54 1997 +0200 +++ b/src/Pure/type_infer.ML Fri Apr 18 11:55:14 1997 +0200 @@ -257,7 +257,7 @@ (* adjust sorts of parameters *) fun not_in_sort x S' S = - "Type variable " ^ x ^ "::" ^ Sorts.str_of_sort S' ^ " not in sort " ^ + "Variable " ^ x ^ "::" ^ Sorts.str_of_sort S' ^ " not of sort " ^ Sorts.str_of_sort S ^ "."; fun meet _ [] = ()