notes.lisp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

;;;;; -*- mode: common-lisp -*-

;; Addressing Mode Symbols 
'(immediate
  absolute 
  zero-page 
  implied 
  indirect-absolute 
  absolute-indexed-x 
  absolute-indexed-y 
  zero-page-indexed-x 
  zero-page-indexed-y 
  indexed-indirect 
  indirect-indexed 
  relative 
  accumulator)

;; Applying a syntax rule defined
;; in *addressing-modes-syntax*
(funcall
 (eval
  (cadar
   *addressing-modes-syntax*))
 "arg")