git-svn-id: trunk@28504 -
@@ -960,6 +960,9 @@ interface
asmops: array[boolean] of tasmop = (A_IMUL, A_MUL);
begin
+ reg:=NR_NO;
+ reference_reset(ref,sizeof(pint));
+
pass_left_right;
{ MUL is faster than IMUL on the 8086 & 8088 (and equal in speed on 286+),
@@ -398,6 +398,7 @@ implementation
hreg64hi:=left.location.register64.reghi;
hreg64lo:=left.location.register64.reglo;
+ v:=0;
if right.nodetype=ordconstn then
v:=Tordconstnode(right).value and 63;
@@ -1302,6 +1302,8 @@ interface
case target_info.system of
system_i8086_msdos:
FormatName:='obj';
+ else
+ internalerror(2014082060);
end;
{$endif i8086}
{$ifdef i386}