From e364881bc081090da69bdf36e1ff9b78f539f200 Mon Sep 17 00:00:00 2001
From: Dave Laing <dave.laing.80@gmail.com>
Date: Wed, 25 Jul 2018 09:15:17 +1000
Subject: [PATCH] Fixes a bug in the toHsStringMU8.

---
 src/string.js | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/string.js b/src/string.js
index d6d3f50..00f9c53 100644
--- a/src/string.js
+++ b/src/string.js
@@ -600,7 +600,7 @@ function h$toHsStringMU8(arr, cc) {
 #else
 function h$toHsStringMU8(arr) {
 #endif
-    var accept = false, b, n = 0, cp = 0, r = HS_NIL;
+    var i = arr.length - 1, accept = false, b, n = 0, cp = 0, r = HS_NIL;
     while(i >= 0) {
         b = arr[i];
         if(!(b & 128)) {