Annotation of qemu/roms/openbios/arch/sparc64/init.fs, revision 1.1

1.1     ! root        1: \ va>tte-data defer MMU virtual to physical address hook for Solaris
        !             2: \ We need to make sure this is in the global wordlist
        !             3: active-package 0 active-package!
        !             4: defer va>tte-data
        !             5: 0 to va>tte-data
        !             6: active-package!
        !             7: 
        !             8: :noname
        !             9:   ."   Type 'help' for detailed information" cr
        !            10:   \ ."   boot secondary slave cdrom: " cr
        !            11:   \ ."    0 >  boot hd:2,\boot\vmlinuz root=/dev/hda2" cr
        !            12:   ; DIAG-initializer
        !            13: 
        !            14: : make-openable ( path )
        !            15:   find-dev if
        !            16:     begin ?dup while
        !            17:       \ install trivial open and close methods
        !            18:       dup active-package! is-open
        !            19:       parent
        !            20:     repeat
        !            21:   then
        !            22: ;
        !            23: 
        !            24: : preopen ( chosen-str node-path )
        !            25:   2dup make-openable
        !            26: 
        !            27:   " /chosen" find-device
        !            28:   open-dev ?dup if
        !            29:     encode-int 2swap property
        !            30:   else
        !            31:     2drop
        !            32:   then
        !            33: ;
        !            34: 
        !            35: :noname
        !            36:   set-defaults
        !            37: ; PREPOST-initializer
        !            38: 
        !            39: \ preopen device nodes (and store the ihandles under /chosen)
        !            40: :noname
        !            41:   " memory" " /memory" preopen
        !            42: 
        !            43: ; SYSTEM-initializer
        !            44: 
        !            45: \ use the tty interface if available
        !            46: : activate-tty-interface
        !            47:   " /packages/terminal-emulator" find-dev if drop
        !            48:   then
        !            49: ;
        !            50: 
        !            51: device-end
        !            52: 
        !            53: : rmap@    ( virt -- rmentry )
        !            54:   drop 0
        !            55:   ;

unix.superglobalmegacorp.com

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