PDA

Ver la Versión Completa : Ayuda con error de sintaxis


pepon386
22-04-2009, 19:34:14
Hola, compañeros. Tengo un componente desarrollado para Delphi 3 que necesito migrar a Delphi 7, y tiene una función en ensamblador con una línea que me da error. Mis conocimientos de assembler son muy limitados y no se solucionarlo. Si algún alma caritativa tuviese a bien de ayudarme le estaría agradecido eternamente.


function CRC32R( CRC :Longint; const Data; cbData :Longint ) :Longint;
assembler;
asm
or edx, edx
je @@exi
jecxz @@exi
push ebx
@@upd:
movzx ebx, al
xor bl, [ edx ]
shr eax, 8
and eax, 00FFFFFFh
xor eax, cs:[ ebx + OFFSET @@C32TT ] //<---- Línea con error
inc edx
loop @@upd
pop ebx
@@exi:
ret
@@C32TT:
DD 000000000h, 077073096h, 0ee0e612ch, 0990951bah
...
DD 0b40bbe37h, 0c30c8ea1h, 05a05df1bh, 02d02ef8dh
end;