refactored Thai so that it can now be compiled producing BIND tokens instead of spaces, by just changing the definition of ResTha.bIND. This is not to be exploited yet, because it produces consecutive BIND tokens, which are not supported at runtime.

This commit is contained in:
aarne
2015-03-16 14:53:53 +00:00
parent ae97390cf5
commit 845687462f
7 changed files with 28 additions and 24 deletions

View File

@@ -17,7 +17,7 @@ oper mmkV2V : Str -> V2V = \s -> mkV2V (mkV s) [] [] ;
oper mmkV2A : Str -> V2A = \s -> mkV2A (mkV s) [] [] ;
oper mmkV2S : Str -> V2S = \s -> mkV2S (mkV s) [] ;
oper prepV2 : V -> Prep -> V2 = \v,p -> mkV2 v p.s ;
oper advV : V -> Adv -> V = \v,a -> mkV v.s1 (v.s2 ++ a.s) ; ----
oper advV : V -> Adv -> V = \v,a -> mkV v.s1 (thbind v.s2 a.s) ; ----
lin aardvark_N = mkN "ตัวกินมด" ; -- src=panlex