Author: mcayland Date: Sat Feb 20 14:22:11 2016 New Revision: 1381 URL: http://tracker.coreboot.org/trac/openbios/changeset/1381
Log: ppc: move copyright property generation into a separate word
Separate this out rather than keeping it as part of adler32.
Signed-off-by: Mark Cave-Ayland mark.cave-ayland@ilande.co.uk
Modified: trunk/openbios-devel/arch/ppc/qemu/qemu.fs
Modified: trunk/openbios-devel/arch/ppc/qemu/qemu.fs ============================================================================== --- trunk/openbios-devel/arch/ppc/qemu/qemu.fs Sat Feb 20 14:22:09 2016 (r1380) +++ trunk/openbios-devel/arch/ppc/qemu/qemu.fs Sat Feb 20 14:22:11 2016 (r1381) @@ -95,13 +95,11 @@ ; PREPOST-initializer
\ ------------------------------------------------------------------------- -\ Adler-32 wrapper +\ copyright property handling \ -------------------------------------------------------------------------
-: adler32 ( adler buf len -- checksum ) - \ Since Mac OS 9 is the only system using this word, we take this - \ opportunity to inject a copyright message that is necessary for the - \ system to boot. +: insert-copyright-property + \ As required for MacOS 9 and below " Copyright 1983-2001 Apple Computer, Inc. THIS MESSAGE FOR COMPATIBILITY ONLY" encode-string " copyright" " /" find-package if @@ -111,6 +109,17 @@ 3drop drop then then +; + +\ ------------------------------------------------------------------------- +\ Adler-32 wrapper +\ ------------------------------------------------------------------------- + +: adler32 ( adler buf len -- checksum ) + \ Since Mac OS 9 is the only system using this word, we take this + \ opportunity to inject a copyright message that is necessary for the + \ system to boot. + insert-copyright-property
( adler buf len )