Gpc

gpc@gnu.de

5400 discussions

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

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

2001

2000

1999

1998

1997

1996

1995

Gpc