Question

我正在

Warning: specified :main without including it in :aot.
If you only need AOT for your uberjar, consider adding :aot :all into your
:uberjar profile instead.

这是我的project.clj

(defproject korma-test "0.1.0-SNAPSHOT"
  :description "korma db test"
  :url "http://example.com/FIXME"
  :license {:name "Eclipse Public License"
            :url "http://www.eclipse.org/legal/epl-v10.html"}
  :dependencies [[org.clojure/clojure "1.5.1"]
                 [korma "0.3.0-RC5"]
                 ]
   :main korma-test.core)

这里是core.clj

(ns korma-test.core
  (require [korma.db :as kdb])
  (require [clojure.string :as str])
  (:use [clojure.tools.cli])
  (:import java.util.Date)
  (:gen-class)
)
; Parses for options passed in on the command line.

(defn parse-opts
  "Using the newer cli library, parses command line args."
  [args]
  (cli args
       (optional ["-host" "Informix host" :default "localhost"] )
       (optional ["-port" "Informix host's service port" :default "1498"] )
       (required ["-username" "user name"] )
       (required ["-password" "password"] )
       (optional ["-database" "Informix host's database" :default "stores7/ministores.dbs" ] )))


(defn -main 
  [& args]
  (if (= 0 (count args))
    (println "Usage: korma-test --host <host-name> --port <port-num> --database <db-name>")
    (let [opts (parse-opts args)
          start-time (str (Date.))]
          (def db-config {:classname "com.informix.jdbc.IfxDriver"
                          :subprotocol "postgresql"
                          :subname (format "//%s:(:port opts)/%s" 
                                           (:host opts)
                                           (:database opts))
                          :user (:user opts)
                          :password (:password opts)})

          (kdb/defdb db db-config)

    (println opts))))

我对于放在哪里感到困惑：aot以满足警告。

Answer 1

我可以在没有任何警告的情况下宣誓它，但无论如何你现在需要在你的project.clj中添加一个：aot指令见here

以下作品

<强> project.clj

(defproject korma-test "0.1.0-SNAPSHOT"
  :description "korma db test"
  :url "http://example.com/FIXME"
  :license {:name "Eclipse Public License"
            :url "http://www.eclipse.org/legal/epl-v10.html"}
  :dependencies [[org.clojure/clojure "1.5.1"]
                 [korma "0.3.0-RC5"]
                 [org.clojure/tools.cli "0.3.1"]]
   :main korma-test.core
   :aot [korma-test.core])

<强> core.clj

(ns korma-test.core
  (:require [korma.db :as kdb])
  (:require [clojure.string :as str])
  (:require [clojure.tools.cli :as c])
  (:import java.util.Date)
  (:gen-class))

; Parses for options passed in on the command line.

    (defn parse-opts
      "Using the newer cli library, parses command line args."
      [args]
      (c/cli args
           [ ["-host" "Informix host" :default "localhost"] 
            ["-port" "Informix host's service port" :default "1498"] 
            ["-username" "user name"] 
            ["-password" "password"] 
            ["-database" "Informix host's database" :default "stores7/ministores.dbs" ]]))


(defn -main 
  [& args]
  (if (= 0 (count args))
    (println "Usage: korma-test --host <host-name> --port <port-num> --database <db-name>")
    (let [opts (parse-opts args)
          start-time (str (Date.))
          db-config {:classname "com.informix.jdbc.IfxDriver"
                          :subprotocol "postgresql"
                          :subname (format "//%s:(:port opts)/%s" 
                                           (:host opts)
                                           (:database opts))
                          :user (:user opts)
                          :password (:password opts)}]
          (kdb/defdb db db-config)
    (println opts))))

如何解决leiningen：aot警告

1 个答案: