home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / s / s48.zip / MISC / SGOL-RUN.S < prev    next >
Text File  |  1992-06-17  |  213b  |  12 lines
  1. ; Copyright (c) 1992 by Richard Kelsey and Jonathan Rees.  See file COPYING.
  2.  
  3.  
  4. (define (%unspecified)
  5.   (if #f #f))
  6.  
  7. (define (!= x y)
  8.   (not (= x y)))
  9.  
  10. (define (%tuple . rest)
  11.   (list->vector (cons 'tuple rest)))
  12.