Annotation of qemu/roms/SLOF/board-js2x/slof/io.fs, revision 1.1.1.1

1.1       root        1: \ *****************************************************************************
                      2: \ * Copyright (c) 2004, 2008 IBM Corporation
                      3: \ * All rights reserved.
                      4: \ * This program and the accompanying materials
                      5: \ * are made available under the terms of the BSD License
                      6: \ * which accompanies this distribution, and is available at
                      7: \ * http://www.opensource.org/licenses/bsd-license.php
                      8: \ *
                      9: \ * Contributors:
                     10: \ *     IBM Corporation - initial implementation
                     11: \ ****************************************************************************/
                     12: 
                     13: \ I/O accesses.
                     14: 
                     15: \ Legacy I/O accesses.
                     16: : >io  f4000000 + ;
                     17: 
                     18: : io-c!  >io rb! ;
                     19: : io-c@  >io rb@ ;
                     20: 
                     21: : io-w!  >io rw! ;
                     22: : io-w@  >io rw@ ;
                     23: 
                     24: \ Accessing the SIO config registers.
                     25: : siocfg!  2e io-c! 2f io-c! ;
                     26: : siocfg@  2e io-c! 2f io-c@ ;

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.