Add `dereference-pointer' to `(system foreign)'.

[bpt/guile.git] / module / system / foreign.scm

diff --git a/module/system/foreign.scm b/module/system/foreign.scm
index 9966c64..6aa2fe3 100644 (file)
--- a/module/system/foreign.scm
+++ b/module/system/foreign.scm
@@ -32,6 +32,7 @@
             null-pointer?
             make-pointer
             foreign-address
+            dereference-pointer
 
             foreign->bytevector bytevector->foreign
             foreign-set-finalizer!