aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-op1.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/br-op1.boot')
-rw-r--r--src/interp/br-op1.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-op1.boot b/src/interp/br-op1.boot
index 0aab1e84..9ccfde7d 100644
--- a/src/interp/br-op1.boot
+++ b/src/interp/br-op1.boot
@@ -530,7 +530,7 @@ dbShowOpAllDomains(htPage,opAlist,which) ==
pred := simpOrDumb(predicate,LASSQ(conname,domOriginAlist) or true)
domOriginAlist := insertAlist(conname,pred,domOriginAlist)
--the following is similar to "domainsOf" but do not sort immediately
- u := [COPY key for key in HKEYS _*HASCATEGORY_-HASH_*
+ u := [COPY key for [key,:.] in entries _*HASCATEGORY_-HASH_*
| LASSQ(rest key,catOriginAlist)]
for pair in u repeat
[dom,:cat] := pair