- Gpc - gnu.de

Compilation succeeded, but uses GPC don't work
by Paul Dufresne 06 Mar '21

06 Mar '21

Ok, I'd like to report that with the patch you sent me privately, I was able to compile https://github.com/hebisch/gpc=20 combined with ftp://ftp.gnu.org/gnu/gcc/gcc-3.4.6/gcc-core-3.4.6.tar.bz2 using Ubuntu 20.10 compiler: was to say default but: gcc (GCC) 9.3.1 20200430 (for GNAT Community 2020 20200818) paul@jacko:~/gpc$ gpc --version gpc 20070904, based on gcc-3.4.6 paul@jacko:~/gpc$ /usr/local/bin/gcc --version gcc (GCC) 3.4.6 I did had to edit p/doc/hr/gpc.texi to begins: -------------------------------------------------- \input texinfo @setfilename gpc-hr.info @documentencoding iso-8859-2 @settitle GNU Pascal priru<E8>nik. @c We use Latin 2 charset for hr_HR language. @set charset iso-8859-2 ----------------- and p/doc/es/gpcs.texi to begins: ----------------------- \input texinfo @setfilename gpcs.info @documentencoding iso-8859-1 @settitle Est<E1>ndar de Codificaci<F3>n GNU Pascal @c Copyright (C) 2001-2006 Free Software Foundation, Inc. @c @c Authors: Frank Heckenbach <mailto:frank@pascal.gnu.de> @c Peter Gerwinski <mailto:peter@gerwinski.de> @c Nicola Girardi <mailto:nicola@g-n-u.de> @c @c Remember to update this when you save @set lastupdate 2006-02-02 @direntry * Est<E1>ndares de Codificaci<F3>n Pascal: (gpcs). Est<E1>ndares de codificaci<F3>n GNU Pascal. @end direntry ----------------------------- So I moved @documentencoding before @settitle when it was using some special characters... but I now see emacs did transform the characters in the document too. And now I can: paul@jacko:~/gpc$ rm a.out hello paul@jacko:~/gpc$ gpc -o hello ../gpc2/gcc-3.4.6/gcc/p/demos/hello.pas paul@jacko:~/gpc$ ls -lh total 548K -rwxrwxr-x 1 paul paul 546K mar 6 14:21 hello paul@jacko:~/gpc$ ./hello Hello, world. paul@jacko:~/gpc$ gpc ../gpc2/gcc-3.4.6/gcc/p/demos/readdirdemo.pas ../gpc2/gcc-3.4.6/gcc/p/demos/readdirdemo.pas:31: erreur: module/unit interface `GPC' could not be imported paul@jacko:~/gpc$ LANG=C gpc ../gpc2/gcc-3.4.6/gcc/p/demos/readdirdemo.pas ../gpc2/gcc-3.4.6/gcc/p/demos/readdirdemo.pas:31: error: module/unit interface `GPC' could not be imported paul@jacko:~/gpc$ Will need to figure out what to do to make that working.

2 3

../../gpc1/gcc-3.4.6/gcc/unwind-dw2.c:1031: error: dereferencing pointer to incomplete type
by Paul Dufresne 06 Mar '21

06 Mar '21

paul@jacko:~/gpc1-build$ LANG=C make make[1]: Entering directory '/home/paul/gpc1-build/libiberty' make[2]: Entering directory '/home/paul/gpc1-build/libiberty/testsuite' make[2]: Nothing to be done for 'all'. make[2]: Leaving directory '/home/paul/gpc1-build/libiberty/testsuite' make[1]: Leaving directory '/home/paul/gpc1-build/libiberty' make[1]: Entering directory '/home/paul/gpc1-build/intl' make[1]: Nothing to be done for 'all'. make[1]: Leaving directory '/home/paul/gpc1-build/intl' make[1]: Entering directory '/home/paul/gpc1-build/gcc' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[1]: Circular libgcc.a <- pascal dependency dropped. make \ CFLAGS="-g -O2 -W -Wall -Wwrite-strings -Wstrict-prototypes -Wmissing-prototypes -pedantic -Wno-long-long " \ CONFIG_H="tconfig.h ../../gpc1/gcc-3.4.6/gcc/../include/ansidecl.h" TM_H="tm.h ../../gpc1/gcc-3.4.6/gcc/config/i386/biarch64.h ../../gpc1/gcc-3.4.6/gcc/config/i386/i386.h ../../gpc1/gcc-3.4.6/gcc/config/i386/unix.h ../../gpc1/gcc-3.4.6/gcc/config/i386/att.h ../../gpc1/gcc-3.4.6/gcc/config/dbxelf.h ../../gpc1/gcc-3.4.6/gcc/config/elfos.h ../../gpc1/gcc-3.4.6/gcc/config/svr4.h ../../gpc1/gcc-3.4.6/gcc/config/linux.h ../../gpc1/gcc-3.4.6/gcc/config/i386/x86-64.h ../../gpc1/gcc-3.4.6/gcc/config/i386/linux64.h ../../gpc1/gcc-3.4.6/gcc/defaults.h insn-constants.h insn-flags.h" \ INCLUDES="-I. -I. -I../../gpc1/gcc-3.4.6/gcc -I../../gpc1/gcc-3.4.6/gcc/. -I../../gpc1/gcc-3.4.6/gcc/../include " \ MAKEOVERRIDES= \ -f libgcc.mk all make[2]: Entering directory '/home/paul/gpc1-build/gcc' for d in libgcc 32 libgcc/32; do \ if [ -d $d ]; then true; else /bin/sh ../../gpc1/gcc-3.4.6/gcc/mkinstalldirs $d; fi; \ done if [ -f stmp-dirs ]; then true; else touch stmp-dirs; fi /home/paul/gpc1-build/gcc/xgcc -B/home/paul/gpc1-build/gcc/ -B/usr/local/x86_64-unknown-linux-gnu/bin/ -B/usr/local/x86_64-unknown-linux-gnu/lib/ -isystem /usr/local/x86_64-unknown-linux-gnu/include -isystem /usr/local/x86_64-unknown-linux-gnu/sys-include -O2 -DIN_GCC -W -Wall -Wwrite-strings -Wstrict-prototypes -Wmissing-prototypes -Wold-style-definition -isystem ./include -fPIC -g -DHAVE_GTHR_DEFAULT -DIN_LIBGCC2 -D__GCC_FLOAT_NOT_NEEDED -I. -I. -I../../gpc1/gcc-3.4.6/gcc -I../../gpc1/gcc-3.4.6/gcc/. -I../../gpc1/gcc-3.4.6/gcc/../include -fexceptions -c ../../gpc1/gcc-3.4.6/gcc/unwind-dw2.c -o libgcc/./unwind-dw2.o ../../gpc1/gcc-3.4.6/gcc/unwind-dw2.c: In function `uw_frame_state_for': ../../gpc1/gcc-3.4.6/gcc/unwind-dw2.c:1031: error: dereferencing pointer to incomplete type make[2]: *** [libgcc.mk:236: libgcc/./unwind-dw2.o] Error 1 make[2]: Leaving directory '/home/paul/gpc1-build/gcc' make[1]: *** [Makefile:1228: libgcc.a] Error 2 make[1]: Leaving directory '/home/paul/gpc1-build/gcc' make: *** [Makefile:23375: all-gcc] Error 2 paul@jacko:~/gpc1-build$ "The “dereferencing pointer to incomplete type” error commonly occurs in C when one tries to dereference a type (usually a struct) that is: not declared at all. declared, but not defined. The error in the first bullet point occurs because C cannot find the struct that is being dereferenced. The reason for this could be that the struct may not have been declared, or that the user made a typographical error in the struct’s name" from: https://www.educative.io/edpresso/resolving-the-dereferencing-pointer-to-in… At this stage, it seems to use generated xgcc to compile itself... a bit weird it get errors at this stage to me. Will investigate a bit more later.

