changed name of foundry namespace to assembler

This commit is contained in:
Richard Harrington 2013-08-06 12:00:30 -04:00
parent 54161691fa
commit 623bfea415
4 changed files with 6 additions and 6 deletions

View File

@ -1,4 +1,4 @@
(ns robotwar.foundry
(ns robotwar.assembler
(:require [robotwar.kernel-lexicon :as kernel-lexicon])
(:use (clojure [string :only [split join]]
[pprint :only [pprint]])

View File

@ -2,7 +2,7 @@
(:use [clojure.string :only [join]]
[clojure.pprint :only [pprint]])
(:require [robotwar.kernel-lexicon :as kernel-lexicon]
[robotwar.foundry :as foundry]))
[robotwar.assembler :as assembler]))
(def op-map (into {} (for [op kernel-lexicon/op-commands]
[op (case op
@ -32,7 +32,7 @@
{:acc 0
:instr-ptr 0
:call-stack []
:obj-code (foundry/assemble src-code reg-names)})
:obj-code (assembler/assemble src-code reg-names)})
(defn resolve-arg [{arg-val :val arg-type :type} registers labels world]
"resolves an instruction argument to a numeric value

View File

@ -1,6 +1,6 @@
(ns robotwar.core
(:use [clojure.pprint])
(:require [robotwar.foundry :as foundry]
(:require [robotwar.assembler :as assembler]
[robotwar.brain :as braini]
[robotwar.robot :as robot]
[robotwar.world :as world]

View File

@ -1,7 +1,7 @@
(ns robotwar.foundry-test
(ns robotwar.assembler-test
(:use (clojure [string :only [join]]
[test])
[robotwar.foundry])
[robotwar.assembler])
(:require [robotwar.game-lexicon :as game-lexicon]))
(def line1 "IF DAMAGE # D GOTO MOVE ; comment or something")