Mercurial > urweb
comparison src/demo.sml @ 2211:ef766ef6e242
Merge.
author | Ziv Scully <ziv@mit.edu> |
---|---|
date | Sat, 13 Sep 2014 19:16:07 -0400 |
parents | e4051315263e |
children |
comparison
equal
deleted
inserted
replaced
2210:69c0f36255cb | 2211:ef766ef6e242 |
---|---|
408 TextIO.output (outf, prefix); | 408 TextIO.output (outf, prefix); |
409 TextIO.output (outf, "\n"); | 409 TextIO.output (outf, "\n"); |
410 app (fn rule => | 410 app (fn rule => |
411 (TextIO.output (outf, "rewrite "); | 411 (TextIO.output (outf, "rewrite "); |
412 TextIO.output (outf, case #pkind rule of | 412 TextIO.output (outf, case #pkind rule of |
413 Settings.Any => "any" | 413 Settings.Any => "all" |
414 | Settings.Url => "url" | 414 | Settings.Url => "url" |
415 | Settings.Table => "table" | 415 | Settings.Table => "table" |
416 | Settings.Sequence => "sequence" | 416 | Settings.Sequence => "sequence" |
417 | Settings.View => "view" | 417 | Settings.View => "view" |
418 | Settings.Relation => "relation" | 418 | Settings.Relation => "relation" |