Permalink
Browse files

7.6.2 - upgrade klipse-clj

  • Loading branch information...
viebel committed Oct 1, 2018
1 parent 067ef73 commit 49bc41b92116e0d498e4f0d0f972b7d5482b9917
Showing with 114 additions and 51 deletions.
  1. +1 −1 deps.edn
  2. +1 −1 project.clj
  3. +4 −49 resources/public/clojure-dbg.html
  4. +108 −0 resources/public/clojure-ns-dbg.html
View
@@ -2,7 +2,7 @@
:deps {org.clojure/clojure {:mvn/version "1.9.0"}
org.clojure/clojurescript {:mvn/version "1.10.238"}
viebel/klipse-clj #_{:git/url "https://github.com/viebel/klipse-clj.git"
:sha "642bd2815fd046369a60120954b7cad929cde711" } #_{:local/root "/Users/viebel/prj/klipse-clj"} {:mvn/version "7.6.0"}
:sha "642bd2815fd046369a60120954b7cad929cde711" } #_{:local/root "/Users/viebel/prj/klipse-clj"} {:mvn/version "7.6.2"}
org.clojure/tools.reader {:mvn/version "1.3.0"}
org.clojure/core.async {:mvn/version "0.4.474"}
im.chit/purnam {:mvn/version "0.5.2"}
View
@@ -1,4 +1,4 @@
(defproject klipse "7.5.2"
(defproject klipse "7.6.2"
:description "Embeddable multi-language WEB REPL"
:resource-paths ["scripts" "src" "resources" "target"]
:clean-targets ^{:protect false} ["resources/public/plugin_prod/js"
@@ -8,22 +8,22 @@
</head>
<body>
<div class="clojure">
(doc map)
(if 1 2 3)
</div>
<br/>
<div class="clojure">
(def x 1)
x
(dbg x)
</div>
<br/>
<div class="clojure">
(def x ::foo)
x
</div>
<div class="clojure">
(ns foo.core
(:require [clojure.set :as ppp]))
(def a ::ppp/koko)
(require '[clojure.set :as ppp]))
(def a ::ppp/koko)
a
</div>
<div class="clojure">
@@ -35,42 +35,10 @@
`(1 2 ~(map inc [1 2 3]))
</div>
<br/>
<div class="clojure">
(ns my.m$macros)
(defmacro m [x] x)
(my.m/m 1)
</div>
<br/>
<div class="clojure">
`(let [x# 1] x#)
</div>
<br/>
<div class="clojure">
(ns my.ns
(:require [clojure.set :as ss]))
</div>
<div class="clojure">
(ns my.ns
(:refer-clojure :exclude [distinct group-by update])
(:require clojure.string
[sqlingvo.core :as sql :refer [sql db select from]]))
(def my-db (db :postgresql))
(sql (select my-db [:first-name]
(from :people)))
</div>
<br/>
<div class="kkkclojure">
(require-macros '[gadjett.core :refer [dbg]])
(dbg (map inc [1 2 3]))
</div>
<br/>
<div class="clojure">
(require 'goog.dom)
@@ -82,25 +50,12 @@
`(1 2 ~(map inc [1 2 3]))
</div>
<br/>
<div class="clojure">
(ns my.m$macros)
(defmacro m [x] x)
(my.m/m 1)
</div>
<br/>
<div class="clojure">
`(let [x# 1] x#)
</div>
<br/>
<br/>
<br/>
<div class="clojure">
(ns my.test
(:require
[cljs.pprint :as pp :refer [pprint]]))
(with-out-str (pprint (for [x (range 10)] (range x))))
</div>
<br/>
<div class="clojure">
`(1 2 ~(map inc [1 2 3]))
</div>
@@ -0,0 +1,108 @@
<!DOCTYPE html>
<html>
<head lang="en">
<meta charset="UTF-8">
<title>KLIPSE: a simple and elegant online cljs compiler and evaluator</title>
<link rel='shortcut icon' type='image/x-icon' href='img/klipse.png' />
<link rel="stylesheet" type="text/css" href="css/codemirror.css">
</head>
<body>
<div class="clojure">
(ns foo.core
(:require [clojure.set :as ppp]))
(def a ::ppp/koko)
a
</div>
<div class="clojure">
(def y 1)
(+ y y)
</div>
<br/>
<div class="clojure">
`(1 2 ~(map inc [1 2 3]))
</div>
<br/>
<div class="clojure">
(ns my.m$macros)
(defmacro m [x] x)
(my.m/m 1)
</div>
<br/>
<div class="clojure">
`(let [x# 1] x#)
</div>
<br/>
<div class="clojure">
(ns my.ns
(:require [clojure.set :as ss]))
</div>
<div class="clojure">
(ns my.ns
(:refer-clojure :exclude [distinct group-by update])
(:require clojure.string
[sqlingvo.core :as sql :refer [sql db select from]]))
(def my-db (db :postgresql))
(sql (select my-db [:first-name]
(from :people)))
</div>
<br/>
<div class="clojure">
(require-macros '[gadjett.core :refer [dbg]])
(dbg (map inc [1 2 3]))
</div>
<br/>
<div class="clojure">
(require 'goog.dom)
(goog.dom/setTextContent js/klipse-container "hello")
[1 2 3]
</div>
<br/>
<div class="clojure">
`(1 2 ~(map inc [1 2 3]))
</div>
<br/>
<div class="clojure">
(ns my.m$macros)
(defmacro m [x] x)
(my.m/m 1)
</div>
<br/>
<div class="clojure">
`(let [x# 1] x#)
</div>
<br/>
<br/>
<br/>
<div class="clojure">
(ns my.test
(:require
[cljs.pprint :as pp :refer [pprint]]))
(with-out-str (pprint (for [x (range 10)] (range x))))
</div>
<br/>
<div class="clojure">
`(1 2 ~(map inc [1 2 3]))
</div>
<br/>
<script>
window.klipse_settings = {
// clojure_bundled_ns_ignore: /gadjett\..*/
};
if(window.location.search.match(/transpile=1/)) {
window.klipse_settings.selector_js = '.clojure';
} else {
window.klipse_settings.selector = '.clojure';
}
</script>
<script src="/cljs-out/dev-main.js"></script>
</body>
</html>

0 comments on commit 49bc41b

Please sign in to comment.