Annotation of 42BSD/ucb/lisp/pearl/alias.l, revision 1.1.1.1

1.1       root        1: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; alias.l ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
                      2: ; Aliases for various functions -- some for history's sake, some
                      3: ;    for abbreviation's sake 
                      4: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
                      5: ; Copyright (c) 1983 ,  The Regents of the University of California.
                      6: ; All rights reserved.  
                      7: ; Authors: Joseph Faletti and Michael Deering.
                      8: 
                      9: ; For history:
                     10: ;(aliasdef 'powercopy 'copy 'subr)
                     11: (aliasdef 'minform 'valform 'subr)
                     12: (aliasdef 'minprint 'valprint 'subr)
                     13: (aliasdef 'listform 'fullform 'subr)
                     14: (aliasdef 'shortform 'valform 'subr)
                     15: (aliasdef 'listprint 'fullprint 'subr)
                     16: (aliasdef 'shortprint 'valprint 'subr)
                     17: (aliasdef 'insert-db 'insertdb 'subr)
                     18: (aliasdef 'next-item 'nextitem 'subr)
                     19: (aliasdef 'remove-db 'removedb 'subr)
                     20: (aliasdef 'expanded-fetch 'expandedfetch 'subr)
                     21: (aliasdef 'symbol-e 'symbole 'subr)
                     22: (aliasdef 'combine-skels 'combineskels 'subr)
                     23: (aliasdef 'quasi-quote 'quasiquote 'subr)
                     24: (aliasdef 'define-set 'ordinal 'fsubr)
                     25: (aliasdef 'usersave 'savefresh 'subr)
                     26: (aliasdef 'user-save 'usersave 'subr)
                     27: (aliasdef 'pearl-rep-loop 'pearlreploop 'subr)
                     28: 
                     29: ; Abbreviations:
                     30: (aliasdef 'cr 'create 'fsubr)
                     31: (aliasdef 'dbcr 'dbcreate 'macro)
                     32: (aliasdef 'ppath 'path 'macro)
                     33: (aliasdef 'vp 'valprint 'subr)
                     34: (aliasdef 'fp 'fullprint 'subr)
                     35: (aliasdef 'ap 'abbrevprint 'subr)
                     36: (aliasdef 'dp 'debugprint 'subr)
                     37: (aliasdef 'pdb 'printdb 'subr)
                     38: 
                     39: ; vi: set lisp:

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.