aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-object.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-04-30 14:27:31 +0000
committerdos-reis <gdr@axiomatics.org>2011-04-30 14:27:31 +0000
commitbd5f5b0df93361d31592738fb18d77a275f04bc9 (patch)
treee2b46b5d5ded0265990ef24f4bf2ddb9640e7fc4 /src/interp/i-object.boot
parent6661a9aa8e79dc934bde807293857f2dfc0eca6f (diff)
downloadopen-axiom-bd5f5b0df93361d31592738fb18d77a275f04bc9.tar.gz
more cleanup
Diffstat (limited to 'src/interp/i-object.boot')
-rw-r--r--src/interp/i-object.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/i-object.boot b/src/interp/i-object.boot
index a8049f29..74359a51 100644
--- a/src/interp/i-object.boot
+++ b/src/interp/i-object.boot
@@ -438,8 +438,8 @@ srcPosDisplay(sp) ==
col := srcPosColumn sp
dots :=
col = 0 => '""
- fillerSpaces(col, '".")
- sayBrightly [fillerSpaces(#s, '" "), dots, '"^"]
+ fillerSpaces(col, char ".")
+ sayBrightly [fillerSpaces(#s, char " "), dots, '"^"]
true