changeset 36953 | 2af1ad9aa1a3 |
parent 36950 | 75b8f26f2f07 |
child 37216 | 3165bc303f66 |
--- a/src/Pure/System/session.ML Sat May 15 23:32:15 2010 +0200 +++ b/src/Pure/System/session.ML Sat May 15 23:40:00 2010 +0200 @@ -48,7 +48,7 @@ (if Distribution.changelog <> "" then "\nSee also " ^ Distribution.changelog else ""); val _ = - OuterSyntax.improper_command "welcome" "print welcome message" Keyword.diag + Outer_Syntax.improper_command "welcome" "print welcome message" Keyword.diag (Scan.succeed (Toplevel.no_timing o Toplevel.imperative (writeln o welcome)));