summaryrefslogtreecommitdiffstats
path: root/qemu/roms/SLOF/slof/ppc64.in
diff options
context:
space:
mode:
Diffstat (limited to 'qemu/roms/SLOF/slof/ppc64.in')
-rw-r--r--qemu/roms/SLOF/slof/ppc64.in96
1 files changed, 0 insertions, 96 deletions
diff --git a/qemu/roms/SLOF/slof/ppc64.in b/qemu/roms/SLOF/slof/ppc64.in
deleted file mode 100644
index b533c68c4..000000000
--- a/qemu/roms/SLOF/slof/ppc64.in
+++ /dev/null
@@ -1,96 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 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
- *****************************************************************************/
-
-// The Forth code words (primitives) that are specific to PowerPC64.
-
-// CPU register accesses.
-cod(HID0!)
-cod(HID0@)
-cod(HID1!)
-cod(HID1@)
-cod(HID4!)
-cod(HID4@)
-cod(HID5!)
-cod(HID5@)
-cod(MSR@)
-cod(MSR!)
-cod(SDR1@)
-cod(SDR1!)
-cod(PVR@)
-cod(PIR@)
-cod(TBL@)
-cod(TBU@)
-cod(DABR@)
-cod(DABR!)
-cod(HIOR@)
-cod(HIOR!)
-cod(SPRG0@)
-cod(SPRG0!)
-cod(SPRG1@)
-cod(SPRG1!)
-cod(SPRG2@)
-cod(SPRG2!)
-cod(SPRG3@)
-cod(SPRG3!)
-cod(HSPRG0@)
-cod(HSPRG0!)
-cod(HSPRG1@)
-cod(HSPRG1!)
-cod(DEC@)
-cod(DEC!)
-
-cod(MMCR0!)
-cod(PMC1@)
-
-cod(ICBI)
-
-
-// The start address of a binary payload.
-//con(PAYLOAD (type_u)_binary_payload_start)
-
-// Calling the client program.
-con(CLIENT-ENTRY-POINT (type_u)client_entry_point)
-cod(JUMP-CLIENT)
-dfr(CLIENTINTERFACE)
-
-
-con(ROMFS-LOOKUP-ENTRY (type_u) c_romfs_lookup)
-
-// not very elegant... but the only way it works for me
-con(.WRITE-LOG-BYTE-ENTRY (type_u) writeLogByte_wrapper)
-col(WRITE-LOG-BYTE-ENTRY .WRITE-LOG-BYTE-ENTRY @)
-
-cod(CALL-C)
-cod(START-RTAS)
-
-
-cod(FLUSHCACHE)
-// Bit map allocator
-cod(BM-ALLOCATOR-INIT)
-cod(BM-ALLOC)
-cod(BM-FREE)
-
-// Hang.
-cod(CRASH)
-
-var(DAAR 0x00f00000)
-col(DUMBER DAAR @ C! LIT(1) DAAR +!)
-
-dfr(BOOT-EXCEPTION-HANDLER)
-
-col(NICEINIT DOTICK DROP DOTO EMIT DOTICK ((FIND)) DOTO (FIND) DOTICK 2DROP DOTO (REVEAL) LIT((type_u)_binary_OF_fsi_start) LIT((type_u)_binary_OF_fsi_end) OVER - DOTICK EVALUATE CATCH BOOT-EXCEPTION-HANDLER)
-
-static cell xt_SYSTHROW[] = { _0 RDEPTH_X21 DUP LIT(0x100) _X3d _0BRANCH(5) SWAP DROP NICEINIT BRANCH(7) DUP LIT(0x3800) _X3d _0BRANCH(1) CLIENTINTERFACE PRINT_X2d_STATUS QUIT };
-
-// sentinel, leave it here!
-col(LASTWORD )
-