suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

require typo, mostly

Browse Source 
svn: r15088
This commit is contained in:
Eli Barzilay 2009-06-05 08:16:37 +00:00
parent 86fb1ea500
commit e73ed5c35e
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/2htdp/utest/ball2.ss
View File

@ -1,6 +1,6 @@
#lang scheme/gui #lang scheme/gui
(require "../2htdp/universe.ss") (require 2htdp/universe)
(define-struct unistate (active passive) #:transparent) (define-struct unistate (active passive) #:transparent)

4
collects/2htdp/utest/player
View File

@ -1,5 +1,5 @@
#! /bin/sh #! /bin/sh
#| #| -*- scheme -*-
exec mred -qu "$0" ${1+"$@"} exec mred -qu "$0" ${1+"$@"}
|# |#
@ -11,6 +11,6 @@ exec mred -qu "$0" ${1+"$@"}
(unless (= (vector-length argv) 1) (unless (= (vector-length argv) 1)
(error 'player "name of one player expected: $ ./player name")) (error 'player "name of one player expected: $ ./player name"))
(make-player 200 (string->symbol (vector-ref argv 0))) (make-player 200 (string->symbol (vector-ref argv 0)))