2 2

/usr/include/linux/errno.h:1:23: asm/errno.h: No such file or directory
by Paul Dufresne 06 Mar '21

06 Mar '21

I fixed the following with: (On Ubuntu) sudo apt-get install gcc-multilib paul@jacko:~/gpc1-build$ LANG=C make make[1]: Entering directory '/home/paul/gpc1-build/libiberty' make[2]: Entering directory '/home/paul/gpc1-build/libiberty/testsuite' make[2]: Nothing to be done for 'all'. make[2]: Leaving directory '/home/paul/gpc1-build/libiberty/testsuite' make[1]: Leaving directory '/home/paul/gpc1-build/libiberty' make[1]: Entering directory '/home/paul/gpc1-build/intl' make[1]: Nothing to be done for 'all'. make[1]: Leaving directory '/home/paul/gpc1-build/intl' make[1]: Entering directory '/home/paul/gpc1-build/gcc' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' cd ../../gpc1/gcc-3.4.6/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.4.6" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR_FLAGS="rc" RTSFLAGS="" GPC_DESTDIR="../.." AR="ar" RANLIB="ranlib" RANLIB_TEST="" generated-files make[2]: Entering directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[2]: Nothing to be done for 'generated-files'. make[2]: Leaving directory '/home/paul/gpc1/gcc-3.4.6/gcc/p/rts' make[1]: Circular libgcc.a <- pascal dependency dropped. /home/paul/gpc1-build/gcc/xgcc -B/home/paul/gpc1-build/gcc/ -B/usr/local/x86_64-unknown-linux-gnu/bin/ -B/usr/local/x86_64-unknown-linux-gnu/lib/ -isystem /usr/local/x86_64-unknown-linux-gnu/include -isystem /usr/local/x86_64-unknown-linux-gnu/sys-include -O2 -DIN_GCC -W -Wall -Wwrite-strings -Wstrict-prototypes -Wmissing-prototypes -Wold-style-definition -isystem ./include -I. -I. -I../../gpc1/gcc-3.4.6/gcc -I../../gpc1/gcc-3.4.6/gcc/. -I../../gpc1/gcc-3.4.6/gcc/../include -g0 -finhibit-size-directive -fno-inline-functions -fno-exceptions -fno-zero-initialized-in-bss -fno-unit-at-a-time -fno-omit-frame-pointer -fno-asynchronous-unwind-tables \ -c ../../gpc1/gcc-3.4.6/gcc/crtstuff.c -DCRT_BEGIN \ -o crtbegin.o In file included from /usr/include/bits/errno.h:26, from /usr/include/errno.h:28, from ../../gpc1/gcc-3.4.6/gcc/tsystem.h:85, from ../../gpc1/gcc-3.4.6/gcc/crtstuff.c:62: /usr/include/linux/errno.h:1:23: asm/errno.h: No such file or directory make[1]: *** [Makefile:1273: crtbegin.o] Error 1 make[1]: Leaving directory '/home/paul/gpc1-build/gcc' make: *** [Makefile:23375: all-gcc] Error 2 paul@jacko:~/gpc1-build$ LANG=C make

1 0

parse error: GTY must be specified before identifier
by Paul Dufresne 06 Mar '21

06 Mar '21

