Import Upstream version 3a1upstream/3a1

1 files changed, 3 insertions, 3 deletions

diff --git a/wttree.scm b/wttree.scm
index cb7ca13..238d372 100644
--- a/wttree.scm
+++ b/wttree.scm
@@ -29,7 +29,7 @@
 ;;; software shall duly acknowledge such use, in accordance with the
 ;;; usual standards of acknowledging credit in academic research.
 ;;;
-;;; 4. MIT has made no warrantee or representation that the operation
+;;; 4. MIT has made no warranty or representation that the operation
 ;;; of this software will be error-free, and MIT is under no
 ;;; obligation to provide any services, by way of maintenance, update,
 ;;; or otherwise.
@@ -84,11 +84,11 @@
 ;;; ONLY these procedures (and TEST at the end of the file) will be
 ;;; (re)defined in your system.
 ;;;
-
+;@
 (define make-wt-tree-type #f)
 (define number-wt-type #f)
 (define string-wt-type #f)
-
+;@
 (define make-wt-tree #f)
 (define singleton-wt-tree #f)
 (define alist->wt-tree #f)