mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 09:40:21 +00:00
16 lines
403 B
Plaintext
16 lines
403 B
Plaintext
-- (c) 2009 Aarne Ranta under LGPL
|
|
|
|
abstract Foods = {
|
|
flags startcat = Comment ;
|
|
cat
|
|
Comment ; Item ; Kind ; Quality ;
|
|
fun
|
|
Pred : Item -> Quality -> Comment ;
|
|
This, That, These, Those : Kind -> Item ;
|
|
Mod : Quality -> Kind -> Kind ;
|
|
Wine, Cheese, Fish, Pizza : Kind ;
|
|
Very : Quality -> Quality ;
|
|
Fresh, Warm, Italian,
|
|
Expensive, Delicious, Boring : Quality ;
|
|
}
|