mattbruv

Metrowerks C/C++ Compiler for Embedded PowerPC.
Copyright (c) 2002, Metrowerks Corporation
All rights reserved.
Version 2.4.7 build 92
Runtime Built: Sep 16 2002 15:14:48

Please enter 'mwcceppc.exe -help' for information about options.

-------------------------------------------------------------------------------

mattbruv

import Data.List
import Data.Char

alphabet = ['a'..'z']
caesar = shiftRight 23 alphabet

shiftRight n xs = take (length xs) (drop n (cycle xs))

secret = map encrypt

mattbruv

; Tests DI, EI, and HALT (STOP proved untestable)

.include "shell.inc"

main:
     wreg IE,$04
     
     set_test 2,"EI"
     ei
     ld   bc,0