X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/b30602ffd8e090c68e99a37ec5e4e7403debd7ce..7721f9d25945759e012f67181e69550a3a222eb0:/buildtools/Cmake/test_prog/prog_stackgrowth.c

diff --git a/buildtools/Cmake/test_prog/prog_stackgrowth.c b/buildtools/Cmake/test_prog/prog_stackgrowth.c
new file mode 100644
index 0000000000..c1a9e7804f
--- /dev/null
+++ b/buildtools/Cmake/test_prog/prog_stackgrowth.c
@@ -0,0 +1,30 @@
+/* Copyright (c) 2010. The SimGrid Team.
+ * All rights reserved.                                                     */
+
+/* This program is free software; you can redistribute it and/or modify it
+ * under the terms of the license (GNU LGPL) which comes with this package. */
+
+#include <stdio.h>
+#include <stdlib.h>
+static int iterate = 10;
+static int growsdown(int *x)
+{
+    auto int y;
+    y = (x > &y);
+    if (--iterate > 0)
+        y = growsdown(&y);
+    if (y != (x > &y))
+        exit(1);
+    return y;
+}
+int main(int argc, char *argv[])
+{
+    FILE *f;
+    auto int x;
+    if ((f = fopen("conftestval", "w")) == NULL)
+        exit(1);
+    fprintf(f, "%s\n", growsdown(&x) ? "down" : "up");;
+    fclose(f);
+    exit(0);
+	return 1;
+}