I am trying to build with the most recent of gcc that I found that still use gcc-core: ftp://gnu.mirror.iweb.com/gcc/gcc-4.6.4/gcc-core-4.6.4.tar.bz2 ftp://gcc.gnu.org/pub/gcc/infrastructure/gmp-4.3.2.tar.bz2 ftp://gcc.gnu.org/pub/gcc/infrastructure/mpfr-2.4.2.tar.bz2 ftp://gcc.gnu.org/pub/gcc/infrastructure/mpc-0.8.1.tar.gz But I get: [...] | ^~~~~~~~~~ gengtype-lex.c: In function ‘yylex’: gengtype-lex.c:364:15: warning: this statement may fall through [-Wimplicit-fallthrough=] /home/jakub/gcc-4.6.4/gcc-4.6.4/gcc/gengtype-lex.l:130:1: note: in expansion of macro ‘YY_DO_BEFORE_ACTION’ /home/jakub/gcc-4.6.4/gcc-4.6.4/gcc/gengtype-lex.l:127:1: note: here gcc -c -g -fkeep-inline-functions -DIN_GCC -W -Wall -Wwrite-strings -Wcast-qual -Wstrict-prototypes -Wmissing-prototypes -Wmissing-format-attribute -pedantic -Wno-long-long -Wno-variadic-macros -Wno-overlength-strings -Wold-style-definition -Wc++-compat -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -I. -Ibuild -I../../gpc2/gcc-4.6.4/gcc -I../../gpc2/gcc-4.6.4/gcc/build -I../../gpc2/gcc-4.6.4/gcc/../include -I../../gpc2/gcc-4.6.4/gcc/../libcpp/include -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber/bid -I../libdecnumber \ -o build/gengtype-parse.o ../../gpc2/gcc-4.6.4/gcc/gengtype-parse.c In file included from ../../gpc2/gcc-4.6.4/gcc/gengtype-parse.c:21: ../../gpc2/gcc-4.6.4/gcc/gengtype.h: In function ‘set_lang_bitmap’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype.h:101:3: note: in expansion of macro ‘gcc_assert’ 101 | gcc_assert (inpf); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-parse.c: In function ‘typedef_decl’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-parse.c:820:3: note: in expansion of macro ‘gcc_assert’ 820 | gcc_assert (token () == TYPEDEF); | ^~~~~~~~~~ gcc -c -g -fkeep-inline-functions -DIN_GCC -W -Wall -Wwrite-strings -Wcast-qual -Wstrict-prototypes -Wmissing-prototypes -Wmissing-format-attribute -pedantic -Wno-long-long -Wno-variadic-macros -Wno-overlength-strings -Wold-style-definition -Wc++-compat -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -I. -Ibuild -I../../gpc2/gcc-4.6.4/gcc -I../../gpc2/gcc-4.6.4/gcc/build -I../../gpc2/gcc-4.6.4/gcc/../include -I../../gpc2/gcc-4.6.4/gcc/../libcpp/include -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber/bid -I../libdecnumber \ -o build/gengtype-state.o ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c In file included from ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:27: ../../gpc2/gcc-4.6.4/gcc/gengtype.h: In function ‘set_lang_bitmap’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype.h:101:3: note: in expansion of macro ‘gcc_assert’ 101 | gcc_assert (inpf); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘type_lineloc’: ../../gpc2/gcc-4.6.4/gcc/system.h:656:61: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 656 | #define gcc_unreachable() (fancy_abort (__FILE__, __LINE__, __FUNCTION__)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:46:7: note: in expansion of macro ‘gcc_unreachable’ 46 | gcc_unreachable (); | ^~~~~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/system.h:656:61: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 656 | #define gcc_unreachable() (fancy_abort (__FILE__, __LINE__, __FUNCTION__)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:59:7: note: in expansion of macro ‘gcc_unreachable’ 59 | gcc_unreachable (); | ^~~~~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘write_state_fileloc’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:556:7: note: in expansion of macro ‘gcc_assert’ 556 | gcc_assert (floc->file != NULL); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘write_state_fields’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:585:3: note: in expansion of macro ‘gcc_assert’ 585 | gcc_assert (nbpairs == nbfields); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘write_state_lang_struct_type’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:827:7: note: in expansion of macro ‘gcc_assert’ 827 | gcc_assert (UNION_OR_STRUCT_P (hty)); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:828:7: note: in expansion of macro ‘gcc_assert’ 828 | gcc_assert (hty->u.s.lang_struct == current); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:831:7: note: in expansion of macro ‘gcc_assert’ 831 | gcc_assert (strcmp (homoname, hty->u.s.tag) == 0); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘write_state_gc_used’: ../../gpc2/gcc-4.6.4/gcc/system.h:656:61: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 656 | #define gcc_unreachable() (fancy_abort (__FILE__, __LINE__, __FUNCTION__)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:901:7: note: in expansion of macro ‘gcc_unreachable’ 901 | gcc_unreachable (); | ^~~~~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘write_state_typedefs’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:1030:3: note: in expansion of macro ‘gcc_assert’ 1030 | gcc_assert (nbpairs == nbtypedefs); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘write_state_variables’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:1082:3: note: in expansion of macro ‘gcc_assert’ 1082 | gcc_assert (nbpairs == nbvars); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘record_type’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:1249:3: note: in expansion of macro ‘gcc_assert’ 1249 | gcc_assert (slot); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘read_state_fileloc’: ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:1683:3: note: in expansion of macro ‘gcc_assert’ 1683 | gcc_assert (floc != NULL); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/system.h:636:55: warning: ISO C does not support ‘__FUNCTION__’ predefined identifier [-Wpedantic] 636 | ((void)(!(EXPR) ? fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0 : 0)) | ^~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:1684:3: note: in expansion of macro ‘gcc_assert’ 1684 | gcc_assert (srcdir != NULL); | ^~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c: In function ‘read_state_files_list’: ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:2344:34: warning: comparison of constant ‘4’ with boolean expression is always false [-Wbool-compare] 2344 | if (!state_token_kind (t0) == STOK_RIGHTPAR) | ^~ ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:2344:34: warning: logical not is only applied to the left hand side of comparison [-Wlogical-not-parentheses] ../../gpc2/gcc-4.6.4/gcc/gengtype-state.c:2344:11: note: add parentheses around left hand side expression to silence this warning 2344 | if (!state_token_kind (t0) == STOK_RIGHTPAR) | ^~~~~~~~~~~~~~~~~~~~~~ | ( ) gcc -c -g -fkeep-inline-functions -DIN_GCC -W -Wall -Wwrite-strings -Wcast-qual -Wstrict-prototypes -Wmissing-prototypes -Wmissing-format-attribute -pedantic -Wno-long-long -Wno-variadic-macros -Wno-overlength-strings -Wold-style-definition -Wc++-compat -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -I. -Ibuild -I../../gpc2/gcc-4.6.4/gcc -I../../gpc2/gcc-4.6.4/gcc/build -I../../gpc2/gcc-4.6.4/gcc/../include -I../../gpc2/gcc-4.6.4/gcc/../libcpp/include -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber/bid -I../libdecnumber \ -DBASEVER="\"4.6.4\"" -DDATESTAMP="\"\"" \ -DREVISION="\"\"" \ -DDEVPHASE="\"\"" -DPKGVERSION="\"(GCC) \"" \ -DBUGURL="\"<http://gcc.gnu.org/bugs.html>\"" -o build/version.o ../../gpc2/gcc-4.6.4/gcc/version.c gcc -g -fkeep-inline-functions -DIN_GCC -W -Wall -Wwrite-strings -Wcast-qual -Wstrict-prototypes -Wmissing-prototypes -Wmissing-format-attribute -pedantic -Wno-long-long -Wno-variadic-macros -Wno-overlength-strings -Wold-style-definition -Wc++-compat -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -o build/gengtype \ build/gengtype.o build/errors.o build/gengtype-lex.o build/gengtype-parse.o build/gengtype-state.o build/version.o ../build-x86_64-unknown-linux-gnu/libiberty/libiberty.a /bin/bash ../../gpc2/gcc-4.6.4/gcc/../move-if-change tmp-gi.list gtyp-input.list echo timestamp > s-gtyp-input build/gengtype \ -S ../../gpc2/gcc-4.6.4/gcc -I gtyp-input.list -w gtype.state ../../gpc2/gcc-4.6.4/gcc/p/gpc.h:210: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/gpc.h:222: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/gpc.h:277: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/gpc.h:295: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/gpc.h:309: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/gpc.h:518: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/gpc.h:598: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/gpc.h:841: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/gpc.h:1439: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/declarations.c:171: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/declarations.c:3673: parse error: GTY must be specified before identifier ../../gpc2/gcc-4.6.4/gcc/p/module.c:285: parse error: GTY must be specified before identifier make[3]: *** [Makefile:3825 : s-gtype] Erreur 1 make[3] : on quitte le répertoire « /home/paul/gpc-build2/gcc » make[2]: *** [Makefile:5498 : all-stage1-gcc] Erreur 2 make[2] : on quitte le répertoire « /home/paul/gpc-build2 » make[1]: *** [Makefile:19609 : stage1-bubble] Erreur 2 make[1] : on quitte le répertoire « /home/paul/gpc-build2 » make: *** [Makefile:877 : all] Erreur 2 paul@jacko:~/gpc-build2$ After fixing those errors (not knowing what I do but obeying to the compiler) I get: GENERATOR_FILE -o build/genpreds \ build/genpreds.o build/rtl.o build/read-rtl.o build/ggc-none.o build/vec.o build/min-insn-modes.o build/gensupport.o build/print-rtl.o build/read-md.o build/errors.o ../build-x86_64-unknown-linux-gnu/libiberty/libiberty.a build/genpreds -h ../../gpc2/gcc-4.6.4/gcc/config/i386/i386.md > tmp-preds.h /bin/bash ../../gpc2/gcc-4.6.4/gcc/../move-if-change tmp-preds.h tm-preds.h echo timestamp > s-preds-h rm -f tmp-all-tree.def echo '#include "tree.def"' > tmp-all-tree.def echo 'END_OF_BASE_TREE_CODES' >> tmp-all-tree.def echo '#include "c-family/c-common.def"' >> tmp-all-tree.def ltf="../../gpc2/gcc-4.6.4/gcc/p/p-tree.def"; for f in $ltf; do \ echo "#include \"$f\""; \ done | sed 's|../../gpc2/gcc-4.6.4/gcc/||' >> tmp-all-tree.def /bin/bash ../../gpc2/gcc-4.6.4/gcc/../move-if-change tmp-all-tree.def all-tree.def echo timestamp > s-alltree gcc -c -g -DIN_GCC -W -Wall -Wwrite-strings -Wcast-qual -Wstrict-prototypes -Wmissing-prototypes -Wold-style-definition -Wc++-compat -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -I. -Ibuild -I../../gpc2/gcc-4.6.4/gcc -I../../gpc2/gcc-4.6.4/gcc/build -I../../gpc2/gcc-4.6.4/gcc/../include -I../../gpc2/gcc-4.6.4/gcc/../libcpp/include -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber/bid -I../libdecnumber \ -o build/gencheck.o ../../gpc2/gcc-4.6.4/gcc/gencheck.c gcc -g -DIN_GCC -W -Wall -Wwrite-strings -Wcast-qual -Wstrict-prototypes -Wmissing-prototypes -Wold-style-definition -Wc++-compat -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -o build/gencheck \ build/gencheck.o ../build-x86_64-unknown-linux-gnu/libiberty/libiberty.a build/gencheck > tmp-check.h /bin/bash ../../gpc2/gcc-4.6.4/gcc/../move-if-change tmp-check.h tree-check.h echo timestamp > s-check build/genpreds -c ../../gpc2/gcc-4.6.4/gcc/config/i386/i386.md > tmp-constrs.h /bin/bash ../../gpc2/gcc-4.6.4/gcc/../move-if-change tmp-constrs.h tm-constrs.h echo timestamp > s-constrs-h gcc -c -g -DIN_GCC -W -Wall -Wwrite-strings -Wcast-qual -Wstrict-prototypes -Wmissing-prototypes -Wold-style-definition -Wc++-compat -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -I. -Ibuild -I../../gpc2/gcc-4.6.4/gcc -I../../gpc2/gcc-4.6.4/gcc/build -I../../gpc2/gcc-4.6.4/gcc/../include -I../../gpc2/gcc-4.6.4/gcc/../libcpp/include -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber -I../../gpc2/gcc-4.6.4/gcc/../libdecnumber/bid -I../libdecnumber \ -o build/gencondmd.o build/gencondmd.c In file included from ../../gpc2/gcc-4.6.4/gcc/function.h:25, from build/gencondmd.c:25: ../../gpc2/gcc-4.6.4/gcc/p/p-tree.def:43:14: error: redeclaration of enumerator ‘NAMESPACE_DECL’ 43 | DEFTREECODE (NAMESPACE_DECL, "namespace_decl", "d", 0) | ^~~~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/tree.h:39:49: note: in definition of macro ‘DEFTREECODE’ 39 | #define DEFTREECODE(SYM, STRING, TYPE, NARGS) SYM, | ^~~ ../../gpc2/gcc-4.6.4/gcc/tree.def:363:14: note: previous definition of ‘NAMESPACE_DECL’ was here 363 | DEFTREECODE (NAMESPACE_DECL, "namespace_decl", tcc_declaration, 0) | ^~~~~~~~~~~~~~ ../../gpc2/gcc-4.6.4/gcc/tree.h:39:49: note: in definition of macro ‘DEFTREECODE’ 39 | #define DEFTREECODE(SYM, STRING, TYPE, NARGS) SYM, | ^~~ In file included from ../../gpc2/gcc-4.6.4/gcc/function.h:25, from build/gencondmd.c:25: ../../gpc2/gcc-4.6.4/gcc/tree.h:3130:11: warning: identifier ‘thread_local’ conflicts with C++ keyword [-Wc++-compat] 3130 | unsigned thread_local : 1; | ^~~~~~~~~~~~ In file included from build/gencondmd.c:33: ../../gpc2/gcc-4.6.4/gcc/recog.h:287:5: warning: this use of "defined" may not be portable [-Wexpansion-to-defined] 287 | #if HAVE_DESIGNATED_INITIALIZERS | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ make[3]: *** [Makefile:3847 : build/gencondmd.o] Erreur 1 make[3] : on quitte le répertoire « /home/paul/gpc-build2/gcc » make[2]: *** [Makefile:5498 : all-stage1-gcc] Erreur 2 make[2] : on quitte le répertoire « /home/paul/gpc-build2 » make[1]: *** [Makefile:19609 : stage1-bubble] Erreur 2 make[1] : on quitte le répertoire « /home/paul/gpc-build2 » make: *** [Makefile:877 : all] Erreur 2 paul@jacko:~/gpc-build2$ ========================================================================= paul@jacko:~/gpc2/gcc-4.6.4/gcc/p$ diff -u gpc.h.orig gpc.h --- gpc.h.orig 2021-02-28 15:12:28.881046603 -0500 +++ gpc.h 2021-02-28 15:25:41.684525601 -0500 @@ -206,7 +206,7 @@ often the same). */ #define PERMANENT_STRING(S) (IDENTIFIER_POINTER (get_identifier (S))) -struct tree_inn GTY(()) +struct GTY(()) tree_inn { struct tree_common common; struct interface_table_t * GTY((skip(""))) table; @@ -218,7 +218,7 @@ typedef enum { IMPORT_USES, IMPORT_QUALIFIED, IMPORT_ISO } import_type; -struct tree_import GTY(()) +struct GTY(()) tree_import { struct tree_common common; gpi_int qualified; @@ -273,7 +273,7 @@ #define KW_WEAK 32 #define KW_INFORMED 64 -struct predef GTY(()) +struct GTY(()) predef { const char *idname; const char *rts_idname; @@ -291,7 +291,7 @@ #define PD_ACTIVE(PD) ((PD) && (PD)->user_disabled < (!co->pascal_dialect || (co->pascal_dialect & (PD)->dialect))) /* Language-dependent contents of an identifier. */ -struct lang_identifier GTY(()) +GTY(()) struct lang_identifier { struct tree_identifier ignore; tree value; @@ -303,12 +303,12 @@ int spelling_column; }; -union lang_tree_node - GTY((desc ("((TREE_CODE (&%h.generic) == IDENTIFIER_NODE) || (TREE_CODE (&%h.generic) == INTERFACE_NAME_NODE) || (TREE_CODE (&%h.generic) == IMPORT_NODE)) ? TREE_CODE (&%h.generic) : 0"), +union GTY(()) lang_tree_node + ((desc ("((TREE_CODE (&%h.generic) == IDENTIFIER_NODE) || (TREE_CODE (&%h.generic) == INTERFACE_NAME_NODE) || (TREE_CODE (&%h.generic) == IMPORT_NODE)) ? TREE_CODE (&%h.generic) : 0"), chain_next ("(union lang_tree_node *) TREE_CHAIN (&%h.generic)"))) { union tree_node GTY ((tag ("0"), desc ("tree_node_structure (&%h)"))) generic; - struct lang_identifier GTY ((tag ("IDENTIFIER_NODE"))) identifier; + struct GTY(()) lang_identifier ((tag ("IDENTIFIER_NODE"))) identifier; struct tree_inn GTY ((tag ("INTERFACE_NAME_NODE"))) interface; struct tree_import GTY ((tag ("IMPORT_NODE"))) import; }; @@ -514,7 +514,7 @@ (see EP 6.10.2). Used in CONST_DECL nodes. */ #define PASCAL_CST_PRINCIPAL_ID(decl) DECL_LANG_FLAG_7 (decl) -struct lang_decl GTY(()) +struct GTY(()) lang_decl { tree info1; tree info2; @@ -594,7 +594,7 @@ /* Set if the variants of a record have initializers. Used in RECORD_TYPE nodes. */ #define PASCAL_TYPE_INITIALIZER_VARIANTS(type) TYPE_LANG_FLAG_5 (type) -struct lang_type GTY(()) +struct GTY(()) lang_type { int code; tree info; @@ -837,7 +837,7 @@ /* options.c */ -typedef struct string_list GTY(()) +typedef struct GTY(()) string_list { struct string_list *next; char *string; @@ -1435,7 +1435,7 @@ typedef enum { LF_UNIT, LF_COMPILED_UNIT, LF_OBJECT, LF_COMPILED_OBJECT } locate_file_t; #define MODULE_T_FIRST_TREE_FIELD imports -struct module GTY(()) +struct GTY(())module { tree imports; /* TREE_LIST of IMPORT_NODEs of imported interfaces for this module. */ tree exports; /* TREE_LIST of interfaces exported from this module paul@jacko:~/gpc2/gcc-4.6.4/gcc/p$ ========================================================================================== paul@jacko:~/gpc2/gcc-4.6.4/gcc/p$ diff -u declarations.c.orig declarations.c --- declarations.c.orig 2021-02-28 15:12:42.077046333 -0500 +++ declarations.c 2021-02-28 15:27:17.724422309 -0500 @@ -167,7 +167,7 @@ for the main level of statements. - one (transparent) for each structured statement, see pushlevel_expand */ -struct binding_level GTY(()) +struct GTY(()) binding_level { /* A chain of declarations. These are in the reverse of the order supplied. */ tree names; @@ -3669,7 +3669,7 @@ } #ifdef GCC_3_3 -struct language_function GTY(()) +struct GTY(()) language_function { int unused; }; paul@jacko:~/gpc2/gcc-4.6.4/gcc/p$ =================================================================================== paul@jacko:~/gpc2/gcc-4.6.4/gcc/p$ diff -u module.c.orig module.c --- module.c.orig 2021-02-28 15:12:50.693045920 -0500 +++ module.c 2021-02-28 15:28:06.812307424 -0500 @@ -281,7 +281,7 @@ /* A table holding the nodes imported from all GPI files together with their UIDs, so duplicates can be identified. */ -struct interface_table_t GTY(()) +struct GTY(()) interface_table_t { tree interface_name; tree module_name; paul@jacko:~/gpc2/gcc-4.6.4/gcc/p$ =================================================================

