Przeglądaj źródła

* long lines fixed

peter 26 lat temu
rodzic
commit
6d2ddc0b28
1 zmienionych plików z 8 dodań i 3 usunięć
  1. 8 3
      compiler/ag386nsm.pas

+ 8 - 3
compiler/ag386nsm.pas

@@ -534,9 +534,11 @@ ait_labeled_instruction :
                        if not((op=A_JMP) or (op=A_LOOP) or (op=A_LOOPZ) or
                               (op=A_LOOPE) or (op=A_LOOPNZ) or (op=A_LOOPNE) or
                               (op=A_JCXZ) or (op=A_JECXZ)) then
-                        AsmWriteLn(#9#9+int_op2str[pai386_labeled(hp)^.opcode]+cond2str[pai386_labeled(hp)^.condition]+#9+'near '+lab2str(pai386_labeled(hp)^.lab))
+                        AsmWriteLn(#9#9+int_op2str[pai386_labeled(hp)^.opcode]+
+                          cond2str[pai386_labeled(hp)^.condition]+#9+'near '+lab2str(pai386_labeled(hp)^.lab))
                        else
-                        AsmWriteLn(#9#9+int_op2str[pai386_labeled(hp)^.opcode]+cond2str[pai386_labeled(hp)^.condition]+#9+lab2str(pai386_labeled(hp)^.lab));
+                        AsmWriteLn(#9#9+int_op2str[pai386_labeled(hp)^.opcode]+
+                          cond2str[pai386_labeled(hp)^.condition]+#9+lab2str(pai386_labeled(hp)^.lab));
                      end;
         ait_symbol : begin
                        if pai_symbol(hp)^.is_global then
@@ -733,7 +735,10 @@ ait_stab_function_name : ;
 end.
 {
   $Log$
-  Revision 1.35  1999-05-10 15:18:16  peter
+  Revision 1.36  1999-05-11 16:28:16  peter
+    * long lines fixed
+
+  Revision 1.35  1999/05/10 15:18:16  peter
     * fixed condition writing
 
   Revision 1.34  1999/05/08 19:52:34  peter