Skip to content

Instantly share code, notes, and snippets.

@Sgeo Sgeo/gist:3846768
Created Oct 7, 2012

Embed
What would you like to do?
delimonads
(ns delimonads.core
(:require [monads.core :as m])
(:use delimc.core))
(reset
(defn bind-cont
"Binds its monadic value argument to the continuation.
Easy to understand explanation: (f (bind-cont x) y) becomes do {x' <- x; f x' y}"
[monadic-value]
(shift k (m/bind monadic-value k))))
@Sgeo

This comment has been minimized.

Copy link
Owner Author

commented Oct 7, 2012

clojure.lang.Compiler$CompilerException: java.lang.RuntimeException: Can't specify more than 20 params, compiling:(c:\Users\Sgeo\DEV\Clojure\delimonads\src\delimonads\core.clj:6)

at clojure.lang.Compiler.analyzeSeq (Compiler.java:6462)

clojure.lang.Compiler.analyze (Compiler.java:6262)

clojure.lang.Compiler.analyzeSeq (Compiler.java:6443)

clojure.lang.Compiler.analyze (Compiler.java:6262)

clojure.lang.Compiler.analyze (Compiler.java:6223)

clojure.lang.Compiler$InvokeExpr.parse (Compiler.java:3548)

clojure.lang.Compiler.analyzeSeq (Compiler.java:6457)

clojure.lang.Compiler.analyze (Compiler.java:6262)

clojure.lang.Compiler.access$100 (Compiler.java:37)

clojure.lang.Compiler$DefExpr$Parser.parse (Compiler.java:518)

clojure.lang.Compiler.analyzeSeq (Compiler.java:6455)

clojure.lang.Compiler.analyze (Compiler.java:6262)

clojure.lang.Compiler.analyze (Compiler.java:6223)

clojure.lang.Compiler.eval (Compiler.java:6515)

clojure.lang.Compiler.eval (Compiler.java:6500)

clojure.lang.Compiler.load (Compiler.java:6952)

clojure.lang.Compiler.loadFile (Compiler.java:6912)

clojure.lang.RT$3.invoke (RT.java:307)

delimonads.core$eval2186.invoke (NO_SOURCE_FILE:1)

clojure.lang.Compiler.eval (Compiler.java:6511)

clojure.lang.Compiler.eval (Compiler.java:6477)

clojure.core$eval.invoke (core.clj:2797)

clojure.main$repl$read_eval_print__6405.invoke (main.clj:245)

clojure.main$repl$fn__6410.invoke (main.clj:266)

clojure.main$repl.doInvoke (main.clj:266)

clojure.lang.RestFn.invoke (RestFn.java:1096)

clojure.tools.nrepl.middleware.interruptible_eval$evaluate$fn__495.invoke (interruptible_eval.clj:57)

clojure.lang.AFn.applyToHelper (AFn.java:159)

clojure.lang.AFn.applyTo (AFn.java:151)

clojure.core$apply.invoke (core.clj:601)

clojure.core$with_bindings_STAR_.doInvoke (core.clj:1771)

clojure.lang.RestFn.invoke (RestFn.java:425)

clojure.tools.nrepl.middleware.interruptible_eval$evaluate.invoke (interruptible_eval.clj:42)

clojure.tools.nrepl.middleware.interruptible_eval$interruptible_eval$fn__536$fn__538.invoke (interruptible_eval.clj:170)

clojure.core$comp$fn__4034.invoke (core.clj:2278)

clojure.tools.nrepl.middleware.interruptible_eval$run_next$fn__529.invoke (interruptible_eval.clj:137)

clojure.lang.AFn.run (AFn.java:24)

java.util.concurrent.ThreadPoolExecutor.runWorker (ThreadPoolExecutor.java:1110)

java.util.concurrent.ThreadPoolExecutor$Worker.run (ThreadPoolExecutor.java:603)

java.lang.Thread.run (Thread.java:722)
@Sgeo

This comment has been minimized.

Copy link
Owner Author

commented Oct 7, 2012

clojure.lang.Compiler$CompilerException: java.lang.RuntimeException: Can't specify more than 20 params, compiling:(c:\Users\Sgeo\DEV\Clojure\delimonads\src\delimonads\core.clj:6)

at clojure.lang.Compiler.analyzeSeq (Compiler.java:6462)

clojure.lang.Compiler.analyze (Compiler.java:6262)

clojure.lang.Compiler.analyzeSeq (Compiler.java:6443)

clojure.lang.Compiler.analyze (Compiler.java:6262)

clojure.lang.Compiler.analyze (Compiler.java:6223)

clojure.lang.Compiler$InvokeExpr.parse (Compiler.java:3548)

clojure.lang.Compiler.analyzeSeq (Compiler.java:6457)

clojure.lang.Compiler.analyze (Compiler.java:6262)

clojure.lang.Compiler.access$100 (Compiler.java:37)

clojure.lang.Compiler$DefExpr$Parser.parse (Compiler.java:518)

clojure.lang.Compiler.analyzeSeq (Compiler.java:6455)

clojure.lang.Compiler.analyze (Compiler.java:6262)

clojure.lang.Compiler.analyze (Compiler.java:6223)

clojure.lang.Compiler.eval (Compiler.java:6515)

clojure.lang.Compiler.eval (Compiler.java:6500)

clojure.lang.Compiler.load (Compiler.java:6952)

clojure.lang.Compiler.loadFile (Compiler.java:6912)

clojure.lang.RT$3.invoke (RT.java:307)

delimonads.core$eval2186.invoke (NO_SOURCE_FILE:1)

clojure.lang.Compiler.eval (Compiler.java:6511)

clojure.lang.Compiler.eval (Compiler.java:6477)

clojure.core$eval.invoke (core.clj:2797)

clojure.main$repl$read_eval_print__6405.invoke (main.clj:245)

clojure.main$repl$fn__6410.invoke (main.clj:266)

clojure.main$repl.doInvoke (main.clj:266)

clojure.lang.RestFn.invoke (RestFn.java:1096)

clojure.tools.nrepl.middleware.interruptible_eval$evaluate$fn__495.invoke (interruptible_eval.clj:57)

clojure.lang.AFn.applyToHelper (AFn.java:159)

clojure.lang.AFn.applyTo (AFn.java:151)

clojure.core$apply.invoke (core.clj:601)

clojure.core$with_bindings_STAR_.doInvoke (core.clj:1771)

clojure.lang.RestFn.invoke (RestFn.java:425)

clojure.tools.nrepl.middleware.interruptible_eval$evaluate.invoke (interruptible_eval.clj:42)

clojure.tools.nrepl.middleware.interruptible_eval$interruptible_eval$fn__536$fn__538.invoke (interruptible_eval.clj:170)

clojure.core$comp$fn__4034.invoke (core.clj:2278)

clojure.tools.nrepl.middleware.interruptible_eval$run_next$fn__529.invoke (interruptible_eval.clj:137)

clojure.lang.AFn.run (AFn.java:24)

java.util.concurrent.ThreadPoolExecutor.runWorker (ThreadPoolExecutor.java:1110)

java.util.concurrent.ThreadPoolExecutor$Worker.run (ThreadPoolExecutor.java:603)

java.lang.Thread.run (Thread.java:722)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.