changeset 20548 | 8ef25fe585a8 |
parent 20366 | 867696dc64fc |
child 20664 | ffbc5a57191a |
--- a/src/Pure/Isar/locale.ML Fri Sep 15 22:56:08 2006 +0200 +++ b/src/Pure/Isar/locale.ML Fri Sep 15 22:56:13 2006 +0200 @@ -2119,7 +2119,7 @@ TFree ((the o AList.lookup (op =) (new_Tnames ~~ new_Tnames')) a, s)); val rename = if is_local then I - else Term.map_term_types renameT; + else Term.map_types renameT; val tinst = Symtab.make (map (fn ((x, 0), T) => (x, T |> renameT)