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 {