A few more stray "racunit"s.

This commit is contained in:
Eli Barzilay 2010-05-26 15:21:55 -04:00
parent 28dce6996a
commit 5c702976c2
6 changed files with 10 additions and 10 deletions

View File

@ -216,7 +216,7 @@
=> '(#"1 test passed\n" #"2 tests passed\n")
)
;; RacUnit stuff
;; RackUnit stuff
;; (examples that should fail modified to ones that shouldn't)
#|

View File

@ -22,7 +22,7 @@
(define all-rackunit-tests
(test-suite
"All RacUnit Tests"
"All RackUnit Tests"
check-tests
base-tests
check-info-tests

View File

@ -2,22 +2,22 @@
;;; <check-util-test.rkt> ---- Tests for check-util
;;; Time-stamp: <2009-06-11 17:03:21 noel>
;;;
;;; Copyright (C) 2003 by Noel Welsh.
;;; Copyright (C) 2003 by Noel Welsh.
;;;
;;; This file is part of RacUnit.
;;; This file is part of RackUnit.
;;; RacUnit is free software; you can redistribute it and/or
;;; RackUnit is free software; you can redistribute it and/or
;;; modify it under the terms of the GNU Lesser General Public
;;; License as published by the Free Software Foundation; either
;;; version 2.1 of the License, or (at your option) any later version.
;;; RacUnitis distributed in the hope that it will be useful,
;;; RackUnit is distributed in the hope that it will be useful,
;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
;;; Lesser General Public License for more details.
;;; You should have received a copy of the GNU Lesser General Public
;;; License along with RacUnit; if not, write to the Free Software
;;; License along with RackUnit; if not, write to the Free Software
;;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
;;; Author: Noel Welsh <noelwelsh@yahoo.com>

View File

@ -10,7 +10,7 @@
;; really badly wrong.
(: check (All (a) ((a a -> Boolean) a a -> Boolean)))
;; Simple check function as RacUnit doesn't work in Typed Scheme (yet)
;; Simple check function as RackUnit doesn't work in Typed Scheme (yet)
(define (check f a b)
(if (f a b)
#t

View File

@ -5,7 +5,7 @@
scheme/unsafe/ops)
(: check (All (a) ((a a -> Boolean) a a -> Boolean)))
;; Simple check function as RacUnit doesn't work in Typed Scheme (yet)
;; Simple check function as RackUnit doesn't work in Typed Scheme (yet)
(define (check f a b)
(if (f a b)
#t

View File

@ -11,7 +11,7 @@
;; really badly wrong.
(: check (All (a) ((a a -> Boolean) a a -> Boolean)))
;; Simple check function as RacUnit doesn't work in Typed Scheme (yet)
;; Simple check function as RackUnit doesn't work in Typed Scheme (yet)
(define (check f a b)
(if (f a b)
#t