# HG changeset patch
# User haftmann
# Date 1147162307 -7200
# Node ID 02f5fbdd5c54e0d9f23375c20d7ea21b0280bc50
# Parent  9801b391c8b335cf9c75183d2e566c8d58aea728
removed 1::int

diff -r 9801b391c8b3 -r 02f5fbdd5c54 src/HOL/ex/Codegenerator.thy
--- a/src/HOL/ex/Codegenerator.thy	Tue May 09 10:11:30 2006 +0200
+++ b/src/HOL/ex/Codegenerator.thy	Tue May 09 10:11:47 2006 +0200
@@ -55,7 +55,7 @@
   "fac j = (if j <= 0 then 1 else j * (fac (j - 1)))"
 
 code_generate
-  "0::int" "1::int" k
+  "0::int" k
   "op + :: int \<Rightarrow> int \<Rightarrow> int"
   "op - :: int \<Rightarrow> int \<Rightarrow> int"
   "op * :: int \<Rightarrow> int \<Rightarrow> int"