(Hun) Remove calls to Predef.error
This commit is contained in:
1 parent
0e80e3b76d
commit
db3c559fc8
1 file changed
+2
-2
@@ -448,7 +448,7 @@ oper
|
||||
x + "u" => x + "ú" ;
|
||||
x + "ö" => x + "ő" ;
|
||||
x + "ü" => x + "ű" ;
|
||||
_ => Predef.error "Lengthening not applicable to" ++ str
|
||||
_ => str -- Lengthening not applicable to str
|
||||
} ;
|
||||
|
||||
shorten : Str -> Str = \str -> case str of {
|
||||
@@ -459,7 +459,7 @@ oper
|
||||
x + "ú" => x + "u" ;
|
||||
x + "ő" => x + "ö" ;
|
||||
x + "ű" => x + "ü" ;
|
||||
_ => Predef.error "Shortening not applicable to" ++ str
|
||||
_ => str -- Shortening not applicable to str
|
||||
} ;
|
||||
|
||||
-- Function to get a harmony from a string
|
||||
|
||||
Reference in new issue
Block a user