paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-23 03:29:41 +02:00
Code Issues Packages Projects Releases Wiki Activity

pastojs: write sourceMappingURL only if map file enabled, issue 39210

Browse Source
This commit is contained in:
mattias 2022-02-03 15:20:54 +01:00
parent f0f9818824
commit 89e0282856
3 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
packages/pastojs/src/pas2jscompiler.pp
View File

@ -2815,7 +2815,10 @@ begin
if Assigned(PostProcessorSupport) then
PostProcessorSupport.CallPostProcessors(aFile.JSFilename,aFileWriter);
MapFilename:=aFileWriter.DestFilename+'.map';
if SrcMapEnable then
MapFilename:=aFileWriter.DestFilename+'.map'
else
MapFilename:='';
CheckOutputDir(aFileWriter.DestFileName);

6
packages/pastojs/tests/tcprecompile.pas
View File

@ -603,7 +603,7 @@ begin
' rtl.checkVersion('+IntToStr((VersionMajor*100+VersionMinor)*100+VersionRelease)+');',
' };',
'});',
'//# sourceMappingURL=test1.js.map']);
'']);
if not CheckSrcDiff(ExpectedSrc,aFile.Source,s) then
Fail('TTestCLI_Precompile.TestPCU_CheckVersionMain src diff: '+s);
end;
@ -634,7 +634,7 @@ begin
' pas.system.Writeln();',
' };',
'});',
'//# sourceMappingURL=test1.js.map']);
'']);
if not CheckSrcDiff(ExpectedSrc,aFile.Source,s) then
Fail('TTestCLI_Precompile.TestPCU_CheckVersionMain src diff: '+s);
end;
@ -662,7 +662,7 @@ begin
' rtl.checkVersion('+VerStr+');',
' var $mod = this;',
'});',
'//# sourceMappingURL=system.js.map']);
'']);
if not CheckSrcDiff(ExpectedSrc,aFile.Source,s) then
Fail('TTestCLI_Precompile.TestPCU_CheckVersionMain src diff: '+s);
end;

2
packages/pastojs/tests/tcunitsearch.pas
View File

@ -635,7 +635,7 @@ begin
' };',
'});',
'rtl.run();',
'//# sourceMappingURL=test1.js.map',
'',
'']),
aFile.Source);
end;