Re: Unit ports.pas, InPortW

Opie Pecheux wrote:

Hi,

I think that there is a mistake un the ports.pas unit on the gpc-19990430-i386-pc-djgppv202.zip :

function InPortW (PortNumber : ShortWord) : ShortWord; var Result : volatile ShortWord; (*@@*) begin asm ('inb %%dx, %%al' : '=a' (Result) : 'd' (PortNumber) : 'ax', 'dx'); InPortW := Result end;

Wasn't ax instead of al?

That's right, also `inw' instead of `inb'. Thanks for the report, Frank -- Frank Heckenbach, frank@g-n-u.de, http://fjf.gnu.de/ GPC To-Do list, latest features, fixed bugs: http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html