diff options
| author | kr_angelov <kr_angelov@gmail.com> | 2006-12-28 16:45:21 +0000 |
|---|---|---|
| committer | kr_angelov <kr_angelov@gmail.com> | 2006-12-28 16:45:21 +0000 |
| commit | 041c00abf3bfbbc770d52b23f9e27598f25f1f63 (patch) | |
| tree | 88bca3dd82d5d7b53cb236ca66471915d52c3fb1 /src | |
| parent | 48b4e3de1dd02a9956a7a051ea5c44fb24b6130a (diff) | |
sync with GFCC changes
Diffstat (limited to 'src')
| -rw-r--r-- | src/GF/JavaScript/AbsJS.hs | 2 | ||||
| -rw-r--r-- | src/GF/JavaScript/PrintJS.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/GF/JavaScript/AbsJS.hs b/src/GF/JavaScript/AbsJS.hs index d139872bd..5edef512a 100644 --- a/src/GF/JavaScript/AbsJS.hs +++ b/src/GF/JavaScript/AbsJS.hs @@ -36,7 +36,7 @@ data Expr = | EIndex Expr Expr | ECall Expr [Expr] | EVar Ident - | EInt Integer + | EInt Int | EDbl Double | EStr String | ETrue diff --git a/src/GF/JavaScript/PrintJS.hs b/src/GF/JavaScript/PrintJS.hs index 9f85a58e9..f1575e595 100644 --- a/src/GF/JavaScript/PrintJS.hs +++ b/src/GF/JavaScript/PrintJS.hs @@ -68,7 +68,7 @@ prPrec :: Int -> Int -> Doc -> Doc prPrec i j = if j<i then parenth else id -instance Print Integer where +instance Print Int where prt _ x = doc (shows x) |