m0smith

Debugger entered--Lisp error: (error "ECB 2.40: Errors during the layout setup of ECB. (error-type: error, error-data: (\"Variable binding depth exceeds max-specpdl-size\"))")
  signal(error ("ECB 2.40: Errors during the layout setup of ECB. (error-type: error, error-data: (\"Variable binding depth exceeds max-specpdl-size\"))"))
  error("ECB %s: %s (error-type: %S, error-data: %S)" "2.40" "Errors during the layout setup of ECB." error ("Variable binding depth exceeds max-specpdl-size"))
  ecb-clean-up-after-activation-failure("Errors during the layout setup of ECB." (error "Variable binding depth exceeds max-specpdl-size"))
  ecb-activate--impl()
  ecb-activate-internal()
  ecb-minor-mode(1)
  ecb-activate()
  call-interactively(ecb-activate record nil)
  command-execute(ecb-activate record)

m0smith

Feb 03, 2014 1:31:19 PM org.sonatype.guice.bean.reflect.Logs$JULSink warn
WARNING: Error injecting: org.apache.maven.model.io.DefaultModelReader
java.lang.NoClassDefFoundError: org/apache/maven/model/InputSource
	at java.lang.Class.getDeclaredMethods0(Native Method)
	at java.lang.Class.privateGetDeclaredMethods(Class.java:2531)
	at java.lang.Class.getDeclaredMethods(Class.java:1855)
	at com.google.inject.spi.InjectionPoint.getInjectionPoints(InjectionPoint.java:664)
	at com.google.inject.spi.InjectionPoint.forInstanceMethodsAndFields(InjectionPoint.java:358)
	at com.google.inject.internal.ConstructorBindingImpl.getInternalDependencies(ConstructorBindingImpl.java:155)
	at com.google.inject.internal.InjectorImpl.getInternalDependencies(InjectorImpl.java:585)

m0smith

(def context (init-context))

(def foo []
  (let [db (:db context)]
    (update! db "foo")))  

m0smith

(def ^:dynamic *context* {})

(defn foo []
  (let [db (:db *context*)]
    (update! db "foo"))) 

(defn start-app []
  (binding [*context* (init-context)]
    (foo)))

m0smith

(defn foo [context]
  (let [db (:db context)]
    (update! db "foo")))  

(defn start-app [context]
  (foo context))

(start-app (init-context))

m0smith

 
(defn wrap-context [context]
  (let [db (:db context})]
    (letfn [ 
      (foo [] (update! db "foo"))
      (app [] (foo))]
   app)))
                 
 

m0smith

(defn foo []
  (domonad reader-m [db (asks :db)]
    (update! db "foo")))

(defn app []
    (domonad reader-m [_ (foo)]))

((app) (init-context))

m0smith

(defn foo* [context]
  (let [db (get context :db)]
    (update! db "foo")))


(defn app* [context]
  (let [_ (foo* context)]))

m0smith

(defnctx-keys foo [db]
  (update! db "foo")))
 
(defnctx app [_ (foo)])
 
(apply-ctx app (init-context))

m0smith

(require 'flycheck)


(defun malabar-flycheck-command ( checker cback )
  "Use flycheck to search the current buffer for compiler errrors."
  (if (not (comint-check-proc "*groovy*"))
      (funcall cback 'finished nil)
    (let* ((pom (ede-find-project-root "pom.xml"))
	   (pom-path (format "%spom.xml" pom))
	   (script (if (buffer-modified-p) (buffer-file-name) (buffer-file-name))))