Hi guys! I'm writing little clojure scripts. And I tried to use clojure.tools but it should be installed. So I wonder if I can do something like in ruby: gem install clojure.tools to get latest version and just continue scripting.

You can use leiningen build tool. Install lein. Run lein new app

You have to add all dependencies to project.clj

Lein run

I know about lein. I am writing scripts. I dont need a whole project, I just need a single library

Will download jars

running them using clj

In yourscript do you have ns macro?

no.

#!/usr/bin/env clojure
(println "whatever")

(ns mynamespace.scripts (:require [clojure.tools :as tools])

That will import clojure.tools into your code

I do use (require 'clojure.tools) but compiler can't locate them

You can use (tools/a-fn )

You dont hear me. I know about lein and I know how to require library. The question is can I install it with one command to have it in classpath via using clj

just like with gem install or npm install --global

You can download the jar to project folder, add it to classpath before starting clojure, or add the jar in the Java -cp myjars:clojure.jar clojure.main myscripy.clj

@non.dmitriy The clj tool will find dependencies on your deps.edn file and download them on first invocation. It doesn’t require a separate step like gem/pip/npm do.

If you are writing scripts, you can even pass the deps.edn as a command line argument and it will be the same.

@orestis yeah, i've read this. But I REALLY dont wanna have more than one file per script.

so this is not even near to what I asked about. It's not really much different from having a lein project

Your objective is to not even have a deps.edn file, right? Just a single .clj file?

I’m also a beginner but as far as I know, there are a couple of ways to accomplish them — unfortunately I’m on mobile so can’t dig around too much.

First one is to invoke clj passing in the dependencies as command line arguments. Essentially typing out your deps.edn on command invocation.

Second is to use a “global” deps.edn with common dependencies.

And I think there might be a way to have a hash bang #!/usr/bin/clj that even includes deps as command line args.

well, your first point covers last:) I will look into it, thanks

Some discussion here https://clojureverse.org/t/scripting-with-clj/1618

Might be good to ask in #tools-deps too!

Would be nice to have self contained clj files, I agree.

Hello I'm trying to resolve the and symbol but it returns true instead of false here. How can I make it work?`((resolve (symbol "and")) true false)`

@kwcharllie379 and is a macro so I guess you need to dig in this direction

ahh I forgotten about that

So I should do macroexpand 😛

@orestis well, turns out shebang requires to use only one option without whitespaces so I cant pass deps hash to clj. I can create some wrapping script but it kinda smelly:(((

Macroexpand does not work as well. Do not know how to do it then.

@kwcharllie379 why can't you just use ((symbol "and") true false) ?

forget it, I am stupid:)

@karolinasokolowska you can't apply a macro as a function

err @kwcharllie379

a macro is a function from data -> data that takes 2 extra parameters &env and &meta

So literally there is no possibility to somehow call it?

@kwcharllie379 try (eval (macroexpand (list (symbol "and") true false)))

so ((resolve 'and) true false) is passing true as &form and false as &env, and no arguments

it's equivalent to doing (and)

look what happens if you pass it more than 2 arguments

user=> ((resolve 'and) nil nil true false true)
(clojure.core/let [and__5324__auto__ true] (if and__5324__auto__ (clojure.core/and false true) and__5324__auto__))

what are you actually trying to do?

My solution should work. You just expand macro and eval it.

Yes it's working

macroexpand accepts list. It is not macro itself

Now i see

the above is equivalent to just

(eval (macroexpand `(and true false))

but what is it that you're trying to do?

ok here is my fn

(defn- logic-op [a-str b-str op]
  (let [a-vec (s/split a-str #"")
        b-vec (s/split b-str #"")]
    (s/join
     (map #(if (eval (macroexpand (list (symbol op) (= %1 "1") (= %2 "1"))))
             1 0)
          a-vec b-vec))))

or without list: (eval (macroexpand (~(symbol "and") true true)))`

there's better ways to do that

shit

(eval (macroexpand `(~(symbol "and") true true)))

use a map from symbol to function

@bronsa not sure if I got it. You suggest preparing a hashmap with functions including and ?

({'and (fn [x y] (and x y))} (symbol op) (= %1 "1") (= %2 "2"))

yes

meh

invoking eval like that is not a good idea

what if you will have MAAAANY functions?

it depends

on what is your input

getting one from the internet is a bad idea, yeah:D

anyway, this is out of context. We answered initial question

you don't need the macroexpand there anyway

eval will macroexpand

oh yeah? that's nice:)

eval macroexapnds?

WOWOWOW

Guys you're great

My inputs are strings like "111" "1111001" and so on

REPL is (loop (print (eval (read))), eval is (emit (analyze (macroexpand form)))

I have to put that information somewhere in my notes. Thank you @bronsa

thank you @non.dmitriy

I am still looking for solution to run a script with dependent library via single file with shebang.

#!/bin/sh

true;exec clojure -Sdeps '{:deps {my-deps-here}}' -i "$0"
true;exit

(require 'my-deps)
(println "hello")

Hey, looking for ideas on how to simplify a function

The input is a list of elements. The loop-body is to split the list into 2-element pairs and merge each pair (which I do via partition-by and map appropriate-merge-fn) The loop-end-condition is to stop when the list has only 1 element How would you execute the looping part? The clearest mechanism for me right now would be loop-recur, but I remember reading that people should try to use other functions. There’s iterate+drop-while, but that feels… clunky. (Note: I know I could use reduce; bear with me, this is an exercise.)

yeah, I though about that. Kinda smelly though:D

Also, style question. For argument validation, would you throw IllegalArgumentException or use {:pre []} assertion?

@lady3janepl you can reduce over the list of pairs and terminate the reduction using reduced

if I understood correctly

@bronsa that’s brilliant, I needed that functionality for something else 😄 but not sure it would do what I want here, let me type out an example

Let’s say list elements are integers, and the merge function is +. Then:

input: [ 1 2 3 4 5 ]
(enter loop)
after first pass: [ 3 7 5 ]
after second pass: [ 10 5 ]
after third pass: [ 15 ]
(loop terminates)
return: 15

my current code is, with type-specific adaptations removed:

(loop [xs xs]
     (if (= 1 (count xs))
       (first xs)
       (recur (map #(merge2 (first %) (second %)) (partition-all 2 xs)))))

feels a bit silly though

I'd use iterate + drop-while for that then

👍 thanks 🙂