diff -r 09ee87ef8b43 -r 84f20233d466 src/HOL/Matrix/Compute_Oracle/am_compiler.ML
--- a/src/HOL/Matrix/Compute_Oracle/am_compiler.ML	Fri Feb 10 23:16:24 2012 +0100
+++ b/src/HOL/Matrix/Compute_Oracle/am_compiler.ML	Fri Feb 10 23:23:41 2012 +0100
@@ -202,9 +202,7 @@
         load_rules "AM_Compiler" "AM_compiled_code" eqs
     end 
 
-fun run prog t = (prog t)
-
-fun discard _ = ()
+fun run prog t = prog t
 
 end