diff --git a/project.clj b/project.clj index 65ea289..17745a8 100644 --- a/project.clj +++ b/project.clj @@ -1,17 +1,16 @@ -(defproject mw-ui "0.1.3-SNAPSHOT" +(defproject mw-ui "0.1.2-SNAPSHOT" :description "Web-based user interface for MicroWorld" :url "http://www.journeyman.cc/microworld" :manifest { - ;; do not reformat this! It is important for the buildall script - ;; that each of these properties is on a line with nothing else. - "build-signature-version" "0.1.3-SNAPSHOT" - "build-signature-user" "Simon Brooke" - "build-signature-email" "simon@journeyman.cc" - "build-signature-timestamp" "2014-07-27 11:55:34+01:00" + "build-signature-version" "unset" + "build-signature-user" "unset" + "build-signature-email" "unset" + "build-signature-timestamp" "unset" + "Implementation-Version" "unset" } :dependencies [[org.clojure/clojure "1.6.0"] - [mw-engine "0.1.3-SNAPSHOT"] - [mw-parser "0.1.3-SNAPSHOT"] + [mw-engine "0.1.2-SNAPSHOT"] + [mw-parser "0.1.2-SNAPSHOT"] [lib-noir "0.8.4"] [ring-server "0.3.1"] [selmer "0.6.8"] diff --git a/resources/public/docs/mw-engine/uberdoc.html b/resources/public/docs/mw-engine/uberdoc.html index 72677ad..d6bc7f0 100644 --- a/resources/public/docs/mw-engine/uberdoc.html +++ b/resources/public/docs/mw-engine/uberdoc.html @@ -3028,8 +3028,8 @@ net.brehaut.ClojureTools = (function (SH) { build_tree: build_tree }; })(SyntaxHighlighter); -mw-engine -- Marginalia

mw-engine

0.1.3-SNAPSHOT


Cellular automaton world builder.

-

dependencies

org.clojure/clojure
1.5.1
org.clojure/math.combinatorics
0.0.7
org.clojure/tools.trace
0.7.8
net.mikera/imagez
0.3.1



(this space intentionally left almost blank)
 

Functions to transform a world and run rules.

+mw-engine -- Marginalia

mw-engine

0.1.2-SNAPSHOT


Cellular automaton world builder.

+

dependencies

org.clojure/clojure
1.5.1
org.clojure/math.combinatorics
0.0.7
org.clojure/tools.trace
0.7.8
net.mikera/imagez
0.3.1



(this space intentionally left almost blank)
 

Functions to transform a world and run rules.

(ns mw-engine.core
   (:use mw-engine.utils)
@@ -3489,7 +3489,15 @@ important.

vector (map #(set-cell-property % x y property value) row))) - world))))
 

Functions to create and to print two dimensional cellular automata. Nothing in this + world))))

 
+
(ns mw-engine.version
+  (:gen-class))

Get the implementation version from the package of this namespace, which must + be compiled into a class (see clojure.java.interop)

