Annotation of qemu/roms/openbios/forth/device/structures.fs, revision 1.1

1.1     ! root        1: \ tag: device interface structures
        !             2: \ 
        !             3: \ this code implements data structures used by the
        !             4: \ IEEE 1275-1994 Open Firmware Device Interface.
        !             5: \ 
        !             6: \ Copyright (C) 2003 Stefan Reinauer
        !             7: \ 
        !             8: \ See the file "COPYING" for further information about
        !             9: \ the copyright and warranty status of this work.
        !            10: \ 
        !            11: 
        !            12: \ this file contains the struct definitions for the following 
        !            13: \ device tree structures:
        !            14: \   device-node
        !            15: \   active-package
        !            16: \   property
        !            17: \   instance
        !            18: 
        !            19: 
        !            20: struct ( instance )
        !            21:   /n field >in.instance-data            \ must go first
        !            22:   /n field >in.alloced-size                                                    \ alloced size
        !            23:   /n field >in.device-node
        !            24:   /n field >in.my-parent
        !            25:   /n field >in.interposed
        !            26:   4 cells field >in.my-unit
        !            27:   2 cells field >in.arguments
        !            28:   \ instance-data should be null during packet initialization
        !            29:   \ this diverts access to instance variables to the dictionary
        !            30: constant inst-node.size
        !            31: 
        !            32: struct ( device node )
        !            33:   /n field >dn.isize                    \ instance size (must go first)
        !            34:   /n field >dn.parent
        !            35:   /n field >dn.child
        !            36:   /n field >dn.peer
        !            37:   /n field >dn.properties
        !            38:   /n field >dn.methods
        !            39:   /n field >dn.priv-methods
        !            40:   /n field >dn.#acells
        !            41:   /n field >dn.probe-addr
        !            42:   inst-node.size field >dn.itemplate
        !            43: constant dev-node.size
        !            44: 
        !            45: struct ( property )
        !            46:   /n field >prop.next
        !            47:   /n field >prop.name
        !            48:   /n field >prop.addr
        !            49:   /n field >prop.len
        !            50: constant prop-node.size
        !            51: 
        !            52: struct ( active package )
        !            53:   /n field >ap.device-str
        !            54: constant active-package.size

unix.superglobalmegacorp.com

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