home *** CD-ROM | disk | FTP | other *** search
/ ftp.cs.arizona.edu / ftp.cs.arizona.edu.tar / ftp.cs.arizona.edu / icon / historic / v941.tgz / icon.v941src.tar / icon.v941src / ipl / packs / skeem / skuser.icn < prev    next >
Text File  |  2000-07-29  |  1KB  |  46 lines
  1. ############################################################################
  2. #
  3. #    Name:    skuser.icn
  4. #
  5. #    Title:    Scheme in Icon
  6. #
  7. #    Author: Bob Alexander
  8. #
  9. #    Date:    March 23, 1995
  10. #
  11. #    Description: see skeem.icn
  12. #
  13. ############################################################################
  14.  
  15. #
  16. # skeem -- Scheme in Icon
  17. #
  18. # Initialization list for user-defined functions
  19. #
  20.  
  21. #
  22. # Initialize
  23. #
  24. procedure InitUser()
  25.    #
  26.    # List of user-defined inialization functions to call at
  27.    # skeem-initialization-time.
  28.    #
  29.    # Add entries to this list for your user-defined primitive functions
  30.    # and syntaxes.
  31.    #
  32.    # Null entries are okay.  The list is primed with the following
  33.    # entries:
  34.    #
  35.    #  - InitExtra:   Some extra functions and syntaxes that are not
  36.    #             in the Scheme standard.
  37.    #
  38.    #  - InitUser:    An entry for an initialization function that can
  39.    #             be provided by a user (InitUser is not defined in
  40.    #             skeem).
  41.    #
  42.    return [
  43.      InitExtra,    # extra functions provided -- skextra.icn
  44.      InitUser]    # user-defined primitive functions (not provided)
  45. end
  46.