diff options
Diffstat (limited to 'src/interp/g-timer.boot')
| -rw-r--r-- | src/interp/g-timer.boot | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/interp/g-timer.boot b/src/interp/g-timer.boot index 025f1050..49f73575 100644 --- a/src/interp/g-timer.boot +++ b/src/interp/g-timer.boot @@ -90,9 +90,9 @@ makeLongStatStringByProperty _ total := total + n timestr := normalizeStatAndStringify n str := makeStatString(str,timestr,ab,flag) - total := STRCONC(normalizeStatAndStringify total,'" ", units) + total := strconc(normalizeStatAndStringify total,'" ", units) str = '"" => total - STRCONC(str, '" = ", total) + strconc(str, '" = ", total) normalizeStatAndStringify t == RNUMP t => @@ -119,8 +119,8 @@ roundStat t == makeStatString(oldstr,time,abb,flag) == time = '"" => oldstr opening := (flag = 'long => '"("; '" (") - oldstr = '"" => STRCONC(time,opening,abb,'")") - STRCONC(oldstr,'" + ",time,opening,abb,'")") + oldstr = '"" => strconc(time,opening,abb,'")") + strconc(oldstr,'" + ",time,opening,abb,'")") peekTimedName() == IFCAR $timedNameStack |