diff options
author | Sylvain Henry <sylvain@haskus.fr> | 2023-03-09 16:56:38 +0100 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2023-03-10 10:19:34 -0500 |
commit | 5b4628aeeca9b7ae0665378f0ce1b1d967c6a1c9 (patch) | |
tree | 6a3d7bc010de590c97166769ddd5f11bec19b5a4 | |
parent | ec2d93ebf2468e9250676da256936d8940de4723 (diff) | |
download | haskell-5b4628aeeca9b7ae0665378f0ce1b1d967c6a1c9.tar.gz |
JS: remove dead code for old integer-gmp
-rw-r--r-- | rts/js/rts.js | 18 |
1 files changed, 2 insertions, 16 deletions
diff --git a/rts/js/rts.js b/rts/js/rts.js index e3dcf07137..c546c76046 100644 --- a/rts/js/rts.js +++ b/rts/js/rts.js @@ -365,14 +365,7 @@ function h$printReg(r) { } else if(r.f.t === h$ct_blackhole && r.x) { return ("blackhole: -> " + h$printReg({ f: r.x.x1, d: r.d1.x2 }) + ")"); } else { - var iv = ""; - if(r.f.n === "integer-gmp:GHC.Integer.Type.Jp#" || - r.f.n === "integer-gmp:GHC.Integer.Type.Jn#") { - iv = ' [' + r.d1.join(',') + '](' + h$ghcjsbn_showBase(r.d1, 10) + ')' - } else if(r.f.n === "integer-gmp:GHC.Integer.Type.S#") { - iv = ' (S: ' + r.d1 + ')'; - } - return ((r.alloc ? r.alloc + ': ' : '') + r.f.n + " (" + h$closureTypeName(r.f.t) + ", " + r.f.a + ")" + iv); + return ((r.alloc ? r.alloc + ': ' : '') + r.f.n + " (" + h$closureTypeName(r.f.t) + ", " + r.f.a + ")"); } } else if(typeof r === 'object') { var res = h$collectProps(r); @@ -536,14 +529,7 @@ function h$dumpStackTop(stack, start, sp) { if(s.f.t === h$ct_blackhole && s.d1 && s.d1.x1 && s.d1.x1.n) { h$log("stack[" + i + "] = blackhole -> " + s.d1.x1.n); } else { - var iv = ""; - if(s.f.n === "integer-gmp:GHC.Integer.Type.Jp#" || - s.f.n === "integer-gmp:GHC.Integer.Type.Jn#") { - iv = ' [' + s.d1.join(',') + '](' + h$ghcjsbn_showBase(s.d1, 10) + ')' - } else if(s.f.n === "integer-gmp:GHC.Integer.Type.S#") { - iv = ' (S: ' + s.d1 + ')'; - } - h$log("stack[" + i + "] = -> " + (s.alloc ? s.alloc + ': ' : '') + s.f.n + " (" + h$closureTypeName(s.f.t) + ", a: " + s.f.a + ")" + iv); + h$log("stack[" + i + "] = -> " + (s.alloc ? s.alloc + ': ' : '') + s.f.n + " (" + h$closureTypeName(s.f.t) + ", a: " + s.f.a + ")"); } } } else if(h$isInstanceOf(s,h$MVar)) { |