\ ========== Copyright Header Begin ==========================================
\ 
\ Hypervisor Software File: sysprm64.fth
\ 
\ Copyright (c) 2006 Sun Microsystems, Inc. All Rights Reserved.
\ 
\  - Do no alter or remove copyright notices
\ 
\  - Redistribution and use of this software in source and binary forms, with 
\    or without modification, are permitted provided that the following 
\    conditions are met: 
\ 
\  - Redistribution of source code must retain the above copyright notice, 
\    this list of conditions and the following disclaimer.
\ 
\  - Redistribution in binary form must reproduce the above copyright notice,
\    this list of conditions and the following disclaimer in the
\    documentation and/or other materials provided with the distribution. 
\ 
\    Neither the name of Sun Microsystems, Inc. or the names of contributors 
\ may be used to endorse or promote products derived from this software 
\ without specific prior written permission. 
\ 
\     This software is provided "AS IS," without a warranty of any kind. 
\ ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND WARRANTIES, 
\ INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS FOR A 
\ PARTICULAR PURPOSE OR NON-INFRINGEMENT, ARE HEREBY EXCLUDED. SUN 
\ MICROSYSTEMS, INC. ("SUN") AND ITS LICENSORS SHALL NOT BE LIABLE FOR 
\ ANY DAMAGES SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING OR 
\ DISTRIBUTING THIS SOFTWARE OR ITS DERIVATIVES. IN NO EVENT WILL SUN 
\ OR ITS LICENSORS BE LIABLE FOR ANY LOST REVENUE, PROFIT OR DATA, OR 
\ FOR DIRECT, INDIRECT, SPECIAL, CONSEQUENTIAL, INCIDENTAL OR PUNITIVE 
\ DAMAGES, HOWEVER CAUSED AND REGARDLESS OF THE THEORY OF LIABILITY, 
\ ARISING OUT OF THE USE OF OR INABILITY TO USE THIS SOFTWARE, EVEN IF 
\ SUN HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
\ 
\ You acknowledge that this software is not designed, licensed or
\ intended for use in the design, construction, operation or maintenance of
\ any nuclear facility. 
\ 
\ ========== Copyright Header End ============================================
id: @(#)sysprm64.fth 1.2 95/05/09
purpose: FCode token number definitions for system (2-byte) FCodes
copyright: Copyright 1995 Sun Microsystems, Inc.  All Rights Reserved

\ Defined in sysprims.fth
\ v3     02e 2 byte-code: rx@	   ( xaddr -- o )
\ v3     02f 2 byte-code: rx!        ( o xaddr -- )

v3     h# 041 2 byte-code: bxjoin     ( b.lo b.2 b.3 b.4 b.5 b.6 b.7 b.hi -- o )
v3     h# 042 2 byte-code: <l@        ( qaddr -- n )
v3     h# 043 2 byte-code: lxjoin     ( quad.lo quad.hi -- o )
v3     h# 044 2 byte-code: wxjoin     ( w.lo w.2 w.3 w.hi -- o )
v3     h# 045 2 byte-code: x,         ( o -- )
v3     h# 046 2 byte-code: x@         ( xaddr  -- o )
v3     h# 047 2 byte-code: x!         ( o xaddr -- )
v3     h# 048 2 byte-code: /x         ( -- n )
v3     h# 049 2 byte-code: /x*        ( nu1 -- nu2 )
v3     h# 04a 2 byte-code: xa+        ( addr1 index -- addr2 )
v3     h# 04b 2 byte-code: xa1+       ( addr1 -- addr2 )
v3     h# 04c 2 byte-code: xbflip     ( oct1 -- oct2 )
v3     h# 04d 2 byte-code: xbflips    ( xaddr len -- )
v3     h# 04e 2 byte-code: xbsplit    ( o -- b.lo b.2 b.3 b.4 b.5 b.6 b.7 b.hi )
v3     h# 04f 2 byte-code: xlflip     ( oct1 -- oct2 )
v3     h# 050 2 byte-code: xlflips    ( xaddr len -- )
v3     h# 051 2 byte-code: xlsplit    ( o -- quad.lo quad.hi )
v3     h# 052 2 byte-code: xwflip     ( oct1 -- oct2 )
v3     h# 053 2 byte-code: xwflips    ( xaddr len -- )
v3     h# 054 2 byte-code: xwsplit    ( o -- w.lo w.2 w.3 w.hi )