CLJS-3399: :as-alias does not work with symbols (#204)

resolve-ns-alias needs to look at as-aliases. Add tests.

Author: swannodette

src/main/clojure/cljs/analyzer.cljc

@@ -917,8 +917,11 @@
   ([env name]
    (resolve-ns-alias env name (symbol name)))
   ([env name not-found]
-   (let [sym (symbol name)]
-     (get (:requires (:ns env)) sym not-found))))
+   (let [sym (symbol name)
+         {:keys [requires as-aliases]}  (:ns env)]
+     (or (get requires sym)
+         (get as-aliases sym)
+         not-found))))
 
 (defn resolve-macro-ns-alias
   ([env name]

src/test/cljs/cljs/ns_test.cljs

@@ -15,7 +15,8 @@
             [cljs.test]
             [cljs.ns-test.foo :refer [baz]]
             [clojure.set :as s :refer [intersection] :rename {intersection itsc}]
-            [cljs.analyzer :as ana])
+            [cljs.analyzer :as ana]
+            [fake.ns :as-alias fake])
   (:use [cljs.ns-test.bar :only [quux]]))
 
 (def + -)
@@ -43,3 +44,7 @@
     (is (.isArrayLike js/goog array-like))
     (is (goog/isArrayLike array-like))
     (is (goog-alias/isArrayLike array-like))))
+
+(deftest test-cljs-3399
+  (is (= ::fake/foo :fake.ns/foo)
+      (= `fake/foo `fake.ns/foo)))