aboutsummaryrefslogtreecommitdiff
path: root/board-js2x/slof/io.fs
diff options
context:
space:
mode:
Diffstat (limited to 'board-js2x/slof/io.fs')
-rw-r--r--board-js2x/slof/io.fs45
1 files changed, 11 insertions, 34 deletions
diff --git a/board-js2x/slof/io.fs b/board-js2x/slof/io.fs
index 3d55493..a607767 100644
--- a/board-js2x/slof/io.fs
+++ b/board-js2x/slof/io.fs
@@ -1,31 +1,17 @@
-\ =============================================================================
-\ * Copyright (c) 2004, 2005 IBM Corporation
-\ * All rights reserved.
-\ * This program and the accompanying materials
-\ * are made available under the terms of the BSD License
-\ * which accompanies this distribution, and is available at
-\ * http://www.opensource.org/licenses/bsd-license.php
-\ *
-\ * Contributors:
-\ * IBM Corporation - initial implementation
-\ =============================================================================
-
+\ *****************************************************************************
+\ * Copyright (c) 2004, 2007 IBM Corporation
+\ * All rights reserved.
+\ * This program and the accompanying materials
+\ * are made available under the terms of the BSD License
+\ * which accompanies this distribution, and is available at
+\ * http://www.opensource.org/licenses/bsd-license.php
+\ *
+\ * Contributors:
+\ * IBM Corporation - initial implementation
+\ ****************************************************************************/
\ I/O accesses.
-\ Little-endian accesses. Also known as `wrong-endian'.
-: l!-le >r lbflip r> l! ;
-: l@-le l@ lbflip ;
-
-: w!-le >r wbflip r> w! ;
-: w@-le w@ wbflip ;
-
-: rl!-le >r lbflip r> rl! ;
-: rl@-le rl@ lbflip ;
-
-: rw!-le >r wbflip r> rw! ;
-: rw@-le rw@ wbflip ;
-
\ Legacy I/O accesses.
: >io f4000000 + ;
@@ -38,12 +24,3 @@
\ Accessing the SIO config registers.
: siocfg! 2e io-c! 2f io-c! ;
: siocfg@ 2e io-c! 2f io-c@ ;
-
-\ Configuration space accesses.
-: >config dup ffff > IF 1000000 + THEN f2000000 + ;
-: config-l! >config rl!-le ;
-: config-l@ >config rl@-le ;
-: config-w! >config rw!-le ;
-: config-w@ >config rw@-le ;
-: config-b! >config rb! ;
-: config-b@ >config rb@ ;