doc-src/IsarAdvanced/Codegen/Thy/examples/Codegen.hs
changeset 22188 a63889770d57
parent 22015 12b94d7f7e1f
child 22751 1bfd75c1f232
--- a/doc-src/IsarAdvanced/Codegen/Thy/examples/Codegen.hs	Thu Jan 25 16:57:57 2007 +0100
+++ b/doc-src/IsarAdvanced/Codegen/Thy/examples/Codegen.hs	Fri Jan 26 09:24:35 2007 +0100
@@ -10,7 +10,7 @@
 heada (y : xs) = y;
 heada [] = Codegen.nulla;
 
-null_option :: Maybe b;
+null_option :: Maybe a;
 null_option = Nothing;
 
 instance Codegen.Null (Maybe b) where {