aboutsummaryrefslogtreecommitdiff
path: root/src/interp/as.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/as.boot')
-rw-r--r--src/interp/as.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/as.boot b/src/interp/as.boot
index 114696ba..bf51cee0 100644
--- a/src/interp/as.boot
+++ b/src/interp/as.boot
@@ -900,7 +900,7 @@ asyTypeJoinPartPred x ==
asyTypeJoinItem x ==
result := asyTypeUnit x
- isLowerCaseLetter (PNAME opOf result).0 =>
+ isLowerCaseLetter PNAME(opOf result).0 =>
$opStack := [[['ATTRIBUTE,result],:$predlist],:$opStack]
$conStack := [[result,:$predlist],:$conStack]