2 4

[../../gpc/gcc-3.4.4/gcc/p/Make-lang.in:634 : p/declarations.o] Erreur 1
by Paul Dufresne 01 Mar '21

01 Mar '21

Hi! Just tried to compiled gpc. Used http://www.gnu-pascal.de/alpha/gpc-20050331-minimal.tar.bz2 and http://www.gnu-pascal.de/alpha/gcc-core-3.4.4.tar.bz2 Using: paul@jacko:~/gpc-build$ gcc --version gcc (Ubuntu 10.2.0-13ubuntu1) 10.2.0 And got: [...] In file included from ../../gpc/gcc-3.4.4/gcc/p/declarations.c:29: ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘pushdecl_import’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1062:3: note: in expansion of macro ‘gcc_assert’ 1062 | gcc_assert (!PASCAL_DECL_WEAK (x)); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1076:30: warning: comparison between ‘enum tree_code’ and ‘enum pascal_tree_code’ [-Wenum-compare] 1076 | if (old && TREE_CODE (old) == OPERATOR_DECL && TREE_CODE (x) == OPERATOR_DECL) | ^~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1076:64: warning: comparison between ‘enum tree_code’ and ‘enum pascal_tree_code’ [-Wenum-compare] 1076 | if (old && TREE_CODE (old) == OPERATOR_DECL && TREE_CODE (x) == OPERATOR_DECL) | ^~ In file included from ../../gpc/gcc-3.4.4/gcc/p/declarations.c:29: ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘declare_label’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1142:3: note: in expansion of macro ‘gcc_assert’ 1142 | gcc_assert (!EM (label)); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘lookup_name’: ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1324:31: warning: comparison between ‘enum tree_code’ and ‘enum pascal_tree_code’ [-Wenum-compare] 1324 | if (t && (TREE_CODE (t) == OPERATOR_DECL && PASCAL_BUILTIN_OPERATOR (t))) | ^~ In file included from ../../gpc/gcc-3.4.4/gcc/p/declarations.c:29: ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘get_unique_identifier’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1490:3: note: in expansion of macro ‘gcc_assert’ 1490 | gcc_assert (*template >= 'a' && *template <= 'z'); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘check_identifier’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1557:7: note: in expansion of macro ‘gcc_assert’ 1557 | gcc_assert (DECL_INITIAL (decl)); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘lookup_c_type’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:70:71: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 70 | #define gcc_unreachable() (assert_fail ("unreachable code", __FILE__, __PRETTY_FUNCTION__, __LINE__)) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1625:3: note: in expansion of macro ‘gcc_unreachable’ 1625 | gcc_unreachable (); | ^~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘make_real’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1636:3: note: in expansion of macro ‘gcc_assert’ 1636 | gcc_assert (r > 0); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1638:3: note: in expansion of macro ‘gcc_assert’ 1638 | gcc_assert (TREE_TYPE (res) == double_type_node); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘init_decl_processing’: ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1816:3: error: ‘set_word_size’ undeclared (first use in this function); did you mean ‘set_mem_size’? 1816 | set_word_size = set_alignment = TYPE_PRECISION (long_unsigned_type_node); | ^~~~~~~~~~~~~ | set_mem_size ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1816:3: note: each undeclared identifier is reported only once for each function it appears in ../../gpc/gcc-3.4.4/gcc/p/declarations.c:1817:3: error: ‘set_words_big_endian’ undeclared (first use in this function) 1817 | set_words_big_endian = 0; | ^~~~~~~~~~~~~~~~~~~~ In file included from ../../gpc/gcc-3.4.4/gcc/p/declarations.c:29: ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘find_duplicate_fields’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:2082:9: note: in expansion of macro ‘gcc_assert’ 2082 | gcc_assert (dup); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘declare_routine’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:2419:3: note: in expansion of macro ‘gcc_assert’ 2419 | gcc_assert (!EM (d)); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘build_operator_heading’: ../../gpc/gcc-3.4.4/gcc/p/declarations.c:2530:34: warning: implicit conversion from ‘enum pascal_tree_code’ to ‘enum tree_code’ [-Wenum-conversion] 2530 | placeholder_decl = build_decl (OPERATOR_DECL, name, void_type_node); | ^~~~~~~~~~~~~ In file included from ../../gpc/gcc-3.4.4/gcc/p/declarations.c:29: ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘start_routine’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:2714:9: note: in expansion of macro ‘gcc_assert’ 2714 | gcc_assert (IDENTIFIER_IS_BUILT_IN (TREE_VALUE (dir), p_attribute)); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:2753:3: note: in expansion of macro ‘gcc_assert’ 2753 | gcc_assert (!EM (decl)); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:2798:7: note: in expansion of macro ‘gcc_assert’ 2798 | gcc_assert (!DECL_RTL_SET_P (parm)); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:2824:5: note: in expansion of macro ‘gcc_assert’ 2824 | gcc_assert (!resvar); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:2851:11: note: in expansion of macro ‘gcc_assert’ 2851 | gcc_assert (TREE_CODE (v) == COMPONENT_REF); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘finish_routine’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:74:101: warning: right-hand operand of comma expression has no effect [-Wunused-value] 74 | #define abort_confused() (error ("confused by previous errors, bailing out"), exit (FATAL_EXIT_CODE), 0) | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:2952:5: note: in expansion of macro ‘abort_confused’ 2952 | abort_confused (); | ^~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘declare_types’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:3110:9: note: in expansion of macro ‘gcc_assert’ 3110 | gcc_assert (!EM (decl)); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘shadow_one_level’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:3129:3: note: in expansion of macro ‘gcc_assert’ 3129 | gcc_assert (TYPE_SIZE (TREE_TYPE (element)) && !PASCAL_TYPE_UNDISCRIMINATED_SCHEMA (TREE_TYPE (element))); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘declare_variables’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:3451:11: note: in expansion of macro ‘gcc_assert’ 3451 | gcc_assert (!init); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:3578:7: note: in expansion of macro ‘gcc_assert’ 3578 | gcc_assert (!EM (d)); | ^~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c: In function ‘new_string_by_model’: ../../gpc/gcc-3.4.4/gcc/p/gpc.h:68:68: warning: ISO C does not support ‘__PRETTY_FUNCTION__’ predefined identifier [-Wpedantic] 68 | ((void) ((expression) ? 0 : (assert_fail (#expression, __FILE__, __PRETTY_FUNCTION__, __LINE__), 0))) | ^~~~~~~~~~~~~~~~~~~ ../../gpc/gcc-3.4.4/gcc/p/declarations.c:3659:7: note: in expansion of macro ‘gcc_assert’ 3659 | gcc_assert (isstring); | ^~~~~~~~~~ make[1]: *** [../../gpc/gcc-3.4.4/gcc/p/Make-lang.in:634 : p/declarations.o] Erreur 1 make[1] : on quitte le répertoire « /home/paul/gpc-build/gcc » make: *** [Makefile:23375 : all-gcc] Erreur 2 paul@jacko:~/gpc-build$ So isstring is undefined?

