From 9ddb4389f182909d5f683d921d4a5c86cdeaa9ab Mon Sep 17 00:00:00 2001
From: "Jan (janneke) Nieuwenhuizen" <janneke@gnu.org>
Date: Sat, 9 Jan 2021 12:33:26 +0100
Subject: [PATCH] scaffold: Add local-array.c.

GCC gives

    12:32:06 janneke@dundal:~/src/mes/wip-m2 [env]
    $ gcc scaffold/local-array.c
    12:34:27 janneke@dundal:~/src/mes/wip-m2 [env]
    $ ./a.out
    hello local
    12:34:31 janneke@dundal:~/src/mes/wip-m2 [env]

M2-Planet gives

    12:34:31 janneke@dundal:~/src/mes/wip-m2 [env]
    $ kaem --verbose --strict --file scaffold/local-array.kaem
     +> M2-Planet --debug --architecture x86 -f lib/mes/globals.c -f lib/linux/x86-mes-m2/mini.c -f lib/mes/mini-write.c -f lib/string/strlen.c -f lib/string/strcpy.c -f lib/mes/eputs.c -f scaffold/local-array.c -o scaffold/local-array.M1
    scaffold/local-array.c:29:ERROR in collect_local
    Missing ;
    Subprocess error 256
    ABORTING HARD
    [1]12:34:42 janneke@dundal:~/src/mes/wip-m2 [env]

* scaffold/local-array.c: New file.
* scaffold/local-array.kaem: New file.
---
 scaffold/local-array.c    | 34 ++++++++++++++++++++++
 scaffold/local-array.kaem | 60 +++++++++++++++++++++++++++++++++++++++
 2 files changed, 94 insertions(+)
 create mode 100644 scaffold/local-array.c
 create mode 100644 scaffold/local-array.kaem

diff --git a/scaffold/local-array.c b/scaffold/local-array.c
new file mode 100644
index 00000000..2800a583
--- /dev/null
+++ b/scaffold/local-array.c
@@ -0,0 +1,34 @@
+/*
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2021 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#include <stdio.h>
+#include <string.h>
+
+/* for GCC --with-system-libc */
+#define eputs(x) fputs (x, stderr)
+
+int
+main ()
+{
+  char local[32];
+  strcpy (local, "hello local\n");
+  eputs (local);
+  return 0;
+}
diff --git a/scaffold/local-array.kaem b/scaffold/local-array.kaem
new file mode 100644
index 00000000..42d431f8
--- /dev/null
+++ b/scaffold/local-array.kaem
@@ -0,0 +1,60 @@
+#! /bin/sh
+# Copyright © 2019,2021 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+#
+# This file is part of GNU Mes.
+#
+# GNU Mes is free software; you can redistribute it and/or modify it
+# under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or (at
+# your option) any later version.
+#
+# GNU Mes is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+
+# Usage:
+# kaem --verbose --strict --file scaffold/local-array.kaem
+# scaffold/local-array
+
+mes_cpu=${mes_cpu:-x86}
+stage0_cpu=${stage0_cpu:-x86}
+
+M2-Planet                                       \
+    --debug                                     \
+    --architecture ${stage0_cpu}                \
+    -f lib/mes/globals.c                        \
+    -f lib/linux/${mes_cpu}-mes-m2/_exit.c      \
+    -f lib/linux/${mes_cpu}-mes-m2/_write.c     \
+    -f lib/mes/mini-write.c                     \
+    -f lib/string/strlen.c                      \
+    -f lib/string/strcpy.c                      \
+    -f lib/mes/eputs.c                          \
+    -f scaffold/local-array.c                   \
+    -o scaffold/local-array.M1
+
+blood-elf -f scaffold/local-array.M1 -o scaffold/local-array.blood-elf-M1
+
+M1                                              \
+    --architecture ${stage0_cpu}                \
+    --little-endian                             \
+    -f lib/m2/${mes_cpu}/${mes_cpu}_defs.M1     \
+    -f lib/${mes_cpu}-mes/${mes_cpu}.M1         \
+    -f lib/linux/${mes_cpu}-mes-m2/crt1.M1      \
+    -f scaffold/local-array.M1                  \
+    -f scaffold/local-array.blood-elf-M1        \
+    -o scaffold/local-array.hex2
+
+hex2                                            \
+    --architecture ${stage0_cpu}                \
+    --little-endian                             \
+    --base-address 0x1000000                    \
+    -f lib/m2/${mes_cpu}/ELF-${mes_cpu}.hex2    \
+    -f scaffold/local-array.hex2                \
+    -o scaffold/local-array
+
+echo Now run: scaffold/scaffold/local-array
+./scaffold/scaffold/local-array