small upgrades

diff --git a/src/ui/components.lua b/src/ui/components.lua
index 7215ef397e2fa7395823cb69be38f69150e21d0f..4c48187478916fda686a5625e908390bf5246541 100644 (file)
--- a/src/ui/components.lua
+++ b/src/ui/components.lua
@@ -208,6 +208,16 @@ function function_block:update(dt)
                if self.scroll < 0 then self.scroll = 0 end
                self.redraw = true
        end
+
+       if love.keyboard.isDown "pagedown" then
+               self.scroll = self.scroll + self.rect.h * dt
+               self.redraw = true
+       end
+       if love.keyboard.isDown "pageup" then
+               self.scroll = self.scroll - self.rect.h * dt
+               if self.scroll < 0 then self.scroll = 0 end
+               self.redraw = true
+       end
 end
 
 function function_block:predraw()

diff --git a/src/wasm/parse.lua b/src/wasm/parse.lua
index 7322973da2012545a616b3793097eab06c388ee2..18fb021e22f550d142c39cc17b7553dddeda7c83 100644 (file)
--- a/src/wasm/parse.lua
+++ b/src/wasm/parse.lua
@@ -381,6 +381,12 @@ function parse_instr(r)
                [0xBD] = function() return { "i64.reinterpret_f64" } end;
                [0xBE] = function() return { "f32.reinterpret_i32" } end;
                [0xBF] = function() return { "f64.reinterpret_i64" } end;
+
+        [0xC0] = function() return { "i32.extend8_s" } end;
+        [0xC1] = function() return { "i32.extend16_s" } end;
+        [0xC2] = function() return { "i64.extend8_s" } end;
+        [0xC3] = function() return { "i64.extend16_s" } end;
+        [0xC4] = function() return { "i64.extend32_s" } end;
        }
 end
 
@@ -684,6 +690,14 @@ function parse_module(r)
                end
        end
 
+    if exports then
+               for k, v in ipairs(exports.contents) do
+                       if v.desc[1] == "func" then
+                               funcs[v.desc.x].name = build_str(v.name)
+            end
+        end
+    end
+
        return {
                "module";
                types = functypes;

diff --git a/src/wasm/text.lua b/src/wasm/text.lua
index 9b89faa555d78124dc4503ccda6413a70045f069..44ce6799bd1a524ddbccdf328e7829fd2a047254 100644 (file)
--- a/src/wasm/text.lua
+++ b/src/wasm/text.lua
@@ -84,7 +84,7 @@ function instr_to_text(ctx, instr)
                if #instr.else_instrs > 0 then
                        tb:text("else ", ctx.colors.jumppoint)
                        tb:newline(1)
-                       for i, ins in ipairs(instr.instrs) do
+                       for i, ins in ipairs(instr.else_instrs) do
                                local otb = instr_to_text(ctx, ins)
                                tb:append(otb)
                        end