Browse Source

[PATCH 182/188] updating file output to use absolute path

From 538eac2f8d9ba8737d1840b85864a6921204a167 Mon Sep 17 00:00:00 2001
From: Dmitry Boyarintsev <[email protected]>
Date: Wed, 8 Apr 2020 15:37:30 -0400

git-svn-id: branches/wasm@46178 -
nickysn 5 years ago
parent
commit
6af6930763
1 changed files with 5 additions and 2 deletions
  1. 5 2
      utils/wasmbin/wasa.pas

+ 5 - 2
utils/wasmbin/wasa.pas

@@ -83,8 +83,11 @@ begin
     inc(i);
     inc(i);
   end;
   end;
 
 
-  if (p.SrcFile<>'') and (p.DstObjFile = '') then
-    p.DstObjFile := ChangeFileExt(p.SrcFile, '.wasm')
+  if (p.SrcFile<>'') then begin
+    p.SrcFile := ExpandFileName(p.SrcFile);
+    if (p.DstObjFile = '') then
+      p.DstObjFile := ChangeFileExt(p.SrcFile, '.wasm')
+  end;
 end;
 end;
 
 
 var
 var