home *** CD-ROM | disk | FTP | other *** search
/ Education Sampler 1992 [NeXTSTEP] / Education_1992_Sampler.iso / Programming / Source / winterp-1.13 / doc / README.XLISP < prev    next >
Encoding:
Text File  |  1991-10-06  |  10.2 KB  |  272 lines
  1. # 
  2. # WINTERP Copyright 1989, 1990, 1991 Hewlett-Packard Company (by Niels Mayer).
  3. # XLISP version 2.1, Copyright (c) 1989, by David Betz.
  4. #
  5. # Permission to use, copy, modify, distribute, and sell this software and its
  6. # documentation for any purpose is hereby granted without fee, provided that
  7. # the above copyright notice appear in all copies and that both that
  8. # copyright notice and this permission notice appear in supporting
  9. # documentation, and that the name of Hewlett-Packard, David Betz and
  10. # Niels Mayer not be used in advertising or publicity pertaining to distribution
  11. # of the software without specific, written prior permission.  Hewlett-Packard,
  12. # David Betz and Niels Mayer makes no representations about the suitability of
  13. # this software and documentation for any purpose.  It is provided "as is"
  14. # without express or implied warranty.
  15. #
  16.  
  17. NOTE: to make a standalone XLISP 2.1, use rule "lisp:" in
  18. ./winterp/src-server/xlisp/Makefile.{hpux,generic,sparc}. All the original
  19. XLISP files are in directory ../src-server/xlisp and all the original XLISP
  20. example files are in ../examples/{xlisp-1.6,xlisp-2.1}. Note that the XLISP
  21. code has been #ifdef'd for WINTERP. Doing "make lisp" out of one of the
  22. aforementioned makefiles should build you a standard XLISP 2.1 binary
  23. because that make rule doesn't define cpp symbol -DWINTERP...
  24.  
  25.                 -- Niels Mayer.
  26. ==============================================================================
  27.  
  28. XLISP 2.0 is an experimental programming language combining some of
  29. the features of Common Lisp with an object-oriented extension
  30. capability.  It was implemented to allow experimentation with
  31. object-oriented programming on small computers.  It was written and is
  32. copyrighted by David Micheal Betz.  See xlisp.doc for more information
  33.  
  34. INFO2.0 contains information about changes from Xlisp1.7.  I don't
  35. have any other change lists.
  36.  
  37. Before attempting to recompile any of the modules, make sure that the
  38. proper symbol is defined at the top of 'xlisp.h' where the machine
  39. type is specified (right under the copyright notice) and modify the
  40. Makefile for your machine.  Watch out for the *.h.* and the *.c.*
  41. names when you transfer files to the smaller machines.
  42.  
  43. AZTEC_AMIGA    /* Amiga, AZTEC C compiler */
  44. DR        /* Atari ST, Digital Research C compiler */
  45. LATTICE        /* Atari ST, Lattice C compiler */
  46. MWC        /* Atari ST, Mark Williams C compiler */
  47. UNIX        /* BSD and AT&T */
  48. AZTEC_MAC    /* Macintosh, AZTEC C compiler */
  49. LSC        /* Macintosh, Lightspeed C compiler */
  50. _TURBOC_    /* MS-DOS, large model, Turbo C compiler */
  51. AZTEC_LM    /* MS-DOS, large model, AZTEC C compiler */
  52. MSC        /* MS-DOS, large model, Microsoft C compiler */
  53.  
  54. I added the UNIX support (from the 1.7 Unix support).  I have only
  55. tried the UNIX version.  I don't have binaries.  I put together the
  56. Makefile to run on UNIX.  You will need to fix up something
  57. appropriate for the other systems.  If something is missing please let
  58. me know.  I will collect support for other compiler/OS combinations.
  59.  
  60. Brad Davis
  61. {ihnp4, decvax, ut-sally}!utah-cs!cai!b-davis
  62. b-davis@cs.utah.edu
  63. b-davis@cai.utah.edu
  64.  
  65. ==============================================================================
  66. File INFO2.0 -- information on new features added bet v1.7 --> v2.0
  67. ==============================================================================
  68.  
  69. This is a list of new features in XLISP version 2.0 as of 16Dec87:
  70.  
  71. Symbols have two value cells, one for normal values and one for
  72. function values.  SETQ sets the normal value, DEFUN sets the
  73. functional value.
  74.  
  75. The most important change from version 1.7 to 2.0 of XLISP is that
  76. it is now possible to save XLISP's workspace between sessions.  This
  77. feature isn't necessarily part of every implementation of XLISP 2.0
  78. since it is controlled by a compile-time conditional.  Check the file
  79. 'xlisp.h' to see if the symbol SAVERESTORE is defined for your machine
  80. before you try to use these functions.
  81.  
  82. The &key lambda list keyword is now supported as are initialization forms
  83. for &optional, &key and &aux parameters.  The supplied-p variables are
  84. also supported for &optional and &key parameters.
  85.  
  86. New functions and special forms:
  87.  
  88. (save filename)        ; *** NOT IN ALL 2.0 IMPLEMENTATIONS ***
  89. (restore filename)    ; *** NOT IN ALL 2.0 IMPLEMENTATIONS ***
  90. (subseq string start [end])
  91. (open name &key :direction)
  92. (vector [expr]...)
  93. (block name [expr]...)
  94. (return-from name [value])
  95. (tagbody [tag|expr]...)
  96. (psetq [sym value]...)
  97. (flet ([sym lambda-list [body]...]...) [expr]...)
  98. (labels ([sym lambda-list [body]...]...) [expr]...)
  99. (macrolet ([sym lambda-list [body]...]...) [expr]...)
  100. (unwind-protect expr [expr]...)
  101. (when test [expr]...)
  102. (unless test [expr]...)
  103. (loop [expr]...)
  104. (progv symbols values [expr]...)
  105. (pprint expr [stream])
  106. (string< str1 str2 &key :start1 :end1 :start2 :end2)
  107. (string= str1 str2 &key :start1 :end1 :start2 :end2)
  108. (string> str1 str2 &key :start1 :end1 :start2 :end2)
  109. (string<= str1 str2 &key :start1 :end1 :start2 :end2)
  110. (string/= str1 str2 &key :start1 :end1 :start2 :end2)
  111. (string>= str1 str2 &key :start1 :end1 :start2 :end2)
  112. (string-lessp str1 str2 &key :start1 :end1 :start2 :end2)
  113. (string-equal str1 str2 &key :start1 :end1 :start2 :end2)
  114. (string-greaterp str1 str2 &key :start1 :end1 :start2 :end2)
  115. (string-not-greaterp str1 str2 &key :start1 :end1 :start2 :end2)
  116. (string-not-equal str1 str2 &key :start1 :end1 :start2 :end2)
  117. (string-not-lessp str1 str2 &key :start1 :end1 :start2 :end2)
  118. (string-trim bag string)
  119. (string-left-trim bag string)
  120. (string-right-trim bag string)
  121. (string-upcase string &key :start :end)
  122. (string-downcase string &key :start :end)
  123. (nstring-upcase string &key :start :end)
  124. (nstring-downcase string &key :start :end)
  125. (symbol-function sym)
  126. (send obj msg [expr]...)
  127. (send-super msg [expr]...)
  128. (integerp expr)
  129. (floatp expr)
  130. (stringp expr)
  131. (arrayp expr)
  132. (streamp expr)
  133. (objectp expr)
  134. (fboundp expr)
  135. (characterp expr)
  136. (int-char expr)
  137. (char-int expr)
  138. (read-byte [stream])
  139. (write-byte expr [stream])
  140. (make-string-input-stream string [start [end]])
  141. (make-string-output-stream)
  142. (get-output-stream-string stream)
  143. (get-output-stream-list stream)
  144. (get-lambda-expression closure)
  145. (gcd expr1 expr2)
  146. (macroexpand form)
  147. (macroexpand-1 form)
  148. (format stream fmt &rest args)
  149.  
  150. The only FORMAT directives that are supported are ~A, ~S, ~% and ~~
  151. for now.  You can use NIL as the stream argument to get output to
  152. *standard-output* and T to have a string built and returned as the
  153. value of the FORMAT function.  Obviously, you can also use and stream
  154. as the value of the stream argument.  Using anything other than T will
  155. cause FORMAT to return NIL.
  156.  
  157. There is now a real character data type.  All functions that are
  158. supposed to return characters (like READ-CHAR) now do.
  159.  
  160. The reader is now capable of handling both single and multiple escapes.
  161. This means that it is possible to read the symbol |aBc| and get a symbol
  162. with the print name "aBc".  The backslash can also be used as a single
  163. escape.  The same symbol could have been written \aB\c.
  164.  
  165. The read table now supports the character types :SESCAPE for single
  166. escape and :MESCAPE for multiple escapes.
  167.  
  168. The reader also supports the reader macros:
  169.  
  170.     #:symbol    an uninterned symbol
  171.     #| ... |#   a comment
  172.     #Onumber    an octal number
  173.     #Bnumber    a binary number
  174.  
  175. The following symbols preserve a history of values used by the
  176. read-eval-print loop:
  177.  
  178.     -        the current input expression
  179.     +        the last expression read
  180.     ++        the previous value of +
  181.     +++        the previous value of ++
  182.     *        the result of the last evaluation
  183.     **        the previous value of *
  184.     ***        the previous value of **
  185.  
  186. The global symbol *PRINT-CASE* was added to control the output case of
  187. symbols.  Its default value is :UPCASE which will cause symbols to
  188. be printed in uppercase.  You can change it to :DOWNCASE to get symbols
  189. to print in lowercase.
  190.  
  191. I have added the functions FIRST, SECOND, THIRD, FOURTH and REST as
  192. synonyms for CAR, CADR, CADDR, CADDDR and CDR.
  193.  
  194. Changed the default value of *print-case* to :upcase.
  195.  
  196. Added macros to init.lsp for:
  197.  
  198.     (defvar sym &optional val)
  199.     (defparameter sym val)
  200.     (defconstant sym val)
  201.  
  202. These symbols control the format in which numbers are printed.  They
  203. should be set to printf format strings.
  204.  
  205.     *integer-format*    (default is "%d" or "%ld")
  206.     *float-format*     (default is "%g")
  207.  
  208. (substr string start [length]) is replaced by:
  209.     (subseq string start [end])
  210.  
  211. (openi name) is replaced by: (open name :direction :input)
  212. (openo name) is replaced by: (open name :direction :output)
  213.  
  214. OPEN, LOAD, SAVE and RESTORE take strings or symbols as file names.
  215. If a symbol is given, the print name of the symbol is used as the base
  216. filename and the default extension (if any) is appended.
  217.  
  218. Renamed MEM to ROOM and TRANSCRIPT to DRIBBLE.
  219.  
  220. Added a trace facility.  The evaluator will now print trace
  221. information for function and macro calls.  The names of the
  222. functions and macros to trace should be in a list that is stored
  223. as the value of *TRACELIST*.
  224.  
  225. Added macro definitions for TRACE and UNTRACE to "init.lsp".
  226. Trace output goes to the stream that is the value of *TRACE-OUTPUT*.
  227.  
  228. Removed the hard wired prompting from READ.  There is no longer
  229. an unmatched left paren counter, but the debug level prompt remains.
  230.  
  231. The symbols *ERROR-OUTPUT* and *DEBUG-IO* have been added and
  232. are bound to streams that are used for error output and debug
  233. i/o respectively.
  234.  
  235. The symbol *GC-HOOK* has been added.  If it is bound to a function
  236. of two arguments, that function will be called after the garbage
  237. collector runs.  The two parameters are the total number of nodes
  238. and the number free after the garbage collection.
  239.  
  240. Added the function (COMMAND-POINT-SIZE <n>) to the Macintosh version
  241. to set the point size for the text in the command window.  The default
  242. point size is 9.
  243.  
  244. The SEND-SUPER function replaces the :SENDSUPER message to objects.
  245. All messages must be sent using either the SEND function or the
  246. SEND-SUPER function.  In other words, the syntax:
  247.  
  248.     (Class :new '(a b c))
  249.  
  250. must now be written as:
  251.  
  252.     (send Class :new '(a b c))
  253.  
  254. and
  255.  
  256.     (self :sendsuper :msg 1 2 3)
  257.  
  258. must now be written as:
  259.  
  260.     (send-super :msg 1 2 3)
  261.  
  262. This is because the CAR of a form is no longer evaluated.  To get the
  263. effect of having the function position evaluated, use the FUNCALL form.
  264.  
  265. The syntax of LOAD has changed from:
  266.  
  267.     (load name [verbose-flag [print-flag]])
  268.  
  269. to:
  270.  
  271.     (load name &key :verbose :print)
  272.