Nikolay Nikolov преди 4 години
родител
ревизия
ef738f01cf
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  1. 1 0
      compiler/wasm32/nwasmflw.pas

+ 1 - 0
compiler/wasm32/nwasmflw.pas

@@ -374,6 +374,7 @@ implementation
         errorexit;
       begin
         location_reset(location,LOC_VOID,OS_NO);
+        doobjectdestroyandreraisestate:=Default(tcgexceptionstatehandler.texceptionstate);
 
         { Exception temps? We don't need no stinking exception temps! :) }
         fillchar(excepttemps,sizeof(excepttemps),0);