3 6

p/module.c:294: option `length' may not be applied to arrays of atomic types
by Paul Dufresne 28 Feb '21

28 Feb '21

No need to have a gcc with gcc-core... With gcc 7.5.0 I get: -o build/gengtype.o ../../gpc3/gcc-7.5.0/gcc/gengtype.c g++ -std=gnu++98 -c -g -DIN_GCC -fno-exceptions -fno-rtti -fasynchronous-unwind-tables -W -Wall -Wno-narrowing -Wwrite-strings -Wcast-qual -Wno-format -Wmissing-format-attribute -Woverloaded-virtual -pedantic -Wno-long-long -Wno-variadic-macros -Wno-overlength-strings -fno-common -Wno-error -DHAVE_CONFIG_H -DGENERATOR_FILE -fno-PIE -I. -Ibuild -I../../gpc3/gcc-7.5.0/gcc -I../../gpc3/gcc-7.5.0/gcc/build -I../../gpc3/gcc-7.5.0/gcc/../include -I../../gpc3/gcc-7.5.0/gcc/../libcpp/include \ -o build/gengtype-lex.o ../../gpc3/gcc-7.5.0/gcc/gengtype-lex.c gengtype-lex.c: In function ‘int yy_get_next_buffer()’: gengtype-lex.c:1343:18: warning: comparison of integer expressions of different signedness: ‘size_t’ {aka ‘long unsigned int’} and ‘int’ [-Wsign-compare] gengtype-lex.c:2150:3: note: in expansion of macro ‘YY_INPUT’ gengtype-lex.c: In function ‘yy_buffer_state* yy_scan_bytes(const char*, yy_size_t)’: gengtype-lex.c:2658:17: warning: comparison of integer expressions of different signedness: ‘int’ and ‘yy_size_t’ {aka ‘long unsigned int’} [-Wsign-compare] /space/rguenther/gcc-7.5.0/gcc-7.5.0/gcc/gengtype-lex.l: In function ‘int yylex(const char**)’: gengtype-lex.c:365:15: warning: this statement may fall through [-Wimplicit-fallthrough=] /space/rguenther/gcc-7.5.0/gcc-7.5.0/gcc/gengtype-lex.l:117:1: note: in expansion of macro ‘YY_DO_BEFORE_ACTION’ /space/rguenther/gcc-7.5.0/gcc-7.5.0/gcc/gengtype-lex.l:113:1: note: here gengtype-lex.c:365:15: warning: this statement may fall through [-Wimplicit-fallthrough=] /space/rguenther/gcc-7.5.0/gcc-7.5.0/gcc/gengtype-lex.l:134:1: note: in expansion of macro ‘YY_DO_BEFORE_ACTION’ /space/rguenther/gcc-7.5.0/gcc-7.5.0/gcc/gengtype-lex.l:131:1: note: here g++ -std=gnu++98 -c -g -DIN_GCC -fno-exceptions -fno-rtti -fasynchronous-unwind-tables -W -Wall -Wno-narrowing -Wwrite-strings -Wcast-qual -Wno-format -Wmissing-format-attribute -Woverloaded-virtual -pedantic -Wno-long-long -Wno-variadic-macros -Wno-overlength-strings -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -fno-PIE -I. -Ibuild -I../../gpc3/gcc-7.5.0/gcc -I../../gpc3/gcc-7.5.0/gcc/build -I../../gpc3/gcc-7.5.0/gcc/../include -I../../gpc3/gcc-7.5.0/gcc/../libcpp/include \ -o build/gengtype-parse.o ../../gpc3/gcc-7.5.0/gcc/gengtype-parse.c g++ -std=gnu++98 -c -g -DIN_GCC -fno-exceptions -fno-rtti -fasynchronous-unwind-tables -W -Wall -Wno-narrowing -Wwrite-strings -Wcast-qual -Wno-format -Wmissing-format-attribute -Woverloaded-virtual -pedantic -Wno-long-long -Wno-variadic-macros -Wno-overlength-strings -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -fno-PIE -I. -Ibuild -I../../gpc3/gcc-7.5.0/gcc -I../../gpc3/gcc-7.5.0/gcc/build -I../../gpc3/gcc-7.5.0/gcc/../include -I../../gpc3/gcc-7.5.0/gcc/../libcpp/include \ -o build/gengtype-state.o ../../gpc3/gcc-7.5.0/gcc/gengtype-state.c g++ -std=gnu++98 -c -g -DIN_GCC -fno-exceptions -fno-rtti -fasynchronous-unwind-tables -W -Wall -Wno-narrowing -Wwrite-strings -Wcast-qual -Wno-format -Wmissing-format-attribute -Woverloaded-virtual -pedantic -Wno-long-long -Wno-variadic-macros -Wno-overlength-strings -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -fno-PIE -I. -Ibuild -I../../gpc3/gcc-7.5.0/gcc -I../../gpc3/gcc-7.5.0/gcc/build -I../../gpc3/gcc-7.5.0/gcc/../include -I../../gpc3/gcc-7.5.0/gcc/../libcpp/include \ -DBASEVER="\"7.5.0\"" -DDATESTAMP="\"\"" \ -DREVISION="\"\"" \ -DDEVPHASE="\"\"" -DPKGVERSION="\"(GCC) \"" \ -DBUGURL="\"<https://gcc.gnu.org/bugs/>\"" -o build/version.o ../../gpc3/gcc-7.5.0/gcc/version.c g++ -std=gnu++98 -g -DIN_GCC -fno-exceptions -fno-rtti -fasynchronous-unwind-tables -W -Wall -Wno-narrowing -Wwrite-strings -Wcast-qual -Wno-format -Wmissing-format-attribute -Woverloaded-virtual -pedantic -Wno-long-long -Wno-variadic-macros -Wno-overlength-strings -fno-common -DHAVE_CONFIG_H -DGENERATOR_FILE -fno-PIE -static-libstdc++ -static-libgcc -no-pie -o build/gengtype \ build/gengtype.o build/errors.o build/gengtype-lex.o build/gengtype-parse.o build/gengtype-state.o build/version.o ../build-x86_64-pc-linux-gnu/libiberty/libiberty.a LC_ALL=C ; export LC_ALL ; \ gawk -f ../../gpc3/gcc-7.5.0/gcc/opt-gather.awk ../../gpc3/gcc-7.5.0/gcc/ada/gcc-interface/lang.opt ../../gpc3/gcc-7.5.0/gcc/brig/lang.opt ../../gpc3/gcc-7.5.0/gcc/fortran/lang.opt ../../gpc3/gcc-7.5.0/gcc/go/lang.opt ../../gpc3/gcc-7.5.0/gcc/lto/lang.opt ../../gpc3/gcc-7.5.0/gcc/p/lang.opt ../../gpc3/gcc-7.5.0/gcc/c-family/c.opt ../../gpc3/gcc-7.5.0/gcc/common.opt ../../gpc3/gcc-7.5.0/gcc/config/fused-madd.opt ../../gpc3/gcc-7.5.0/gcc/config/i386/i386.opt ../../gpc3/gcc-7.5.0/gcc/config/gnu-user.opt ../../gpc3/gcc-7.5.0/gcc/config/linux.opt ../../gpc3/gcc-7.5.0/gcc/config/linux-android.opt > tmp-optionlist /bin/bash ../../gpc3/gcc-7.5.0/gcc/../move-if-change tmp-optionlist optionlist echo timestamp > s-options gawk -f ../../gpc3/gcc-7.5.0/gcc/opt-functions.awk -f ../../gpc3/gcc-7.5.0/gcc/opt-read.awk \ -f ../../gpc3/gcc-7.5.0/gcc/opth-gen.awk \ < optionlist > tmp-options.h /bin/bash ../../gpc3/gcc-7.5.0/gcc/../move-if-change tmp-options.h options.h echo timestamp > s-options-h /bin/bash ../../gpc3/gcc-7.5.0/gcc/../move-if-change tmp-gi.list gtyp-input.list echo timestamp > s-gtyp-input build/gengtype \ -S ../../gpc3/gcc-7.5.0/gcc -I gtyp-input.list -w tmp-gtype.state ../../gpc3/gcc-7.5.0/gcc/p/module.c:294: option `length' may not be applied to arrays of atomic types make[3]: *** [Makefile:2573 : s-gtype] Erreur 1 make[3] : on quitte le répertoire « /home/paul/gpc-build3/gcc » make[2]: *** [Makefile:4548 : all-stage1-gcc] Erreur 2 make[2] : on quitte le répertoire « /home/paul/gpc-build3 » make[1]: *** [Makefile:23803 : stage1-bubble] Erreur 2 make[1] : on quitte le répertoire « /home/paul/gpc-build3 » make: *** [Makefile:934 : all] Erreur 2 paul@jacko:~/gpc-build3$ This time, I don't understand what the compiler wants me to do.

