diff -r 796d3d42c873 -r 54a442b2d727 src/HOL/Tools/real_arith.ML
--- a/src/HOL/Tools/real_arith.ML	Fri May 08 13:38:21 2009 +0200
+++ b/src/HOL/Tools/real_arith.ML	Sat May 09 09:17:29 2009 +0200
@@ -36,7 +36,7 @@
     lessD = lessD,  (*Can't change lessD: the reals are dense!*)
     neqE = neqE,
     simpset = simpset addsimps simps}) #>
-  arith_inj_const (@{const_name real}, HOLogic.natT --> HOLogic.realT) #>
-  arith_inj_const (@{const_name real}, HOLogic.intT --> HOLogic.realT)
+  Lin_Arith.add_inj_const (@{const_name real}, HOLogic.natT --> HOLogic.realT) #>
+  Lin_Arith.add_inj_const (@{const_name real}, HOLogic.intT --> HOLogic.realT)
 
 end;