home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / bsd_srcs / usr.bin / lisp / lispnews / text0278.txt < prev    next >
Encoding:
Text File  |  1985-11-10  |  1.3 KB  |  45 lines
  1. --------------------  for franz -----------------------------
  2. In franz lisp, 'prinlevel' is a variable controlling the
  3. depth to which the top-level is to print lists, 'prinlength'
  4. controls how many elements of a list are printed by the
  5. top-level. For either variable, a value of 'nil' represents
  6. infinite depth or length.
  7.  
  8. If franz is printing expressions as '&' then 
  9. prinlevel has a value of 0.
  10.  
  11. you should
  12. (setq prinlevel nil)
  13. to print lists of arbitrary depth.
  14. (see Appendix B of the Franz manual)
  15.  
  16. ----------------  for CMU --------------------
  17.  
  18. In CMULisp, tlprint does the top-level printing, and this is
  19. defined, (in, at least the 2 systems that I use) as:
  20.  
  21.     '(lambda (x) (printlev x 4))
  22.  
  23. if your functions always return &, then perhaps someone has defined
  24. it as '(lambda (x) (printlev x 0))
  25.  
  26. if you want to change it you may either:
  27. 1.  (sstatus translink nil)
  28.     (defun tlprint (x) (printlev x <some-large-number>))
  29.  
  30. OR,  the solution  I prefer:
  31.  
  32. 2.  (load 'toplevel)  ; unnecessary in some installations.
  33.     (defun tlprint (x) (top-print x))
  34.   
  35. causing 'prinlevel' and 'prinlength' to have
  36. the effect described above for the franz system.
  37.  
  38.  NB: the tempting solution:
  39.  (defun tlprint (x) (printlev x prinlevel))
  40.  FAILS in the case that prinlevel is nil
  41.  
  42.  
  43. -johnson@udel-ee
  44.  
  45.