[OpenBIOS] [PATCH v3 3/6] Define register access words

[BALATON Zoltan]

Define the r[bwl][!@] register access words as io[bwl][!@] for now.
I'm not sure this is correct.
---
 forth/device/other.fs | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/forth/device/other.fs b/forth/device/other.fs
index 1bed9b8..0ff34b6 100644
--- a/forth/device/other.fs
+++ b/forth/device/other.fs
@@ -58,21 +58,27 @@ defer (poke)
 \ 5.3.7.2 Device-register access

: rb@    ( addr -- byte )
+  ioc@
   ;

: rw@    ( waddr -- w )
+  iow@
   ;

: rl@    ( qaddr -- quad )
+  iol@
   ;

: rb!    ( byte addr -- )
+  ioc!
   ;

: rw!    ( w waddr -- )
+  iow!
   ;

: rl!    ( quad qaddr -- )
+  iol!
   ;

: rx@ ( oaddr - o )