zl:1 - FTP

261 globalize
single store variable and thus a single value to be returned.) The value
returned by the accessing form is, of course, affected by execution of the
storing form, but either of these forms may be evaluated any number of
times, and therefore should be free of side effects (other than the storing
action of the storing form).
The temporary variables and the store variables are generated names, as if
by gensym or gentemp, so that there is never any problem of name
clashes among them, or between them and other variables in the program.
This is necessary to make the special forms that do more than one setf in
parallel work properly. These are psetf, shiftf and rotatef.
Here are some examples of setf methods for particular forms:
• For a variable x:
o
o
(g8881)
(setq x g88(1)
x
• For (car exp):
(g8882)
(exp)
(g8883)
(progn (rplaca g8882 g88(3) g88(3)
(car g88(2)
• For (supseq seq s e):
(g8884 g8885 g88(6)
(seq s e)
(g8887)
(progn (replace g8884 g8887 :start1 g8885 :end1 g88(6)
g88(7)
(subseq g8884 g8885 g88(6)
globalize name &optional package Function
Establish a symbol named name in package and export it. If this causes
any name conflicts with symbols with the same name in packages that use
package, instead of signalling an error make an attempt to resolve the
name conflict automatically. Print an explanation of what is being done on
zl:error-output.
globalize is useful for patching up an existing package structure. For example,
if a new function is added to the Lisp language globalize can be
used to add its name to the global package and hence make it accessible to
I