diff options
Diffstat (limited to 'src/interp/profile.boot')
-rw-r--r-- | src/interp/profile.boot | 2 |
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 |