| changeset 6726 | ac968ce542a8 |
| parent 6558 | 120ff48e8618 |
| child 6860 | 8dc6a1e6fa13 |
--- a/src/Pure/Isar/outer_parse.ML Tue May 25 20:21:05 1999 +0200 +++ b/src/Pure/Isar/outer_parse.ML Tue May 25 20:21:30 1999 +0200 @@ -156,7 +156,7 @@ (* formal comments *) val comment = text >> Comment.plain; -val marg_comment = Scan.optional ($$$ "--" |-- comment) Comment.empty; +val marg_comment = Scan.optional ($$$ "--" |-- comment) Comment.none; val interest = Scan.optional ($$$ "%" >> K Comment.no_interest) Comment.default_interest;