aboutsummaryrefslogtreecommitdiff
path: root/src/interp/profile.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/profile.boot')
-rw-r--r--src/interp/profile.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/profile.boot b/src/interp/profile.boot
index 7c1a8a9b..f59297f0 100644
--- a/src/interp/profile.boot
+++ b/src/interp/profile.boot
@@ -49,7 +49,7 @@ profileTran alist ==
for [opSig,:info] in alist repeat
op := opOf opSig
sig := KAR KDR opSig
- HPUT($profileHash,op,[[sig,:info],:HGET($profileHash,op)])
+ tableValue($profileHash,op) := [[sig,:info],:HGET($profileHash,op)]
[[key,:HGET($profileHash,key)] for key in mySort HKEYS $profileHash]
profileRecord(label,name,info) == --name: info is var: type or op: sig