1
0
forked from GitHub/gf-core

Added Eclipse contents

This commit is contained in:
john.j.camilleri
2011-10-17 16:01:07 +00:00
parent 96547fd26f
commit 8854cb943a
27 changed files with 166 additions and 0 deletions

BIN
eclipse/beta/artifacts.jar Normal file

Binary file not shown.

BIN
eclipse/beta/content.jar Normal file

Binary file not shown.

View File

@@ -0,0 +1,16 @@
-- Abstract Syntax
abstract Foods = {
flags startcat = Phrase ;
cat
Phrase ; Item ; Kind ; Quality ;
fun
Is : Item -> Quality -> Phrase ;
This, That, These, Those : Kind -> Item ;
QKind : Quality -> Kind -> Kind ;
Wine, Cheese, Fish, Pizza : Kind ;
Very : Quality -> Quality ;
Fresh, Warm, Italian, Expensive, Delicious, Boring : Quality ;
}

View File

@@ -0,0 +1,8 @@
-- Functor Instantiation
--# -path=.:/home/john/.cabal/share/gf-3.2.9/lib/present
concrete FoodsEng of Foods = FoodsI - [Pizza] with
(Syntax = SyntaxEng),
(LexFoods = LexFoodsEng) **
open SyntaxEng, ParadigmsEng in {
lin Pizza = mkCN (mkA "Italian") (mkN "pie") ;
}

View File

@@ -0,0 +1,5 @@
-- Functor Instantiation
--# -path=.:/home/john/.cabal/share/gf-3.2.9/lib/present
concrete FoodsGer of Foods = FoodsI with
(Syntax = SyntaxGer),
(LexFoods = LexFoodsGer) ;

View File

@@ -0,0 +1,28 @@
-- Functor
-- (a module that opens one or more interfaces)
incomplete concrete FoodsI of Foods = open Syntax, LexFoods in {
lincat
Phrase = Cl ;
Item = NP ;
Kind = CN ;
Quality = AP ;
lin
Is item quality = mkCl item quality ;
This kind = mkNP this_Det kind ;
That kind = mkNP that_Det kind ;
These kind = mkNP these_Det kind ;
Those kind = mkNP those_Det kind ;
QKind quality kind = mkCN quality kind ;
Very quality = mkAP very_AdA quality ;
Wine = mkCN wine_N ;
Pizza = mkCN pizza_N ;
Cheese = mkCN cheese_N ;
Fish = mkCN fish_N ;
Fresh = mkAP fresh_A ;
Warm = mkAP warm_A ;
Italian = mkAP italian_A ;
Expensive = mkAP expensive_A ;
Delicious = mkAP delicious_A ;
Boring = mkAP boring_A ;
}

View File

@@ -0,0 +1,15 @@
-- Lexicon Interface
-- (a resource which contains only oper TYPES)
interface LexFoods = open Syntax in {
oper
wine_N : N ;
pizza_N : N ;
cheese_N : N ;
fish_N : N ;
fresh_A : A ;
warm_A : A ;
italian_A : A ;
expensive_A : A ;
delicious_A : A ;
boring_A : A ;
}

View File

@@ -0,0 +1,16 @@
-- Lexicon Instance
instance LexFoodsEng of LexFoods = open SyntaxEng, ParadigmsEng in {
flags
coding=utf8 ;
oper
wine_N = mkN "wine" ;
pizza_N = mkN "pizza" ;
cheese_N = mkN "cheese" ;
fish_N = mkN "fish" ;
fresh_A = mkA "fresh" ;
warm_A = mkA "warm" ;
italian_A = mkA "Italian" ;
expensive_A = mkA "expensive" ;
delicious_A = mkA "delicious" ;
boring_A = mkA "boring" ;
}

View File

@@ -0,0 +1,18 @@
-- Lexicon Instance
instance LexFoodsGer of LexFoods = open SyntaxGer, ParadigmsGer in {
flags
coding=utf8 ;
oper
wine_N = mkN "Wein" ;
pizza_N = mkN "Pizza" "Pizzen" feminine ;
cheese_N = mkN "Käse" "Käsen" masculine ;
fish_N = mkN "Fisch" ;
fresh_A = mkA "frisch" ;
warm_A = mkA "warm" "wärmer" "wärmste" ;
italian_A = mkA "italienisch" ;
expensive_A = mkA "teuer" ;
delicious_A = mkA "köstlich" ;
boring_A = mkA "langweilig" ;
testy_A = mkA "testy" ;
}

View File

@@ -0,0 +1,5 @@
abstract AbsCat = {
cat Greeting ; Recipient ;
};

View File

@@ -0,0 +1,12 @@
abstract HelloAbs = AbsCat [Greeting, Recipient] ** {
flags startcat = Greeting ;
cat Farewell ;
fun
Hello : Recipient -> Greeting ;
Goodbye : Recipient -> Farewell ;
World, Parent, Friends : Recipient ;
}

View File

@@ -0,0 +1,21 @@
concrete HelloEng of HelloAbs = ResEng ** {
lincat
Greeting, Farewell = {s : Str} ;
Recipient = {s : Gender => Str} ;
lin
Hello recip = {s = "hello" ++ recip.s ! Masc} ;
Goodbye recip = {s = "goodbye" ++ recip.s ! Fem} ;
World = {s = \\_ => "world"} ;
Parent = { s = table {
Masc => "dad" ; Fem => "mum"
} } ;
Friends = superate "friends" ;
oper
superate : Str -> Recipient = \s ->
lin Recipient { s = \\_ => "super" ++ s } ;
}

View File

@@ -0,0 +1,8 @@
--# -path=.:../abstract:../common:../../prelude
resource ResEng = {
param
OtherParam = A | B ;
Gender = Masc | Fem ;
} ;

Binary file not shown.

After

Width:  |  Height:  |  Size: 22 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 23 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 36 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 143 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 135 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 78 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 42 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 28 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 26 KiB

14
eclipse/index.html Normal file
View File

@@ -0,0 +1,14 @@
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE>GF Eclipse Plugin</TITLE>
</HEAD>
<BODY>
<CENTER>
<H1>GF Eclipse Plugin</H1>
<P>
This information has now moved to the <A href="http://www.molto-project.eu/node/1395" title="GF Eclipse Plugin at the MOLTO Project website Wiki">MOLTO Project Wiki</A>.
</P>
</CENTER>
</BODY>
</HTML>