msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

German verb form for haben; extended TryGer

Browse Source
This commit is contained in:
aarne
2011-02-27 16:36:24 +00:00
parent 13c66a1cd7
commit e02e27f24b
3 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/src/api/Constructors.gf
View File

@@ -1684,13 +1684,13 @@ oper
"7" => n7 ;
"8" => n8 ;
"9" => n9 ;
_ => Predef.error ("not a valid digit" ++ s)
_ => Predef.error ("str2numeral: not a valid Digit" ++ s)
} ;
s2s10 : Str -> Sub10 = \s -> case s of {
"1" => pot01 ;
#idigit => pot0 (s2d s) ;
_ => Predef.error ("not a valid digit" ++ s)
_ => Predef.error ("str2numeral: not a valid Sub10" ++ s)
} ;
s2s100 : Str -> Sub100 = \s -> case s of {
@@ -1744,7 +1744,7 @@ oper
"7" => D_7 ;
"8" => D_8 ;
"9" => D_9 ;
_ => Predef.error ("not a valid digit" ++ s)
_ => Predef.error ("s2d: not a valid digit" ++ s)
} ;
} ;

2
lib/src/api/TryGer.gf
View File

@@ -1,3 +1,3 @@
--# -path=.:alltenses:prelude
resource TryGer = SyntaxGer, LexiconGer, ParadigmsGer - [mkAdv] ;
resource TryGer = SyntaxGer, ExtraGer, LexiconGer, ParadigmsGer - [mkAdv], MakeStructuralGer ;