Browse Source

+ added the fpc_x86_*port* intrinsics to the x86_64 system unit as well

git-svn-id: trunk@39370 -
nickysn 7 years ago
parent
commit
2c8853f239
1 changed files with 7 additions and 0 deletions
  1. 7 0
      rtl/x86_64/cpuh.inc

+ 7 - 0
rtl/x86_64/cpuh.inc

@@ -16,3 +16,10 @@
 
 
 const
 const
   {$I cpuinnr.inc}
   {$I cpuinnr.inc}
+
+function fpc_x86_inportb(port : word) : byte;[internproc:fpc_in_x86_inportb];
+function fpc_x86_inportw(port : word) : word;[internproc:fpc_in_x86_inportw];
+function fpc_x86_inportl(port : word) : longint;[internproc:fpc_in_x86_inportl];
+procedure fpc_x86_outportb(port : word;data : byte);[internproc:fpc_in_x86_outportb];
+procedure fpc_x86_outportw(port : word;data : word);[internproc:fpc_in_x86_outportw];
+procedure fpc_x86_outportl(port : word;data : longint);[internproc:fpc_in_x86_outportl];