From 7fc45484f499d1371cca9a582460e29e405353f8 Mon Sep 17 00:00:00 2001 From: Lucian Mogosanu Date: Sat, 13 Dec 2014 18:56:32 +0200 Subject: [PATCH] ZXS: RAM: Add examples --- src/ZXS/RAM.hs | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/src/ZXS/RAM.hs b/src/ZXS/RAM.hs index 9a755d5..aaf994c 100644 --- a/src/ZXS/RAM.hs +++ b/src/ZXS/RAM.hs @@ -37,5 +37,11 @@ ramModifyWord ram addr f = do w <- ramGetWord ram addr ramSetWord ram addr $ f w +-- defining this as "RAM" memory, although we're not writing to it +-- while the CPU is running; most probably we'll need to redefine this +-- into its own module romMem :: IO RAM romMem = newListArray (0x0000, 0x3fff) $ repeat 0 + +mainMem :: IO RAM +mainMem = newListArray (0x5ccb, 0xff57) $ repeat 0 -- 1.7.10.4