aboutsummaryrefslogtreecommitdiff
path: root/src/interp/ptrees.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-08-09 22:51:35 +0000
committerdos-reis <gdr@axiomatics.org>2008-08-09 22:51:35 +0000
commit1687da9f3f891156c71b320f944e5c0fbaf1cbd0 (patch)
treea073231126a8058766142b5e1b15267e3ddb3c7b /src/interp/ptrees.boot
parentf176a2f516055a0a211e6dd1d05c836dd913692e (diff)
downloadopen-axiom-1687da9f3f891156c71b320f944e5c0fbaf1cbd0.tar.gz
* interp/pf2sex.boot (pf2Sex1): Handle more ASTs.
(pfType2SexOrNil): New. (pfDoc2SexOrNil): Likewise. (pfWith2Sex): Likewise. (pfAdd2Sex): Likewise. (pfWDeclare2Sex): Likewise. (pfAttribute2Sex): Likewise. (pfWIf2Sex): Likewise. (pfExport2Sex): Likewise. (pfInline2Sex): Likewise. (pfImport2Sex): Likewise. (pfQualType2Sex): Likewise. * interp/ptrees.boot (pf0InlineItems): New. * interp/i-spec2.boot (up%Import): New. (sorry): Likewise. (up%Export): Likewise. (up%Inline): Likewise. (up%With): Likewise. (up%Add): Likewise. * interp/i-intern.boot (mkAtree3): Handle %Inline, %With, %Add, and %Export. * interp/i-spec1.boot ($specialOps): Adjust. * doc/msgs/s2-us.msgs (S2IP0006): New.
Diffstat (limited to 'src/interp/ptrees.boot')
-rw-r--r--src/interp/ptrees.boot1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/interp/ptrees.boot b/src/interp/ptrees.boot
index ed40c466..3ddc9d96 100644
--- a/src/interp/ptrees.boot
+++ b/src/interp/ptrees.boot
@@ -638,6 +638,7 @@ pf0ImportItems pf == pfParts pfImportItems pf
pfInline(pfitems) == pfTree('Inline, [pfitems])
pfInline?(pf) == pfAbSynOp? (pf, 'Inline)
pfInlineItems pf == second pf -- was ==>
+pf0InlineItems pf == pfParts pfInlineItems pf
-- QualType := (Type: Type, Qual: ? Type)