2
0
Эх сурвалжийг харах

* don't crash if no info is registered for the selected external assembler

git-svn-id: trunk@45806 -
Jonas Maebe 5 жил өмнө
parent
commit
6fe8d7bd14

+ 4 - 1
compiler/options.pas

@@ -4179,7 +4179,10 @@ begin
     begin
     begin
       if not set_target_asm(option.paratargetasm) then
       if not set_target_asm(option.paratargetasm) then
         begin
         begin
-          Message2(option_incompatible_asm,asminfos[option.paratargetasm]^.idtxt,target_info.name);
+          if assigned(asminfos[option.paratargetasm]) then
+            Message2(option_incompatible_asm,asminfos[option.paratargetasm]^.idtxt,target_info.name)
+          else
+            Message2(option_incompatible_asm,'<invalid assembler>',target_info.name);
           set_target_asm(target_info.assemextern);
           set_target_asm(target_info.assemextern);
           Message1(option_asm_forced,target_asm.idtxt);
           Message1(option_asm_forced,target_asm.idtxt);
         end;
         end;