- removed unused constructor of tai_impexp, as well as unused member variable extmodule

compiler/aggas.pas

@@ -825,9 +825,8 @@ implementation
           symstypestr: string;
         begin
           Str(hp.symstype,symstypestr);
-          writer.AsmWriteLn(asminfo^.comment+'ait_importexport(extname='''+hp.extname+''', intname='''+hp.intname+''', extmodule='''+hp.extmodule+''', symstype='+symstypestr+')');
-          if hp.extmodule='' then
-            writer.AsmWriteLn(#9'.export_name '+hp.intname+', '+hp.extname);
+          writer.AsmWriteLn(asminfo^.comment+'ait_importexport(extname='''+hp.extname+''', intname='''+hp.intname+''', symstype='+symstypestr+')');
+          writer.AsmWriteLn(#9'.export_name '+hp.intname+', '+hp.extname);
         end;
 
 

compiler/wasm32/aasmcpu.pas

@@ -90,10 +90,8 @@ uses
       tai_impexp = class(tai)
         extname : ansistring; // external name
         intname : ansistring; // internal name
-        extmodule : ansistring; // external unit name
         symstype: TImpExpType;
-        constructor create(const aextname, aintname: ansistring; asymtype: timpexptype); overload;
-        constructor create(const aextmodule, aextname, aintname: ansistring; asymtype: timpexptype); overload;
+        constructor create(const aextname, aintname: ansistring; asymtype: timpexptype);
       end;
 
       // local variable declaration
@@ -212,15 +210,9 @@ uses
 
       constructor tai_impexp.create(const aextname, aintname: ansistring;
           asymtype: timpexptype);
-        begin
-          create('', aextname, aintname, asymtype);;
-        end;
-
-      constructor tai_impexp.create(const aextmodule, aextname, aintname: ansistring; asymtype: timpexptype);
         begin
           inherited create;
           typ := ait_importexport;
-          extmodule := aextmodule;
           extname := aextname;
           intname := aintname;
           symstype:= asymtype;