KahanSum example

diff --git a/ir/be/test/kahansum.c b/ir/be/test/kahansum.c
new file mode 100644 (file)
index 0000000..5ef0745
--- /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