Browse Source

Use .appfile and .appline for GNU as.

git-svn-id: file:///var/svn/tigccpp/trunk/tigcc/ide@225 9552661e-59e3-4036-b4f2-dbe53926924f
kevinkofler 19 years ago
parent
commit
eb82084163
1 changed files with 1 additions and 1 deletions
  1. 1 1
      SourceFileUnit.pas

+ 1 - 1
SourceFileUnit.pas

@@ -1523,7 +1523,7 @@ begin
 					ftQuillFile:
 						S := '#line 1 "' + EscapedRealFN + '"' + #13#10 + S;
 					ftGNUAsmFile:
-						S := '.ln 1 "' + EscapedRealFN + '"' + #13#10 + S;
+						S := '.appfile "' + EscapedRealFN + '"; .appline 1' + #13#10 + S;
 				end;
 				Write (PChar(S)^, Length (S));
 				if ContentType = ftCFile then