diff --git a/lib/runtime/code.ml b/lib/runtime/code.ml index 7192e6d..decd06a 100644 --- a/lib/runtime/code.ml +++ b/lib/runtime/code.ml @@ -122,7 +122,7 @@ let pp_ins ~label ppf = function | NOT (a, b) -> Fmt.pf ppf "not %a, %a" pp_reg a pp_reg b | GET (a, b, c) -> Fmt.pf ppf "mov %a, %a[%a]" pp_reg a pp_reg b pp_reg c | SET (a, b, c) -> Fmt.pf ppf "mov %a[%a], %a" pp_reg b pp_reg c pp_reg a - | LOC (a, b, el) -> Fmt.pf ppf "mov %a, &%a.%s" pp_reg a pp_reg b el + | LOC (a, b, el) -> Fmt.pf ppf "loc %a, %a.%s" pp_reg a pp_reg b el | CON (a, vt) -> Fmt.pf ppf "con %a, %a" pp_reg a pp_vtable vt | CAL (a, b, c, ds) -> Fmt.pf ppf "cal %a, %a[%a](" pp_reg a pp_reg b pp_reg c;