src/Pure/Isar/class_declaration.ML
changeset 42494 eef1a23c9077
parent 42402 c7139609b67d
child 45421 2bef6da4a6a6
     1.1 --- a/src/Pure/Isar/class_declaration.ML	Wed Apr 27 20:37:56 2011 +0200
     1.2 +++ b/src/Pure/Isar/class_declaration.ML	Wed Apr 27 20:58:40 2011 +0200
     1.3 @@ -254,7 +254,7 @@
     1.4          thy
     1.5          |> Sign.declare_const_global ((b, ty0), syn)
     1.6          |> snd
     1.7 -        |> pair ((Variable.name b, ty), (c, ty'))
     1.8 +        |> pair ((Variable.check_name b, ty), (c, ty'))
     1.9        end;
    1.10    in
    1.11      thy