From 16fc19ee8e84c572b61e763f25e2ccff50deac3d Mon Sep 17 00:00:00 2001
From: John Clements <clements@racket-lang.org>
Date: Tue, 18 Feb 2014 11:39:04 -0800
Subject: [PATCH] cleanup: - added .gitignore - moved sine-play into examples -
 changed require paths to collection-relative - a few comments

---
 .gitignore                                             | 2 ++
 rhs/rhs.rkt                                            | 3 +++
 rsc3-sine-play.rkt => rsc3/examples/rsc3-sine-play.rkt | 0
 rsc3/main.rkt                                          | 9 ++++-----
 sosc/bytevector.rkt                                    | 9 ++++++---
 sosc/sosc.rkt                                          | 3 +--
 6 files changed, 16 insertions(+), 10 deletions(-)
 create mode 100644 .gitignore
 rename rsc3-sine-play.rkt => rsc3/examples/rsc3-sine-play.rkt (100%)

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..38a4087
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,2 @@
+compiled/
+*~
diff --git a/rhs/rhs.rkt b/rhs/rhs.rkt
index a2ef23f..66a0739 100644
--- a/rhs/rhs.rkt
+++ b/rhs/rhs.rkt
@@ -28,6 +28,9 @@ Licensed under GPL (2 or 3? FIXME)
 (define mod remainder)
 |#
 
+;; JBC, 2014-- looks like most of these library functions have
+;; equivalents in Racket....
+
 
 ;; prelude.scm ;;;;;;;;;;;;;;;;;;;;;;
 
diff --git a/rsc3-sine-play.rkt b/rsc3/examples/rsc3-sine-play.rkt
similarity index 100%
rename from rsc3-sine-play.rkt
rename to rsc3/examples/rsc3-sine-play.rkt
diff --git a/rsc3/main.rkt b/rsc3/main.rkt
index 99262f5..00a4bae 100644
--- a/rsc3/main.rkt
+++ b/rsc3/main.rkt
@@ -1,12 +1,11 @@
 #lang racket
 
-
 (require
   rnrs
-  "../rhs/rhs.rkt"
-  "../sosc/bytevector.rkt"
-  "../sosc/transport.rkt"
-  "../sosc/sosc.rkt"
+  rhs/rhs
+  sosc/bytevector
+  sosc/transport
+  sosc/sosc
   (prefix-in srfi: srfi/27)
   (prefix-in srfi: srfi/19))
 
diff --git a/sosc/bytevector.rkt b/sosc/bytevector.rkt
index 843c942..6537311 100644
--- a/sosc/bytevector.rkt
+++ b/sosc/bytevector.rkt
@@ -1,15 +1,18 @@
 #lang racket
 
 (require rnrs
-	"../rhs/rhs.rkt"
-	rnrs/bytevectors-6
-	rnrs/io/ports-6)
+         rhs/rhs
+         rnrs/bytevectors-6
+         rnrs/io/ports-6)
 
 (provide (all-defined-out)
          put-bytevector
          get-bytevector-n
          bytevector-length)
 
+;; JBC-2014 -- looks like all of these have
+;; equivalents in Racket...
+
 ;; bytevector -> (port -> any) -> any
 (define with-input-from-bytevector
   (lambda (b f)
diff --git a/sosc/sosc.rkt b/sosc/sosc.rkt
index 7579d67..5efd182 100644
--- a/sosc/sosc.rkt
+++ b/sosc/sosc.rkt
@@ -4,13 +4,12 @@
 
 (require
   rnrs
-  "../rhs/rhs.rkt"
+  rhs/rhs
   "bytevector.rkt"
   rnrs/bytevectors-6 ;; TODO - should be provided by bytevector.rkt
   rnrs/io/ports-6
   )
 
-
 (provide message
          bundle
          encode-osc