init

Author: chclock

hello_tf.ss

@@ -1,9 +1,4 @@
-(load-shared-object "libtensorflow.so")
-
-;;TF_CAPI_EXPORT extern const char* TF_Version();
-(define TF_Version
-  (foreign-procedure "TF_Version" ()
-    string))
+(import (tensorflow tensorflow))
 
 (define (main)
   (printf "Hello from TensorFlow C library version ~a\n" (TF_Version)))

package.sc

@@ -0,0 +1,13 @@
+(("name" . "tensorflow")
+("version" . "0.0.1")
+("description" . "Scheme language bindings for TensorFlow")
+("keywords")
+("author" 
+    ("quenchi" "chclock"))
+("license" . "MIT")
+("homepage" . "https://github.com/guenchi/tensorflow")
+("private" . #t)
+("scripts" 
+    ("run" . "scheme --script"))
+("dependencies")
+("devDependencies"))

tensorflow/tensorflow.sc

@@ -0,0 +1,12 @@
+(library (tensorflow tensorflow)
+  (export
+    TF_Version)
+  (import (scheme))
+
+  (define init (load-shared-object "libtensorflow.so"))
+
+  ;;TF_CAPI_EXPORT extern const char* TF_Version();
+  (define TF_Version
+    (foreign-procedure "TF_Version" ()
+      string))
+)