diff --git a/src/vm.c b/src/vm.c index c7f1a473..5fa1c7fe 100644 --- a/src/vm.c +++ b/src/vm.c @@ -1219,7 +1219,7 @@ native_print: usz srcL = a(src)->ia; SGetU(src) usz srcS = cs; while (srcS>0 && o2cu(GetU(src,srcS-1))!='\n') srcS--; - usz srcE = srcS; while (srcEsrcE) ce = srcE; cs-= srcS; ce-= srcS; fputc('\n', stderr);