* removed some Hints

  * small speed optimization for AsmLn

compiler/assemble.pas

@@ -130,7 +130,7 @@ end;
 Procedure TAsmList.AsmWriteLn(const s:string);
 begin
   AsmWrite(s);
-  AsmWrite(target_info.newline);
+  AsmLn;
 end;
 
 
@@ -157,7 +157,15 @@ end;
 
 Procedure TAsmList.AsmLn;
 begin
-  AsmWrite(target_info.newline);
+  if OutCnt>=AsmOutSize-2 then
+   AsmFlush;
+  OutBuf[OutCnt]:=target_info.newline[1];
+  inc(OutCnt); 
+  if length(target_info.newline)>1 then
+   begin
+     OutBuf[OutCnt]:=target_info.newline[2];
+     inc(OutCnt); 
+   end;
 end;
 
 
@@ -410,7 +418,11 @@ end;
 end.
 {
   $Log$
-  Revision 1.2  1998-04-08 11:34:18  peter
+  Revision 1.3  1998-04-10 14:41:43  peter
+    * removed some Hints
+    * small speed optimization for AsmLn
+
+  Revision 1.2  1998/04/08 11:34:18  peter
     * nasm works (linux only tested)
 
   Revision 1.1.1.1  1998/03/25 11:18:16  root

compiler/parser.pas

@@ -211,8 +211,6 @@ unit parser;
 
       var
          a : PAsmFile;
-         g : file;
-         ftime : longint;
       label
          done;
 
@@ -532,7 +530,11 @@ done:
 end.
 {
   $Log$
-  Revision 1.4  1998-04-08 16:58:03  pierre
+  Revision 1.5  1998-04-10 14:41:43  peter
+    * removed some Hints
+    * small speed optimization for AsmLn
+
+  Revision 1.4  1998/04/08 16:58:03  pierre
     * several bugfixes
       ADD ADC and AND are also sign extended
       nasm output OK (program still crashes at end

compiler/pmodules.pas

@@ -196,7 +196,6 @@ unit pmodules;
          pu : pused_unit;
          a  : pasmfile;
          hs : pstring;
-         i  : longint;
       begin
          old_current_module:=current_module;
          { be sure not to mix lines from different files }
@@ -935,7 +934,11 @@ unit pmodules;
 end.
 {
   $Log$
-  Revision 1.3  1998-04-03 09:51:00  daniel
+  Revision 1.4  1998-04-10 14:41:43  peter
+    * removed some Hints
+    * small speed optimization for AsmLn
+
+  Revision 1.3  1998/04/03 09:51:00  daniel
   * Fixed heap allocation for OS/2.
 
   Revision 1.2  1998/03/30 15:53:01  florian