diff options
Diffstat (limited to 'board-js2x/slof/io.fs')
-rw-r--r-- | board-js2x/slof/io.fs | 45 |
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@ ; |