Browse Source

* fix missing comma in the middle of 64-bit ait_consts

git-svn-id: branches/z80@44451 -
nickysn 5 years ago
parent
commit
a38917f471
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/z80/agsdasz80.pas

+ 1 - 1
compiler/z80/agsdasz80.pas

@@ -313,7 +313,7 @@ unit agsdasz80;
                           end
                         else
                           if consttype in [aitconst_64bit,aitconst_64bit_unaligned] then
-                            s:=tostr(Word(tai_const(hp).value))       +','+tostr(Word(tai_const(hp).value shr 16))+
+                            s:=tostr(Word(tai_const(hp).value))       +','+tostr(Word(tai_const(hp).value shr 16))+','+
                                tostr(Word(tai_const(hp).value shr 32))+','+tostr(Word(tai_const(hp).value shr 48))
                           else
                             s:=tostr(Word(tai_const(hp).value))+','+tostr(Word(tai_const(hp).value shr 16));