Stklos fixes

foreign/c.sld

@@ -145,8 +145,8 @@
                     cpointer-null?
                     cpointer-data
                     cpointer-data-set!
-                    cpointer-set!
-                    cpointer-ref
+                    cpointer-set-abs!
+                    cpointer-ref-abs
                     c-size-of
                     void?))
       (export ; calculate-struct-size-and-offsets

foreign/c/primitives/stklos.scm

@@ -100,16 +100,16 @@
 
 (define c-bytevector-u8-set!
   (lambda (pointer offset value)
-  (cpointer-set! pointer :uint8 value offset)))
+  (cpointer-set-abs! pointer :uint8 value offset)))
 
 (define c-bytevector-u8-ref
   (lambda (pointer offset)
-    (cpointer-ref pointer :uint8 offset)))
+    (cpointer-ref-abs pointer :uint8 offset)))
 
 (define c-bytevector-pointer-set!
   (lambda (pointer offset value)
-    (cpointer-set! pointer :pointer value offset)))
+    (cpointer-set-abs! pointer :pointer value offset)))
 
 (define c-bytevector-pointer-ref
   (lambda (pointer offset)
-    (cpointer-ref pointer :pointer offset)))
+    (cpointer-ref-abs pointer :pointer offset)))