X-Git-Url: https://git.gag.com/?p=fw%2Faltos;a=blobdiff_plain;f=src%2Fcheck-stack;fp=src%2Fcheck-stack;h=82680b88647e4ab8436753caf04d23b27fade369;hp=0000000000000000000000000000000000000000;hb=210dbaa23cdacf3a6f2d6e23493e96ee2ac9bca7;hpb=8cce307bb3156584ba17ae5a787f645dfee5fb94

diff --git a/src/check-stack b/src/check-stack
new file mode 100755
index 00000000..82680b88
--- /dev/null
+++ b/src/check-stack
@@ -0,0 +1,14 @@
+#!/bin/sh
+HEADER=$1
+MEM=$2
+
+HEADER_STACK=`awk '/#define AO_STACK_START/ {print $3}' $HEADER | nickle`
+MEM_STACK=`awk '/Stack starts at/ {print $4}' $MEM | nickle`
+
+if [ "$HEADER_STACK" -lt "$MEM_STACK" ]; then
+	MIN=0x`nickle -e "$MEM_STACK # 16"`
+	echo "Set AO_STACK_START to at least $MIN"
+	exit 1
+else
+	exit 0
+fi