diff options
| author | dos-reis <gdr@axiomatics.org> | 2007-10-15 06:25:45 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2007-10-15 06:25:45 +0000 |
| commit | 438fc2b3dca328c5e9a10e75ccb6ec25d8cf782e (patch) | |
| tree | 12838da1f18dd216c6a6048c11dd8796ac17c03a /src/interp/htsetvar.boot.pamphlet | |
| parent | ed60f495f0dfe5e3d66362bba84bcbae1cd1d0b1 (diff) | |
| download | open-axiom-438fc2b3dca328c5e9a10e75ccb6ec25d8cf782e.tar.gz | |
* Makefile.pamphlet (<<server.clisp>>): Remove.
(server.$(FASLEXT)): New rule.
* as.boot.pamphlet (asytran): Use VMREAD.
* c-util.boot.pamphlet (intersectionContour): Use assoc.
* g-error.boot.pamphlet (argumentDataError): Use read_-line.
* g-opt.boot.pamphlet: Use assoc.
* ht-util.boot.pamphlet: Likewise.
* htsertvar.boot.pamphlet: Likewise.
* server.boot.pamphlet: User read_-line.
Diffstat (limited to 'src/interp/htsetvar.boot.pamphlet')
| -rw-r--r-- | src/interp/htsetvar.boot.pamphlet | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/htsetvar.boot.pamphlet b/src/interp/htsetvar.boot.pamphlet index 4cf78735..f1b38f7d 100644 --- a/src/interp/htsetvar.boot.pamphlet +++ b/src/interp/htsetvar.boot.pamphlet @@ -115,7 +115,7 @@ listOfStrings2String u == htShowSetPage(htPage, branch) == setTree := htpProperty(htPage, 'setTree) $path := [branch,:TAKE(- LASTATOM setTree,$path)] - setData := ASSOC(branch, setTree) + setData := assoc(branch, setTree) null setData => systemError('"No Set Data") st := setData.setType |