+
(defn get-implementation-version 
+  [namespace-class]
+  (.getImplementationVersion (.getPackage namespace-class)))
+
(defn -main []
+  (get-implementation-version (eval 'mw-engine.version)))
 

Functions to create and to print two dimensional cellular automata. Nothing in this file should determine what states are possible within the automaton, except for the initial state, :new.

diff --git a/resources/public/docs/mw-parser/uberdoc.html b/resources/public/docs/mw-parser/uberdoc.html index 88fa68e..57aa9fa 100644 --- a/resources/public/docs/mw-parser/uberdoc.html +++ b/resources/public/docs/mw-parser/uberdoc.html @@ -3028,8 +3028,8 @@ net.brehaut.ClojureTools = (function (SH) { build_tree: build_tree }; })(SyntaxHighlighter); -mw-parser -- Marginalia

mw-parser

0.1.3-SNAPSHOT


Parser for production rules for MicroWorld engine

-

dependencies

org.clojure/clojure
1.5.1
org.clojure/tools.trace
0.7.8
mw-engine
0.1.3-SNAPSHOT



(this space intentionally left almost blank)
 

parse multiple rules from a stream, possibly a file - although the real +mw-parser -- Marginalia

mw-parser

0.1.2-SNAPSHOT


Parser for production rules for MicroWorld engine

+

dependencies

org.clojure/clojure
1.5.1
org.clojure/tools.trace
0.7.8
mw-engine
0.1.2-SNAPSHOT



(this space intentionally left almost blank)
 

parse multiple rules from a stream, possibly a file - although the real objective is to parse rules out of a block of text from a textarea

(ns mw-parser.bulk
@@ -3086,7 +3086,8 @@ more complex issue which I don't yet know how to address.

(ns mw-parser.core
   (:use mw-engine.utils
-        [clojure.string :only [split trim triml]]))
+ [clojure.string :only [split trim triml]]) + (:gen-class))
(declare parse-conditions)
 (declare parse-not-condition)
 (declare parse-simple-condition)

a regular expression which matches string representation of numbers

diff --git a/resources/public/docs/mw-ui/uberdoc.html b/resources/public/docs/mw-ui/uberdoc.html index d14c628..50407d2 100644 --- a/resources/public/docs/mw-ui/uberdoc.html +++ b/resources/public/docs/mw-ui/uberdoc.html @@ -3028,8 +3028,8 @@ net.brehaut.ClojureTools = (function (SH) { build_tree: build_tree }; })(SyntaxHighlighter); -mw-ui -- Marginalia

mw-ui

0.1.3-SNAPSHOT


Web-based user interface for MicroWorld

-

dependencies

org.clojure/clojure
1.6.0
mw-engine
0.1.3-SNAPSHOT
mw-parser
0.1.3-SNAPSHOT
lib-noir
0.8.4
ring-server
0.3.1
selmer
0.6.8
com.taoensso/timbre
3.2.1
com.taoensso/tower
2.0.2
markdown-clj
0.9.44
environ
0.5.0
noir-exception
0.2.2



(this space intentionally left almost blank)
 
+mw-ui -- Marginalia

mw-ui

0.1.2-SNAPSHOT


Web-based user interface for MicroWorld

+

dependencies

org.clojure/clojure
1.6.0
mw-engine
0.1.2-SNAPSHOT
mw-parser
0.1.2-SNAPSHOT
lib-noir
0.8.4
ring-server
0.3.1
selmer
0.6.8
com.taoensso/timbre
3.2.1
com.taoensso/tower
2.0.2
markdown-clj
0.9.44
environ
0.5.0
noir-exception
0.2.2



(this space intentionally left almost blank)
 
(ns mw-ui.handler
   (:require [compojure.core :refer [defroutes]]
             [mw-ui.routes.home :refer [home-routes]]
@@ -3184,7 +3184,8 @@ net.brehaut.ClojureTools = (function (SH) {
 
(ns mw-ui.repl
   (:use mw-ui.handler
         ring.server.standalone
-        [ring.middleware file-info file]))
+ [ring.middleware file-info file]) + (:gen-class))
(defonce server (atom nil))
(defn get-handler []
   ;; #'app expands to (var app) so that when we reload our code,
@@ -3209,7 +3210,9 @@ net.brehaut.ClojureTools = (function (SH) {
     (println (str "You can view the site at http://localhost:" port))))
(defn stop-server []
   (.stop @server)
-  (reset! server nil))
 
+ (reset! server nil))
+
(defn -main []
+  (start-server))
 
(ns mw-ui.routes.home
   (:use clojure.walk
         compojure.core
diff --git a/src/mw_ui/repl.clj b/src/mw_ui/repl.clj
index d05c737..3563fac 100644
--- a/src/mw_ui/repl.clj
+++ b/src/mw_ui/repl.clj
@@ -1,7 +1,9 @@
 (ns mw-ui.repl
   (:use mw-ui.handler
         ring.server.standalone
-        [ring.middleware file-info file]))
+        [ring.middleware file-info file])
+  (:gen-class)
+)
 
 (defonce server (atom nil))
 
@@ -32,3 +34,6 @@
 (defn stop-server []
   (.stop @server)
   (reset! server nil))
+
+(defn -main []
+  (start-server))