changeset 9436 | 62bb04ab4b01 |
parent 8785 | 00cff9d083df |
child 9582 | 38e58ed53e7b |
--- a/src/HOL/Integ/Int.ML Tue Jul 25 00:03:39 2000 +0200 +++ b/src/HOL/Integ/Int.ML Tue Jul 25 00:06:46 2000 +0200 @@ -34,7 +34,7 @@ val ss = HOL_ss val eq_reflection = eq_reflection - val thy = IntDef.thy + val sg_ref = Sign.self_ref (Theory.sign_of (the_context ())) val T = HOLogic.intT val zero = Const ("IntDef.int", HOLogic.natT --> T) $ HOLogic.zero val restrict_to_left = restrict_to_left