有这样一段程序:
procedure get_ticks;
label retspot;
begin
asm
push cs { push code segment }
mov ebx,OFFSET retspot { push offset of retspot }
push bx
mov AX,WORD PTR VTD_Addr { push VTD address }
mov DX,WORD PTR VTD_Addr+2
push DX
push AX
mov AX,$0100
retf { fake a far call }
retspot :
mov WORD PTR this_ticks,ax { comes back to here ! }
end;
inline(
$66/$A3/this_ticks/ { mov this_ticks,EAX }
$66/$89/$16/this_ticks+4 { mov this_ticks+4,EDX }
);
end;
错误提示:
[Error] D_timer.pas(183): Statement expected but 'INLINE' found
[Error] D_timer.pas(186): Statement expected, but expression of type 'Extended' found
请问大家这是怎么回事?
procedure get_ticks;
label retspot;
begin
asm
push cs { push code segment }
mov ebx,OFFSET retspot { push offset of retspot }
push bx
mov AX,WORD PTR VTD_Addr { push VTD address }
mov DX,WORD PTR VTD_Addr+2
push DX
push AX
mov AX,$0100
retf { fake a far call }
retspot :
mov WORD PTR this_ticks,ax { comes back to here ! }
end;
inline(
$66/$A3/this_ticks/ { mov this_ticks,EAX }
$66/$89/$16/this_ticks+4 { mov this_ticks+4,EDX }
);
end;
错误提示:
[Error] D_timer.pas(183): Statement expected but 'INLINE' found
[Error] D_timer.pas(186): Statement expected, but expression of type 'Extended' found
请问大家这是怎么回事?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货