v0-2-2
This commit is contained in:
+1
-1
@@ -1,6 +1,6 @@
|
||||
(import (scheme base)
|
||||
(scheme write)
|
||||
(retropikzel pffi v0-2-1 main))
|
||||
(retropikzel pffi v0-2-2 main))
|
||||
|
||||
(display "Hello from import.scm")
|
||||
(newline)
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
(import (scheme base)
|
||||
(scheme write)
|
||||
(retropikzel pffi v0-2-1 main))
|
||||
(retropikzel pffi v0-2-2 main))
|
||||
|
||||
(display 'int8)
|
||||
(display " ")
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
(import (scheme base)
|
||||
(scheme write)
|
||||
(retropikzel pffi v0-2-1 main))
|
||||
(retropikzel pffi v0-2-2 main))
|
||||
|
||||
(define p (pffi-pointer-allocate (+ (* (pffi-size-of 'uint32) 3)
|
||||
(* (pffi-size-of 'uint8) 4)
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
(import (scheme base)
|
||||
(scheme write)
|
||||
(retropikzel pffi v0-2-1 main))
|
||||
(retropikzel pffi v0-2-2 main))
|
||||
|
||||
(define p (pffi-pointer-allocate (+ (* (pffi-size-of 'uint32) 3)
|
||||
(* (pffi-size-of 'uint8) 4)
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
(import (scheme base)
|
||||
(scheme write)
|
||||
(retropikzel pffi v0-2-1 main))
|
||||
(retropikzel pffi v0-2-2 main))
|
||||
|
||||
(define p (pffi-pointer-allocate (+ (* (pffi-size-of 'uint32) 3)
|
||||
(* (pffi-size-of 'uint8) 4)
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
(import (scheme base)
|
||||
(scheme write)
|
||||
(retropikzel pffi v0-2-1 main))
|
||||
(retropikzel pffi v0-2-2 main))
|
||||
|
||||
(define p (pffi-pointer-allocate (+ (* (pffi-size-of 'uint32) 3)
|
||||
(* (pffi-size-of 'uint8) 4)
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
(import (scheme base)
|
||||
(scheme write)
|
||||
(retropikzel pffi v0-2-1 main))
|
||||
(retropikzel pffi v0-2-2 main))
|
||||
|
||||
(define original "Hello world")
|
||||
|
||||
|
||||
@@ -2,7 +2,7 @@
|
||||
(scheme write)
|
||||
(scheme process-context)
|
||||
(scheme eval)
|
||||
(retropikzel pffi v0-2-1 main))
|
||||
(retropikzel pffi v0-2-2 main))
|
||||
|
||||
(define libcurl (pffi-shared-object-auto-load (list "curl/curl.h")
|
||||
(list)
|
||||
|
||||
+1
-1
@@ -2,7 +2,7 @@
|
||||
(scheme write)
|
||||
(scheme process-context)
|
||||
(scheme eval)
|
||||
(retropikzel pffi v0-2-1 main))
|
||||
(retropikzel pffi v0-2-2 main))
|
||||
|
||||
(define libc (pffi-shared-object-auto-load (list "curl/curl.h")
|
||||
(list)
|
||||
|
||||
Reference in New Issue
Block a user