diff --git a/compiler/expunix.pas b/compiler/expunix.pas index 9561d37191..897e567e9e 100644 --- a/compiler/expunix.pas +++ b/compiler/expunix.pas @@ -59,6 +59,7 @@ uses aasmdata,aasmtai,aasmcpu, fmodule, cgbase,cgutils,cpubase,cgobj, + cgcpu, ncgutil, verbose; @@ -135,6 +136,7 @@ var r : treference; {$endif x86} begin + create_codegen; new_section(current_asmdata.asmlists[al_procedures],sec_code,'',0); hp2:=texported_item(current_module._exports.first); while assigned(hp2) do @@ -180,6 +182,7 @@ begin end; hp2:=texported_item(hp2.next); end; + destroy_codegen; end;