1 0

RE: ISO7185 compliance
by scott andrew franco 25 Feb '21

25 Feb '21

1 0

ISO7185 compliance
by Paul Isaacs 22 Jan '21

22 Jan '21

Thanks to everyone who responded. I am trying to write a compliant 7185 compiler from 7185 compliant source. The problem arose because my compiler produced an error on the construct described when it compiled itself. I think that ( b )^.Field1 is a compliant work around because the expression will be treated as a variable access. I am using the 7185 spec rather than 10206 because it is much smaller and within a single person's scope. Also the compiler is intended for embedded systems where there is less need for advanced features. UsingÂ the 7185 spec as a base grammar will allow for grammar additions, such a interrupt directives, to be added to a well specified grammar as small tweaks. As well, 7185 is specified as a single source file so there is no need for a link editor to stitch together various pieces of object code to produce an executable. Without need for a linker, the complier becomes much more portable. There are many more embedded CPU chips than larger scale CPUs with operating systems. Regards, Paul Isaacs

2 1

ISO7185 compliance
by Paul Isaacs 22 Jan '21

22 Jan '21

Hello: gpc --classic-pascal compiles the following without error: procedure test; type Â xHandleÂ Â Â Â Â Â Â Â Â Â Â Â = ^xRecord; Â xRecordÂ Â Â Â Â Â Â Â Â Â Â Â = record Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â field1Â Â : integer; Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â end; var Â aÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â : integer; Â function bÂ Â Â Â Â Â Â Â Â : xHandle; Â var Â cÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â : xHandle; Â begin Â bÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â := c; Â end; begin Â aÂ Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â := b^.field1; end; Is this 7185 compliant? The right hand side of the assignment is a 6.7.3 function-designator rule : Â Â Â Â Â function-designator = function-identifier [ actual-parameter-list ] . followed by "^." I can not see how the grammar permits the following pointer and record accesses. Thank you, Paul Isaacs

