1 files changed, 13 insertions, 0 deletions
diff --git a/proto/ctests/psum.c b/proto/ctests/psum.c
new file mode 100644
index 0000000..4ea6a03
--- /dev/null
+++ b/proto/ctests/psum.c
@@ -0,0 +1,13 @@
+long f() {
+	long n, n0, s;
+	
+	s = 0;
+	n = 1234567;
+	for (;;) {
+		n0 = n - 1;
+		s = s + n;
+		if (!n0) break;
+		n = n0;
+	}
+	return s;
+}