mirror of
https://github.com/janet-lang/janet
synced 2025-10-05 02:52:28 +00:00
symbolslots nil when there are no symbols, changed debugger to not have special case
This commit is contained in:
@@ -2774,8 +2774,7 @@
|
||||
|
||||
(loop [[birth death slot sym] :in symbolslots]
|
||||
(when (and (<= birth pc)
|
||||
(or (= death 0)
|
||||
(< pc death)))
|
||||
(< pc death))
|
||||
(put nextenv (symbol sym) @{:value (get-in frame [:slots slot])})))
|
||||
|
||||
(merge-into nextenv debugger-env)
|
||||
|
@@ -883,6 +883,8 @@ static Janet janet_disasm_slotcount(JanetFuncDef *def) {
|
||||
}
|
||||
|
||||
static Janet janet_disasm_symbolslots(JanetFuncDef *def) {
|
||||
// *debug* was probably not true when compiling the function
|
||||
if (def->symbolslots == NULL) { return janet_wrap_nil(); }
|
||||
JanetArray *symbolslots = janet_array(def->symbolslots_length);
|
||||
for (int32_t i = 0; i < def->symbolslots_length; i++) {
|
||||
JanetSymbolSlot ss = def->symbolslots[i];
|
||||
|
Reference in New Issue
Block a user