doc-src/IsarAdvanced/Codegen/Thy/examples/Codegen.hs
changeset 25731 b3e415b0cf5c
parent 25182 64e3f45dc6f4
--- a/doc-src/IsarAdvanced/Codegen/Thy/examples/Codegen.hs	Thu Dec 20 14:33:43 2007 +0100
+++ b/doc-src/IsarAdvanced/Codegen/Thy/examples/Codegen.hs	Thu Dec 20 21:09:38 2007 +0100
@@ -6,11 +6,11 @@
   nulla :: a;
 };
 
-heada :: (Codegen.Null a) => [a] -> a;
+heada :: forall a. (Codegen.Null a) => [a] -> a;
 heada (x : xs) = x;
 heada [] = Codegen.nulla;
 
-null_option :: Maybe a;
+null_option :: forall a. Maybe a;
 null_option = Nothing;
 
 instance Codegen.Null (Maybe a) where {