3 2

Trouble setting up Pascal
by Peter Williams 03 Nov '20

03 Nov '20

Greetings from a new member of your mailing list. I have used Gnu Pascal for some time on a Windows 10 64-bit environment. I decided to try it on a Linux Mint 20 Cinnamon machine with x86_64 processor I downloaded gpc-2.1-with-gcc.i686-pc-linux-gnu.tar.gz to /home/peter/software and installed using: cd / tar xzf /home/peter/software/gpc-2.1-with-gcc.i686-pc-linux-gnu.tar.gz I tried the simplest of programs: Hello.c: program hello; begin writeln ('Hello Pascal world'); readln end. and compiled by gpc -o Hello Hello.pas to get, to my dismay, not as on Windows but on Linux: peter@peter-Akoya-E6237:~/Pete/Pascal$ gpc -o Hello Hello.pas /tmp/ccnPqfBD.s: Assembler messages: /tmp/ccnPqfBD.s:15: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:19: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:20: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:21: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:22: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:23: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:24: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:25: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:35: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:36: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:37: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:38: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:50: Error: invalid instruction suffix for `pop' /tmp/ccnPqfBD.s:66: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:73: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:80: Error: invalid instruction suffix for `pop' /tmp/ccnPqfBD.s:88: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:92: Error: invalid instruction suffix for `pop' /tmp/ccnPqfBD.s:103: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:108: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:110: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:112: Error: invalid instruction suffix for `push' /tmp/ccnPqfBD.s:123: Error: invalid instruction suffix for `pop' peter@peter-Akoya-E6237:~/Pete/Pascal$ What am I doing wrong? Can you please advise? -- Peter Williams petesweet27rr(a)gmail.com

5 7