Berry int() converts comptr

2022-01-14 17:47:24 +01:00 · 2022-01-14 17:47:24 +01:00 · 99037b1366
parent 5eb25ef1c4
commit 99037b1366
1 changed files with 3 additions and 0 deletions
--- a/lib/libesp32/berry/src/be_baselib.c
+++ b/lib/libesp32/berry/src/be_baselib.c
@ -233,6 +233,9 @@ static int l_int(bvm *vm)
            be_pushvalue(vm, 1);
        } else if (be_isbool(vm, 1)) {
            be_pushint(vm, be_tobool(vm, 1) ? 1 : 0);
+        } else if (be_iscomptr(vm, 1)) {
+            intptr_t p = (intptr_t) be_tocomptr(vm, 1);
+            be_pushint(vm, (int) p);
        } else {
            be_return_nil(vm);
        }