cat toy can be off.
This commit is contained in:
@@ -1,28 +1,27 @@
|
||||
(ns advent.core.desktop-launcher
|
||||
(:require [advent.core :refer :all]
|
||||
[advent.utils :as utils]
|
||||
#_[clojure.tools.nrepl.server])
|
||||
[clojure.tools.nrepl.server])
|
||||
(:import [com.badlogic.gdx.backends.lwjgl LwjglApplication LwjglApplicationConfiguration]
|
||||
[org.lwjgl.input Keyboard]
|
||||
[com.badlogic.gdx Gdx])
|
||||
(:gen-class))
|
||||
|
||||
#_(defmacro start-nrepl-expr [port]
|
||||
`(let [{port# :port} (clojure.tools.nrepl.server/start-server :port ~port)]
|
||||
(doseq [port-file# ["target/repl-port" ".nrepl-port"]]
|
||||
(-> port-file#
|
||||
java.io.File.
|
||||
(doto .deleteOnExit)
|
||||
(spit port#)))
|
||||
(println "Started nREPL server on port" port#)))
|
||||
|
||||
|
||||
|
||||
(defn -main
|
||||
[& [port]]
|
||||
#_(try
|
||||
(when port (start-nrepl-expr (Integer/parseInt port)))
|
||||
(try
|
||||
#_(require 'clojure.tools.nrepl.server)
|
||||
(when port (let [{port :port} (clojure.tools.nrepl.server/start-server :port (Integer/parseInt port))]
|
||||
(doseq [port-file ["target/repl-port" ".nrepl-port"]]
|
||||
(-> port-file
|
||||
java.io.File.
|
||||
(doto .deleteOnExit)
|
||||
(spit port)))
|
||||
(println "Started nREPL server on port" port)))
|
||||
(catch Exception e))
|
||||
|
||||
(let [cfg (LwjglApplicationConfiguration.)]
|
||||
(if false
|
||||
(do
|
||||
|
||||
Reference in New Issue
Block a user