Corrected printed representation of undefined values: they are _NOT_ useless
authorMichael R. Blair <edu/mit/csail/zurich/ziggy>
Thu, 25 May 1995 18:25:54 +0000 (18:25 +0000)
committerMichael R. Blair <edu/mit/csail/zurich/ziggy>
Thu, 25 May 1995 18:25:54 +0000 (18:25 +0000)
since they supply synchronization points and help programmers to avoid ill-
behaved implementation dependencies.

v7/src/runtime/unpars.scm

index 8ea171d80af72855b12ff7963bec8a288610f2f0..3079fa089eff69bac36aeef9c0af6d3a760ff6fd 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: unpars.scm,v 14.42 1995/04/12 21:14:45 cph Exp $
+$Id: unpars.scm,v 14.43 1995/05/25 18:25:54 ziggy Exp $
 
 Copyright (c) 1988-95 Massachusetts Institute of Technology
 
@@ -320,7 +320,7 @@ MIT in each case. |#
   (cond ((not object) (*unparse-string "#f"))
        ((null? object) (*unparse-string "()"))
        ((eq? object #t) (*unparse-string "#t"))
-       ((undefined-value? object) (*unparse-string "#[useless-value]"))
+       ((undefined-value? object) (*unparse-string "#[unspecified-return-value]"))
        ((eq? object lambda-auxiliary-tag) (*unparse-string "#!aux"))
        ((eq? object lambda-optional-tag) (*unparse-string "#!optional"))
        ((eq? object lambda-rest-tag) (*unparse-string "#!rest"))