v0-2-0

VERSION

@@ -1 +0,0 @@
-v0-1-0

composition.scm

@@ -1,6 +1,6 @@
 ((packager . "retropikzel")
  (name . "pffi")
- (version . "v0-1-0")
+ (version . "v0-2-0")
  (type . "library")
  (description . "Portable Foreign Function Interface for R7RS schemes")
  (license . "LGPL")

retropikzel/pffi/v0-2-0/chicken.scm

@@ -1,5 +1,5 @@
 (define-library
-  (retropikzel pffi v0-1-0 chicken)
+  (retropikzel pffi v0-2-0 chicken)
   (import (scheme base)
           (scheme write)
           (scheme file)

retropikzel/pffi/v0-2-0/cyclone.sld

@@ -1,5 +1,5 @@
 (define-library
-  (retropikzel pffi v0-1-0 cyclone)
+  (retropikzel pffi v0-2-0 cyclone)
   (import (scheme base)
           (scheme write)
           (scheme file)

retropikzel/pffi/v0-2-0/empty.scm

@@ -1,5 +1,5 @@
 (define-library
-  (retropikzel pffi v0-1-0 empty)
+  (retropikzel pffi v0-2-0 empty)
   (import (scheme base)
           (scheme write)
           (scheme file)

retropikzel/pffi/v0-2-0/gambit.scm

@@ -1,5 +1,5 @@
 (define-library
-  (retropikzel pffi v0-1-0 gambit)
+  (retropikzel pffi v0-2-0 gambit)
   (import (scheme base)
           (scheme write)
           (scheme file)

retropikzel/pffi/v0-2-0/gerbil.scm

@@ -1,5 +1,5 @@
 (define-library
-  (retropikzel pffi v0-1-0 gerbil)
+  (retropikzel pffi v0-2-0 gerbil)
   (import (scheme base)
           (scheme write)
           (scheme file)

retropikzel/pffi/v0-2-0/guile.scm

@@ -1,5 +1,5 @@
 (define-library
-  (retropikzel pffi v0-1-0 guile)
+  (retropikzel pffi v0-2-0 guile)
   (import (scheme base)
           (scheme write)
           (scheme file)

retropikzel/pffi/v0-2-0/main.scm

@@ -1,32 +1,32 @@
 (define-library
-  (retropikzel pffi v0-1-0 main)
+  (retropikzel pffi v0-2-0 main)
   (cond-expand
     (sagittarius
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 sagittarius)))
+              (retropikzel pffi v0-2-0 sagittarius)))
     (guile
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 guile)))
+              (retropikzel pffi v0-2-0 guile)))
     (racket
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
               (only (racket base) system-type)
-              (retropikzel pffi v0-1-0 racket)))
+              (retropikzel pffi v0-2-0 racket)))
     (stklos
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
               (stklos)
-              (retropikzel pffi v0-1-0 stklos)))
+              (retropikzel pffi v0-2-0 stklos)))
     (kawa
       (import (scheme base)
               (scheme write)
@@ -37,31 +37,31 @@
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 cyclone)))
+              (retropikzel pffi v0-2-0 cyclone)))
     (gambit
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 gambit)))
+              (retropikzel pffi v0-2-0 gambit)))
     (chicken
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 chicken)))
+              (retropikzel pffi v0-2-0 chicken)))
     (chibi
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 chibi)))
+              (retropikzel pffi v0-2-0 chibi)))
     (mit-scheme
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 mit-scheme))))
+              (retropikzel pffi v0-2-0 mit-scheme))))
   (export pffi-shared-object-auto-load
           pffi-shared-object-load
           pffi-define
@@ -78,7 +78,7 @@
           pffi-pointer-deref)
   (begin
 
-    (define library-version "v0-1-0")
+    (define library-version "v0-2-0")
     (define slash (cond-expand (windows (string #\\)) (else "/")))
 
     (define platform-file-extension

retropikzel/pffi/v0-2-0/main.sld

@@ -1,32 +1,32 @@
 (define-library
-  (retropikzel pffi v0-1-0 main)
+  (retropikzel pffi v0-2-0 main)
   (cond-expand
     (sagittarius
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 sagittarius)))
+              (retropikzel pffi v0-2-0 sagittarius)))
     (guile
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 guile)))
+              (retropikzel pffi v0-2-0 guile)))
     (racket
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
               (only (racket base) system-type)
-              (retropikzel pffi v0-1-0 racket)))
+              (retropikzel pffi v0-2-0 racket)))
     (stklos
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
               (stklos)
-              (retropikzel pffi v0-1-0 stklos)))
+              (retropikzel pffi v0-2-0 stklos)))
     (kawa
       (import (scheme base)
               (scheme write)
@@ -37,31 +37,31 @@
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 cyclone)))
+              (retropikzel pffi v0-2-0 cyclone)))
     (gambit
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 gambit)))
+              (retropikzel pffi v0-2-0 gambit)))
     (chicken
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 chicken)))
+              (retropikzel pffi v0-2-0 chicken)))
     (chibi
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 chibi)))
+              (retropikzel pffi v0-2-0 chibi)))
     (mit-scheme
       (import (scheme base)
               (scheme write)
               (scheme file)
               (scheme process-context)
-              (retropikzel pffi v0-1-0 mit-scheme))))
+              (retropikzel pffi v0-2-0 mit-scheme))))
   (export pffi-shared-object-auto-load
           pffi-shared-object-load
           pffi-define
@@ -78,7 +78,7 @@
           pffi-pointer-deref)
   (begin
 
-    (define library-version "v0-1-0")
+    (define library-version "v0-2-0")
     (define slash (cond-expand (windows (string #\\)) (else "/")))
 
     (define platform-file-extension

retropikzel/pffi/v0-2-0/racket.rkt

@@ -1,7 +1,7 @@
 #lang r7rs
 
 (define-library
-  (retropikzel pffi v0-1-0 racket)
+  (retropikzel pffi v0-2-0 racket)
   (import (scheme base)
           (scheme write)
           (scheme file)

retropikzel/pffi/v0-2-0/sagittarius.scm

@@ -1,5 +1,5 @@
 (define-library
-  (retropikzel pffi v0-1-0 sagittarius)
+  (retropikzel pffi v0-2-0 sagittarius)
   (import (scheme base)
           (scheme write)
           (scheme file)

retropikzel/pffi/v0-2-0/stklos.scm

@@ -1,5 +1,5 @@
 (define-library
-  (retropikzel pffi v0-1-0 stklos)
+  (retropikzel pffi v0-2-0 stklos)
   (import (scheme base)
           (scheme write)
           (scheme file)

test/200_import.scm

@@ -1,6 +1,6 @@
 (import (scheme base)
         (scheme write)
-        (retropikzel pffi v0-1-0 main))
+        (retropikzel pffi v0-2-0 main))
 
 (display "Hello from import.scm")
 (newline)

test/300_size-of.scm

@@ -1,6 +1,6 @@
 (import (scheme base)
         (scheme write)
-        (retropikzel pffi v0-1-0 main))
+        (retropikzel pffi v0-2-0 main))
 
 (display 'int8)
 (display " ")

test/400_pointer-allocate-free.scm

@@ -1,6 +1,6 @@
 (import (scheme base)
         (scheme write)
-        (retropikzel pffi v0-1-0 main))
+        (retropikzel pffi v0-2-0 main))
 
 (define p (pffi-pointer-allocate (+ (* (pffi-size-of 'uint32) 3)
                                     (* (pffi-size-of 'uint8) 4)

test/401_is-pointer.scm

@@ -1,6 +1,6 @@
 (import (scheme base)
         (scheme write)
-        (retropikzel pffi v0-1-0 main))
+        (retropikzel pffi v0-2-0 main))
 
 (define p (pffi-pointer-allocate (+ (* (pffi-size-of 'uint32) 3)
                                     (* (pffi-size-of 'uint8) 4)

test/402_null-pointer.scm

@@ -1,6 +1,6 @@
 (import (scheme base)
         (scheme write)
-        (retropikzel pffi v0-1-0 main))
+        (retropikzel pffi v0-2-0 main))
 
 (define p (pffi-pointer-allocate (+ (* (pffi-size-of 'uint32) 3)
                                     (* (pffi-size-of 'uint8) 4)

test/410_pointer-set-get.scm

@@ -1,6 +1,6 @@
 (import (scheme base)
         (scheme write)
-        (retropikzel pffi v0-1-0 main))
+        (retropikzel pffi v0-2-0 main))
 
 (define p (pffi-pointer-allocate (+ (* (pffi-size-of 'uint32) 3)
                                     (* (pffi-size-of 'uint8) 4)

test/500_string-to-pointer-to-string.scm

@@ -1,6 +1,6 @@
 (import (scheme base)
         (scheme write)
-        (retropikzel pffi v0-1-0 main))
+        (retropikzel pffi v0-2-0 main))
 
 (define original "Hello world")
 

test/600_pffi-define.scm

@@ -2,7 +2,7 @@
         (scheme write)
         (scheme process-context)
         (scheme eval)
-        (retropikzel pffi v0-1-0 main))
+        (retropikzel pffi v0-2-0 main))
 
 (define libcurl (pffi-shared-object-auto-load (list "curl/curl.h")
                                               "curl"