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

Constructors.str2numeral for making numerals from strings

Browse Source
This commit is contained in:
aarne
2009-12-07 10:29:53 +00:00
parent 8798ff76f9
commit 7f47802cd2
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/GF/Compile/Concrete/AppPredefined.hs
View File

@@ -100,8 +100,8 @@ appPredefined t = case t of
(y,_) <- appPredefined y0 (y,_) <- appPredefined y0
(z,_) <- appPredefined z0 (z,_) <- appPredefined z0
case (z, y, x) of case (z, y, x) of
(ty,op,t) | f == cMapStr -> retf $ mapStr ty op t (ty,op,t) | f == cMapStr -> retf $ mapStr ty op t
_ -> retb t ---- prtBad "cannot compute predefined" t _ -> retb t ---- prtBad "cannot compute predefined" t
_ -> retb t ---- prtBad "cannot compute predefined" t _ -> retb t ---- prtBad "cannot compute predefined" t
_ -> retb t _ -> retb t