blob: 0fdf8235cf00fa7658de1dbad543ba000da12bd3 (
plain)
1
2
3
4
5
6
7
8
9
|
--# -path=.:present:prelude
concrete FoodEng of Food = FoodI - [Pizza] with
(Syntax = SyntaxEng),
(LexFood = LexFoodEng) **
open SyntaxEng, ParadigmsEng in {
lin Pizza = mkCN (mkA "Italian") (mkN "pie") ;
}
|