mirrors
/
Tasmota
mirror of https://github.com/arendst/Tasmota.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Berry prevent crash when setting superclass of solidified class

This commit is contained in:
Stephan Hadinger 2021-12-01 21:54:00 +01:00
parent aab4dcdb6a
commit a147e00f6d
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lib/libesp32/Berry/src/be_vm.c
View File

@ -984,7 +984,12 @@ newframe: /* a new call frame */
bvalue *a = RA(), *b = RKB(); bvalue *a = RA(), *b = RKB();
if (var_isclass(a) && var_isclass(b)) { if (var_isclass(a) && var_isclass(b)) {
bclass *obj = var_toobj(a); bclass *obj = var_toobj(a);
be_class_setsuper(obj, var_toobj(b)); if (!gc_isconst(obj)) {
be_class_setsuper(obj, var_toobj(b));
} else {
vm_error(vm, "internal_error",
"cannot change superclass of a read-only class");
}
} else { } else {
vm_error(vm, "type_error", vm_error(vm, "type_error",
"value '%s' does not support set super", "value '%s' does not support set super",