4ca839a064
GCC gives
12:35:54 janneke@dundal:~/src/mes/wip-m2 [env]
$ gcc scaffold/local-static-array.c
12:36:01 janneke@dundal:~/src/mes/wip-m2 [env]
$ ./a.out
hello local static
hello local static
12:36:04 janneke@dundal:~/src/mes/wip-m2 [env]
M2-Planet gives
12:36:04 janneke@dundal:~/src/mes/wip-m2 [env]
$ kaem --verbose --strict --file scaffold/local-static-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-static-array.c -o scaffold/local-static-array.M1
scaffold/local-static-array.c:29:static is not a defined symbol
Subprocess error 256
ABORTING HARD
[1]12:36:07 janneke@dundal:~/src/mes/wip-m2 [env]
* scaffold/local-static-array.c: New file.
* scaffold/local-static-array.kaem: New file.
43 lines
1.1 KiB
C
43 lines
1.1 KiB
C
/*
|
|
* 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
|
|
test (char *string)
|
|
{
|
|
static char local_static[32];
|
|
if (string != 0)
|
|
strcpy (local_static, string);
|
|
eputs (local_static);
|
|
}
|
|
|
|
int
|
|
main ()
|
|
{
|
|
test ("hello local static\n");
|
|
test (0);
|
|
return 0;
|
|
}
|