diff options
| author | aarne <aarne@cs.chalmers.se> | 2007-06-19 18:12:35 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2007-06-19 18:12:35 +0000 |
| commit | e3f12103697e5eb9caada06134ba9aba01333928 (patch) | |
| tree | 17a7f0cf5efbe215a23d5837d11a6981954c39da /doc/tutorial/music/MusicEng.gf | |
| parent | f30fa0b4d15ec256f55e2c453fc3d7c42de9b3bf (diff) | |
extended functor syntax
Diffstat (limited to 'doc/tutorial/music/MusicEng.gf')
| -rw-r--r-- | doc/tutorial/music/MusicEng.gf | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/doc/tutorial/music/MusicEng.gf b/doc/tutorial/music/MusicEng.gf index c85915254..60f7b31d4 100644 --- a/doc/tutorial/music/MusicEng.gf +++ b/doc/tutorial/music/MusicEng.gf @@ -1,7 +1,11 @@ --# -path=.:present:api:prelude - concrete MusicEng of Music = MusicEng0 - [PropKind] ** - open SyntaxEng in { + concrete MusicEng of Music = + MusicI - [PropKind] + with + (Syntax = SyntaxEng), + (MusicLex = MusicLexEng) ** + open SyntaxEng in { lin PropKind k p = mkCN k (mkRS (mkRCl which_RP (mkVP p))) ; } |