zoukankan      html  css  js  c++  java
  • windows配置cider和clojure clj

    windows配置cider和clojure clj

    windows配置cider和clojure clj

    1 clj windows

    因为leiningen 启动速度太慢了,linux下的clj启动速度挺好的,就是clj命令行对windows支持还在测试中,有一个第三方实现的clj windows项目,用于支持windows下的clojure cli。项目地址clj-windows。不过在配合cider的过程中有命令行启动参数的问题,需要修改cider的代码,在此记录下,用于备忘。

    linux的启动命令:

    clj -Sdeps '{:deps {cider/cider-nrepl {:mvn/version "0.20.0"} }}' -e '(require (quote cider-nrepl.main)) (cider-nrepl.main/init ["cider.nrepl/cider-middleware"])'
    

    Windows的启动命令:

    clj -Sdeps "{:deps {cider/cider-nrepl {:mvn/version "0.20.0"} }}" -e "(require (quote cider-nrepl.main)) (cider-nrepl.main/init ["cider.nrepl/cider-middleware"])"
    

    主要是把单引号改为双引号,嵌套的双引号进行转义。

    2 cider.el的修改

    首先是cider-jack-in-params函数:

    ('clojure-cli (format cider-clojure-cli-parameters
                          (concat
                           "["
                           (mapconcat
                            (apply-partially #'format ""%s"") ;; 改这里
                            (cider-jack-in-normalized-nrepl-middlewares)
                            ", ")
                           "]")))
    
    ;; 改为
    (apply-partially #'format "\"%s\"")
    

    然后是 cider-clojure-cli-jack-in-dependencies函数:

    (concat
     global-opts
     (unless (seq-empty-p global-opts) " ")
     "-Sdeps '{:deps {" ;; 修改这里和下面的引号
     (mapconcat #'identity
                (seq-map (lambda (dep) (format "%s {:mvn/version "%s"}" (car dep) (cadr dep))) dependencies)
                " ")
     "}}' "
     params)
    
    ;; ---> 改引号为下面的形式
    "-Sdeps "{:deps {"
    (mapconcat #'identity
               (seq-map (lambda (dep) (format "%s {:mvn/version \"%s\"}" (car dep) (cadr dep))) dependencies)
               " ")
    "}}" "
    
    

    修改上面两个地方后,cider就可以启动clj cli了,可以正确解析deps.edn依赖。

    作者: ntestoc

    Created: 2019-03-16 周六 19:57

  • 相关阅读:
    Ubuntu 16.04 安装 Wireshark分析tcpdump的pcap包——sudo apt install wireshark-qt
    tcpdump dns流量监控
    ubuntu dig timeout解决方法,dnscat执行失败也是这个原因
    dns tunnel C&C
    “借贷宝”到底是不是坑?——“借贷宝”注册送现金营销模式分析?【已亲测可以无条件提现成功】
    借贷宝注册提现详细攻略:注册送20元,邀请好友再各送20元,亲测可无条件提现(附提现、到账截图)
    滴滴专车司机苹果手机ios客户端可以下载了
    优步UBER司机全国各地奖励政策汇总:北京、上海、广州、深圳、佛山、天津、南京、武汉、成都、重庆、济南、西安、宁波、青岛、长沙、苏州
    北京优步UBER司机B组最新奖励政策、高峰翻倍奖励、行程奖励、金牌司机奖励【每周更新】
    优步UBER司机奖励政策:含高峰、翻倍、行程、金牌司机、保底奖励(持续更新...)
  • 原文地址:https://www.cnblogs.com/ntestoc/p/10544064.html
Copyright © 2011-2022 走看看