summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--arith.c4
2 files changed, 6 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index ff689243..fa75afb6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2012-04-24 Kaz Kylheku <kaz@kylheku.com>
+
+ * arith.c (plus): Fixed broken (+ fixnum char) case.
+
2012-04-20 Kaz Kylheku <kaz@kylheku.com>
Fixes for configuring and building in a separate directory.
diff --git a/arith.c b/arith.c
index 1d784a6e..5b57faa1 100644
--- a/arith.c
+++ b/arith.c
@@ -372,8 +372,8 @@ tail:
}
case TAG_PAIR(TAG_NUM, TAG_CHR):
{
- cnum a = c_chr(anum);
- wchar_t b = c_num(bnum);
+ cnum a = c_num(anum);
+ wchar_t b = c_chr(bnum);
cnum sum = a + b;
if (sum < 0 || sum > 0x10FFFF)