diff --git a/compiler/cgai386.pas b/compiler/cgai386.pas index 5f607f7331..d3cadbcaa4 100644 --- a/compiler/cgai386.pas +++ b/compiler/cgai386.pas @@ -256,7 +256,7 @@ procedure mov_reg_to_dest(p : ptree; s : topsize; reg : tregister); internalerror(7453984); end; -{$ifdef jmpfix} +{$ifdef nojmpfix} procedure emitjmp(c : tasmcond;var l : pasmlabel); var ai : Pai386; @@ -271,7 +271,7 @@ procedure mov_reg_to_dest(p : ptree; s : topsize; reg : tregister); exprasmlist^.concat(ai); end; end; -{$else jmpfix} +{$else nojmpfix} procedure emitjmp(c : tasmcond;var l : pasmlabel); var ai : Pai386; @@ -286,7 +286,7 @@ procedure mov_reg_to_dest(p : ptree; s : topsize; reg : tregister); ai^.is_jmp:=true; exprasmlist^.concat(ai); end; -{$endif jmpfix} +{$endif nojmpfix} procedure emit_flag2reg(flag:tresflags;hregister:tregister); var @@ -3112,7 +3112,13 @@ procedure mov_reg_to_dest(p : ptree; s : topsize; reg : tregister); end. { $Log$ - Revision 1.10 1999-07-04 21:59:30 jonas + Revision 1.11 1999-07-05 11:56:56 jonas + * merged + + Revision 1.5.2.4 1999/07/04 23:55:52 jonas + * changed {$ifdef jmpfix} to {$ifndef nojmpfix} + + Revision 1.10 1999/07/04 21:59:30 jonas * merged Revision 1.5.2.3 1999/07/04 21:50:17 jonas diff --git a/compiler/i386asm.pas b/compiler/i386asm.pas index 1bd17940e1..79b6122c3d 100644 --- a/compiler/i386asm.pas +++ b/compiler/i386asm.pas @@ -515,11 +515,11 @@ uses var i : longint; begin -{$ifdef jmpfix} +{$ifndef nojmpfix} if is_jmp then dec(PasmLabel(oper[0].sym)^.refs) else -{$endif jmpfix} +{$endif nojmpfix} for i:=1 to ops do if (oper[i-1].typ=top_ref) then dispose(oper[i-1].ref); @@ -1524,9 +1524,14 @@ end; end. { $Log$ - Revision 1.14 1999-07-04 21:59:31 jonas + Revision 1.15 1999-07-05 11:56:55 jonas * merged + Revision 1.12.2.3 1999/07/04 23:55:50 jonas + * changed {$ifdef jmpfix} to {$ifndef nojmpfix} + + Revision 1.14 1999/07/04 21:59:31 jonas + * merged Revision 1.12.2.2 1999/07/04 21:50:16 jonas * everything between {$ifdef jmpfix}: