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 89593899..53f2aa4c 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 CONSP sex => - RPLACA(sex, packageTran CAR sex) - RPLACD(sex, packageTran CDR sex) + RPLACA(sex, packageTran first sex) + RPLACD(sex, packageTran rest sex) sex sex |