Add a function's address to the metadata of deserialized functions

CHANGELOG.md

@@ -2,6 +2,8 @@
 All notable changes to this project will be documented in this file. This change log follows the conventions of [keepachangelog.com](http://keepachangelog.com/).
 
 ## [Unreleased]
+### Added
+- An `::ffi/address` key to deserialized function pointers' metadata
 
 ## [0.1.184] - 2021-09-30
 ### Fixed

src/clj/coffi/ffi.clj

@@ -368,13 +368,15 @@
 (defmethod mem/deserialize* ::fn
   [addr [_fn arg-types ret-type & {:keys [raw-fn?]}]]
   (when-not (mem/null? addr)
-    (-> addr
-        (downcall-handle
-         (method-type arg-types ret-type)
-         (function-descriptor arg-types ret-type))
-        (downcall-fn arg-types ret-type)
-        (cond->
-            (not raw-fn?) (make-serde-wrapper arg-types ret-type)))))
+    (vary-meta
+      (-> addr
+          (downcall-handle
+           (method-type arg-types ret-type)
+           (function-descriptor arg-types ret-type))
+          (downcall-fn arg-types ret-type)
+          (cond->
+              (not raw-fn?) (make-serde-wrapper arg-types ret-type)))
+      assoc ::address addr)))
 
 ;;; Static memory access