Skip to content

Commit 3dec8a8

Browse files
committed
fix compilation
1 parent 6cdb9a3 commit 3dec8a8

File tree

4 files changed

+61
-59
lines changed

4 files changed

+61
-59
lines changed

ParseExtendEng.gf

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
concrete ParseExtendEng of ParseExtend =
22
ExtendEng - [iFem_Pron, youPolFem_Pron, weFem_Pron, youPlFem_Pron, theyFem_Pron, GenNP, DetNPMasc, DetNPFem, FocusAP, N2VPSlash, A2VPSlash,
33
CompVP, InOrderToVP, PurposeVP, ComplGenVV, ReflRNP, ReflA2RNP, UncontractedNeg, AdvIsNPAP, ExistCN, NominalizeVPSlashNP,
4-
PiedPipingQuestSlash, PiedPipingRelSlash], NumeralEng - [num], PunctuationX **
4+
PiedPipingQuestSlash, PiedPipingRelSlash, ProDrop], NumeralEng - [num], PunctuationX **
55
open Prelude, ResEng, MorphoEng, GrammarEng, (E = ExtraEng), ExtendEng, Coordination in {
66

77
lin gen_Quant = {
@@ -15,7 +15,7 @@ lin gen_Quant = {
1515
} ;
1616

1717
UttAP p ap = {s = ap.s ! p.a} ;
18-
UttVPS p vps = lin Utt {s = linVPS p.a vps} ;
18+
UttVPS p vps = {s = linVPS p.a vps} ;
1919

2020
PhrUttMark pconj utt voc mark = {s = CAPIT ++ pconj.s ++ utt.s ++ voc.s ++ SOFT_BIND ++ mark.s} ;
2121

@@ -150,4 +150,6 @@ lin RecipVPSlash slash = GrammarEng.ComplSlash slash (variants {mkNP "each other
150150

151151
lin num x = x ;
152152

153+
lin ProDrop pron = pron ;
154+
153155
}

WordNetEng.gf

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -39024,7 +39024,7 @@ lin fop_N = mkN human (mkN "fop" "fops");
3902439024
lin foppish_A = compoundA (mkA "foppish");
3902539025
lin foppishness_N = mkN "foppishness" ;
3902639026
lin for_Subj = mkSubj "for" ;
39027-
lin for_PConj = lin PConj {s = "for"} ;
39027+
lin for_PConj = {s = "for"} ;
3902839028
lin for_Prep = G.for_Prep ;
3902939029
lin for_example_Adv = mkAdv "for example";
3903039030
lin for_instance_Adv = mkAdv "for instance";
@@ -90734,7 +90734,7 @@ lin shot_tower_N = variants {mkN "shot-tower" "shot-towers"; mkN "shot tower" "s
9073490734
lin shotgun_N = mkN "shotgun" "shotguns";
9073590735
lin shotton_LN = mkLN "Shotton" ;
9073690736
lin shotts_LN = mkLN "Shotts" ;
90737-
lin should_VV = lin VV {
90737+
lin should_VV = {
9073890738
s = table {
9073990739
VVF VInf => ["be obliged to"] ; ---
9074090740
VVF VPres => "should" ;

WordNetEus.gf

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -467,7 +467,7 @@ lin abuserFem_N = mkN "abusatzen duena" ; --unchecked
467467
lin abusive_1_A = mkA "zakar" ; --guessed
468468
lin abusive_2_A = mkA "zakar" ; --guessed
469469
lin abut_V = egonV "ondoan" ; --unchecked
470-
lin abut_V2 = mkV2 (egonV "ondoan") ; --unchecked
470+
lin abut_V2 = mkV2 (lin V (egonV "ondoan")) ; --unchecked
471471
lin abutment_1_N = mkN "kokadura" ; --unchecked
472472
lin abutment_2_N = mkN "ostiko" ; --unchecked
473473
lin abutterMasc_N = mkN "hauzotar" ; --guessed

0 commit comments

Comments
 (0)