From: Michael Beck <beck@ipd.info.uni-karlsruhe.de>
Date: Sat, 1 Jul 2006 16:21:11 +0000 (+0000)
Subject: KahanSum example
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=f96ed474a97f9a0d64a926756d959413e8bddc00;p=libfirm

KahanSum example
---

diff --git a/ir/be/test/kahansum.c b/ir/be/test/kahansum.c
new file mode 100644
index 000000000..5ef0745be
--- /dev/null
+++ b/ir/be/test/kahansum.c
@@ -0,0 +1,12 @@
+float kahanSum(const float A[], int n) {
+	float sum = 0.0, C = 0.0, Y, T;
+	int i;
+
+	for (i = 0; i < n; ++i) {
+		Y = A[i] - C;
+		T = sum + Y;
+		C = T - sum - Y;
+		sum = T;
+	}
+	return sum;
+}
\ No newline at end of file