diff options
| author | David Barksdale <amatus@amatus.name> | 2014-10-25 13:29:31 -0500 |
|---|---|---|
| committer | David Barksdale <amatus@amatus.name> | 2014-10-25 20:45:42 -0500 |
| commit | 4837266947ad8426db4f56fd1da57484216c5a74 (patch) | |
| tree | e0835abc6760b45c070ece384a8dc91a5bffbd9a /src/cljs/gnunet_web/filesharing.cljs | |
| parent | 06494613aeb26643b5e2261fce3ae7593376d056 (diff) | |
Optimize client lib
Diffstat (limited to 'src/cljs/gnunet_web/filesharing.cljs')
| -rw-r--r-- | src/cljs/gnunet_web/filesharing.cljs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/cljs/gnunet_web/filesharing.cljs b/src/cljs/gnunet_web/filesharing.cljs index 951b403..ad58330 100644 --- a/src/cljs/gnunet_web/filesharing.cljs +++ b/src/cljs/gnunet_web/filesharing.cljs @@ -93,9 +93,9 @@ (defn progress-callback [cls info-pointer] (when-let [info (parse-progress-info info-pointer)] - ;; Since this is a function we registered we can call it with - ;; non-C-compatible typed arguments and they get passed strait through. - (js/Runtime.dynCall "vi" (:cctx info) (array info)) + ;; Grab the reference to our callback function so we can call it with + ;; cljs typed data. + ((aget js/Runtime.functionPointers (dec (/ (:cctx info) 2))) info) (:cctx info))) (def fs |