diff options
Diffstat (limited to 'src/interp/packtran.boot')
| -rw-r--r-- | src/interp/packtran.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/packtran.boot b/src/interp/packtran.boot index 260cac44..52f34d7c 100644 --- a/src/interp/packtran.boot +++ b/src/interp/packtran.boot @@ -46,8 +46,8 @@ packageTran sex == EQ(_*PACKAGE_*, SYMBOL_-PACKAGE sex) => sex INTERN STRING sex cons? sex => - RPLACA(sex, packageTran first sex) - RPLACD(sex, packageTran rest sex) + sex.first := packageTran first sex + sex.rest := packageTran rest sex sex sex |