mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-26 03:08:55 -06:00
bug fix in Shell commands at, wt
This commit is contained in:
@@ -222,9 +222,4 @@ lin
|
||||
stop_V = regDuplV "stop" ;
|
||||
jump_V = regV "jump" ;
|
||||
|
||||
here7to_Adv = mkAdv ["to here"] ;
|
||||
here7from_Adv = mkAdv ["from here"] ;
|
||||
there_Adv = mkAdv "there" ;
|
||||
there7to_Adv = mkAdv "there" ;
|
||||
there7from_Adv = mkAdv ["from there"] ;
|
||||
} ;
|
||||
|
||||
@@ -30,6 +30,8 @@ concrete StructuralEng of Structural = CatEng **
|
||||
from_Prep = ss "from" ;
|
||||
he_Pron = mkNP "he" "him" "his" Sg P3 ;
|
||||
here_Adv = ss "here" ;
|
||||
here7to_Adv = ss ["to here"] ;
|
||||
here7from_Adv = ss ["from here"] ;
|
||||
how_IAdv = ss "how" ;
|
||||
how8many_IDet = mkDeterminer Pl ["how many"] ;
|
||||
if_Subj = ss "if" ;
|
||||
@@ -61,6 +63,9 @@ concrete StructuralEng of Structural = CatEng **
|
||||
somewhere_Adv = ss "somewhere" ;
|
||||
that_Quant = mkDeterminer Sg "that" ;
|
||||
that_NP = regNP "that" Sg ;
|
||||
there_Adv = ss "there" ;
|
||||
there7to_Adv = ss "there" ;
|
||||
there7from_Adv = ss ["from there"] ;
|
||||
therefore_PConj = ss "therefore" ;
|
||||
these_Quant = mkDeterminer Pl "these" ;
|
||||
they_Pron = mkNP "they" "them" "their" Pl P3 ;
|
||||
|
||||
Reference in New Issue
Block a user