clone a specific WebKit release

Author: swannodette

ci/install_jsc.sh

@@ -1,7 +1,7 @@
 #!/usr/bin/env bash
 if [ ! -d WebKit ]
 then
-  git clone --depth=1 git://git.webkit.org/WebKit.git WebKit;
+  git clone -b Safari-611.1.5.1 --depth=1 git@github.com:WebKit/WebKit.git WebKit;
   cd WebKit;
   Tools/Scripts/build-jsc --jsc-only;
   cd ..

src/main/cljs/cljs/core.cljs

@@ -2918,7 +2918,7 @@ reduces them without incurring seq initialization"
   "Bitwise shift right"
   [x n] (cljs.core/bit-shift-right x n))
 
-(defn bit-shift-right-zero-fill
+(defn ^int bit-shift-right-zero-fill
   "DEPRECATED: Bitwise shift right with zero fill"
   [x n] (cljs.core/bit-shift-right-zero-fill x n))
 
@@ -5394,7 +5394,7 @@ reduces them without incurring seq initialization"
             _ (pv-aset r 0 embed)]
         (recur (- ll 5) r)))))
 
-(defn- push-tail [pv level parent tailnode]
+(defn- push-tail [pv ^int level parent tailnode]
   (let [ret (pv-clone-node parent)
         subidx (bit-and (bit-shift-right-zero-fill (dec (.-cnt pv)) level) 0x01f)]
     (if (== 5 level)