Fix issue where "x--1.0" when we really want "x- -1.0"
Fix issue where "x--1.0" when we really want "x- -1.0"

ghcjs/ghcjs,forked-upstream-packages-for-ghcjs/ghcjs,k-bx/ghcjs,ghcjs/ghcjs,flowbox-public/ghcjs,flowbox-public/ghcjs,flowbox-public/ghcjs,ryantrinkle/ghcjs,mgsloan/ghcjs,psfblair/ghcjs,manyoo/ghcjs,philderbeast/ghcjs,nrolland/ghcjs,mgsloan/ghcjs,danse/ghcjs,tavisrudd/ghcjs,seereason/ghcjs,yihuang/ghcjs,nrolland/ghcjs,k-bx/ghcjs,k0001/ghcjs,beni55/ghcjs,nrolland/ghcjs,k0001/ghcjs,tavisrudd/ghcjs,beni55/ghcjs,k0001/ghcjs,ghcjs/ghcjs,manyoo/ghcjs,seereason/ghcjs,rowhit/ghcjs,k0001/ghcjs,forked-upstream-packages-for-ghcjs/ghcjs,flowbox-public/ghcjs,forked-upstream-packages-for-ghcjs/ghcjs,yihuang/ghcjs,k0001/ghcjs,psfblair/ghcjs,danse/ghcjs,mgsloan/ghcjs,danse/ghcjs,fizruk/ghcjs,tavisrudd/ghcjs,k-bx/ghcjs,fizruk/ghcjs,mgsloan/ghcjs,nrolland/ghcjs,philderbeast/ghcjs,rowhit/ghcjs,forked-upstream-packages-for-ghcjs/ghcjs,forked-upstream-packages-for-ghcjs/ghcjs,flowbox-public/ghcjs,danse/ghcjs,philderbeast/ghcjs,seereason/ghcjs,k-bx/ghcjs,tavisrudd/ghcjs,nrolland/ghcjs,philderbeast/ghcjs,psfblair/ghcjs,seereason/ghcjs,philderbeast/ghcjs,psfblair/ghcjs,psfblair/ghcjs,yihuang/ghcjs,flowbox-public/ghcjs,rowhit/ghcjs,fizruk/ghcjs,ghcjs/ghcjs,seereason/ghcjs,fizruk/ghcjs,tavisrudd/ghcjs,mgsloan/ghcjs,seereason/ghcjs,manyoo/ghcjs,beni55/ghcjs,ghcjs/ghcjs,k0001/ghcjs,manyoo/ghcjs,philderbeast/ghcjs,manyoo/ghcjs,ghcjs/ghcjs,yihuang/ghcjs,beni55/ghcjs,rowhit/ghcjs,ryantrinkle/ghcjs,nrolland/ghcjs,forked-upstream-packages-for-ghcjs/ghcjs,ryantrinkle/ghcjs,mgsloan/ghcjs,beni55/ghcjs,fizruk/ghcjs,rowhit/ghcjs,ryantrinkle/ghcjs,k-bx/ghcjs,psfblair/ghcjs,yihuang/ghcjs,beni55/ghcjs,manyoo/ghcjs,danse/ghcjs,danse/ghcjs,tavisrudd/ghcjs,rowhit/ghcjs,k-bx/ghcjs,ghcjs/ghcjs,ryantrinkle/ghcjs,yihuang/ghcjs,ryantrinkle/ghcjs,fizruk/ghcjs