diff --git a/compiler/ogwasm.pas b/compiler/ogwasm.pas
index f14f80a23e..f6b7fbf5e1 100644
--- a/compiler/ogwasm.pas
+++ b/compiler/ogwasm.pas
@@ -2789,6 +2789,8 @@ implementation
         ModuleVersion: array [0..3] of Byte;
         i: Integer;
       begin
+        FReader:=AReader;
+        InputFileName:=AReader.FileName;
         objdata:=CObjData.Create(InputFileName);
         result:=false;
         if not AReader.read(ModuleMagic,4) then