Add a package dependency on the sha package. This should fix the Travis CI tests against Racket 6.12, as well as making it simpler to use raco pkg install anarki.

Author: rocketnia

.travis.yml

@@ -27,9 +27,14 @@ env:
 
     # Versions prior to 6.3 don't define the `racket/random` module,
     # which is needed for news.arc and one of the tests.
+    
+    # Versions prior to 6.11 have a bug in unmarshaling namespace
+    # information, which prevents us from having ac.scm statically
+    # require `crypto-random-bytes` from `racket/random` or
+    # `ssl-connect` from `openssl`.
 
     # This is the earliest known supported version.
-    - RACKET_VERSION=6.3
+    - RACKET_VERSION=6.11
 
     # This is the latest known supported version.
     - RACKET_VERSION=6.12

README.markdown

@@ -8,7 +8,7 @@ privileges, just submit your first pull request or ask on [**Arc Language Forum*
 
 ### Installation
 
-First [install **Racket** (v6.8 or later)](http://racket-lang.org), then
+First [install **Racket** (v6.11 or later)](http://racket-lang.org), then
 
     $ raco pkg install sha
     $ git clone http://github.com/arclanguage/anarki

ac.rkt

@@ -26,11 +26,6 @@
   (only-in "brackets.rkt" bracket-readtable)
 
   (for-syntax racket/base))
-; This module also uses `dynamic-require` for the following
-; dependencies:
-;
-; (only-in openssl ssl-connect)
-; (only-in racket/random crypto-random-bytes)
 
 (provide (all-defined-out))
 
@@ -1132,15 +1127,6 @@
                          (lambda () (tcp-connect host port)))))
 
 (xdef ssl-connect (lambda (host port)
-                    ; dynamic-require is slow as molasses. don't use in hot code!
-                    ;
-                    ; ; NOTE: There was a bug in unmarshaling namespace
-                    ; ; information from compiled Racket code that was
-                    ; ; fixed in Racket 6.11. On that version and later,
-                    ; ; we can replace this with
-                    ; ; `(require (only-in openssl ssl-connect))`.
-                    ; (define ssl-connect
-                    ;   (dynamic-require 'openssl 'ssl-connect))
                     (ar-init-socket
                       (lambda () (ssl-connect host port)))))
 
@@ -1179,14 +1165,6 @@
                        str))))
 
 (define (ar-tmpname)
-  ; dnymaic-require is slowness itself. don't use in hot code!
-  ;
-  ; ; NOTE: There was a bug in unmarshaling namespace information from
-  ; ; compiled Racket code that was fixed in Racket 6.11. On that
-  ; ; version and later, we can replace this with
-  ; ; `(require (only-in racket/random crypto-random-bytes))`.
-  ; (define crypto-random-bytes
-  ;   (dynamic-require 'racket/random 'crypto-random-bytes))
   (string-append "/tmp/"
     (list->string
       (map (lambda (byte)

arc.arc

@@ -1726,11 +1726,7 @@ protocol requires them."
     (c "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
      nc 62
      s (newstring n)
-     i 0
-     ; Don't use dynamic-require. It it slooooow
-;     crypto-random-bytes
-;       ($.dynamic-require 'racket/random 'crypto-random-bytes)
-    )
+     i 0)
     (while (< i n)
       (let x ($.bytes-ref ($.crypto-random-bytes 1) 0)
         (unless (> x 247)

info.rkt

@@ -3,7 +3,7 @@
 (define version "0.0")
 (define pkg-desc "Community-managed variant of the Arc dialect of Lisp")
 
-(define deps '("base"))
+(define deps '("base" "sha"))
 (define build-deps '("racket-doc" "scribble-lib"))
 
 (define scribblings '(("scribblings/anarki.scrbl" ())))