translateConstant :: Const -> JS
translateConstant (I i)                    = JSNum (JSInt i)
translateConstant :: Const -> JS
translateConstant (I i)                    = JSNum (JSInt i)
translateConstant (I i)                    = JSNum (JSInt i)