diff options
| author | daniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2005-07-10 07:42:14 +0000 |
|---|---|---|
| committer | daniel <daniel@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2005-07-10 07:42:14 +0000 |
| commit | 5eb6c30482fa0fc27ae8d11638b438e2431ffaab (patch) | |
| tree | 9a76d31611091ed44bcabce82b44a960a648001c /compiler/utils | |
| parent | 1650f6cbd6bdfee28f6790a02a8adbc1cbc50dc8 (diff) | |
| download | fpc-5eb6c30482fa0fc27ae8d11638b438e2431ffaab.tar.gz | |
* Add support for jmp $0011:$22334455 to Intel asm reader, request from
a user that is writing an operating system.
* Fix mkx86ins bug to interpret imm16:imm32 as a single operand
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@606 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/utils')
| -rw-r--r-- | compiler/utils/mkx86ins.pp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/utils/mkx86ins.pp b/compiler/utils/mkx86ins.pp index 2158dec325..2601eae9d2 100644 --- a/compiler/utils/mkx86ins.pp +++ b/compiler/utils/mkx86ins.pp @@ -350,17 +350,17 @@ begin break; inc(ops); optypes[ops]:=optypes[ops]+'ot_'+formatop(hs); - if s[i]=':' then +{ if s[i]=':' then begin inc(i); optypes[ops]:=optypes[ops]+' or ot_'+formatop(readstr); - end; + end;} while s[i]='|' do begin inc(i); optypes[ops]:=optypes[ops]+' or ot_'+formatop(readstr); end; - if s[i]=',' then + if s[i] in [',',':'] then inc(i) else break; |