Mercurial > vba-clojure
comparison clojure/com/aurellem/gb_driver.clj @ 61:dc8b383ecefa
added code to retrieve other RAM areas and ROM
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Wed, 07 Mar 2012 19:53:39 -0600 |
parents | ef59aee6d715 |
children | 4699c7bab77d |
comparison
equal
deleted
inserted
replaced
60:ef59aee6d715 | 61:dc8b383ecefa |
---|---|
12 (defn get-ram [] | 12 (defn get-ram [] |
13 (let [ram-store (int-array (Gb/getRAMSize))] | 13 (let [ram-store (int-array (Gb/getRAMSize))] |
14 (Gb/getRAM ram-store) | 14 (Gb/getRAM ram-store) |
15 ram-store)) | 15 ram-store)) |
16 | 16 |
17 | |
18 (defn get-rom [] | |
19 (let [rom-store (int-array (Gb/getROMSize))] | |
20 (Gb/getRAM rom-store) | |
21 rom-store)) | |
22 | |
23 (defn get-working-ram [] | |
24 (let [ram-store (int-array Gb/WRAM_SIZE)] | |
25 (Gb/getWRAM ram-store) | |
26 ram-store)) | |
27 | |
28 (defn get-video-ram [] | |
29 (let [ram-store (int-array Gb/VRAM_SIZE)] | |
30 (Gb/getVRAM ram-store) | |
31 ram-store)) |