Merge pull request #32 from playX18/ap-capy-support

feat: add CapyScheme support

Author: ktakashi

README.md

@@ -342,6 +342,7 @@ it behave as if nothing is passed.
 - Racket (plt-r6rs v8.16 or later)
 - Guile (3.0.10 or later)
 - Chez Scheme (v10.0.0 or later)
+- Capy Scheme (0.1.0 or later)
 
 The below implementations are no loger supported due to the inactiveness or
 officially declared to be archived.
@@ -368,6 +369,11 @@ initialisation function, however the loaded pointer still indicates NULL.
 On Larceny, GC may move pointers so converting bytevector uses wrapper
 technique the same as Vicare. Thus the same limitation is applied to it.
 
+## Capy
+
+Capy Scheme does not support C callbacks due to the CPS conversion. 
+If you try to call `c-callback` implementation-restriction-violation is raised.
+
 ## Misc (Memo)
 
 ### Why no Ypsilon

examples/Makefile

@@ -43,3 +43,6 @@ guile: prepare prepare-guile
 	LD_LIBRARY_PATH=$(LDPATH):tests; guile --no-auto-compile -l .guile.rc -L ../src callback.scm
 	rm .guile.rc
 
+capy: prepare
+	LD_LIBRARY_PATH=.:tests; capy -log:info -L ../src struct.scm
+	LD_LIBRARY_PATH=.:tests; capy -log:info -L ../src variable.scm

src/pffi/bv-pointer.capy.sls

@@ -0,0 +1,3 @@
+(library (pffi bv-pointer)
+    (export bytevector->pointer)
+    (import (core foreign)))