According to Tom Dye:
[...] This code, which compiled previously, fails now with a message that there is an undeclared identifier `Ch' in function Isalphanum on line 17. [...]
I fixed it. :-) Patch below.
Since this patch changes the GPI file format, you must recompile all your modules/units after having applied it.
Have fun,
Peter
Dipl.-Phys. Peter Gerwinski, Essen, Germany, free physicist and programmer peter.gerwinski@uni-essen.de - http://home.pages.de/~peter.gerwinski/ [971005] maintainer GNU Pascal [971001] - http://home.pages.de/~gnu-pascal/ [971005]
8< ---------------------------------------------------------------------------
--- gpc-971106/p/module.c Sat Nov 1 03:30:22 1997 +++ gpc/p/module.c Sun Nov 9 21:02:24 1997 @@ -1186,7 +1186,7 @@ store_tree (DECL_NAME (t), s, depth + 1); /* name of function */ store_tree (DECL_ASSEMBLER_NAME (t), s, depth + 1); store_tree (TREE_TYPE (TREE_TYPE (t)), s, depth + 1); /* return type */ - store_tree (TYPE_ARG_TYPES (TREE_TYPE (t)), s, depth + 1); /* argument types */ + store_tree (DECL_LANG_SPECIFIC (t)->parms, s, depth + 1); /* arguments */ /* Machine attributes. */ for (a = TYPE_ATTRIBUTES (TREE_TYPE (t)); a; a = TREE_CHAIN (a)) @@ -1765,8 +1765,8 @@ * they already were prediscriminated before they were * written into the GPI file. */ - tree name = get_unique_identifier ("parm", 0); - d = build_tree_list (NULL_TREE, TREE_VALUE (a)); + tree name = DECL_NAME (a); + d = build_tree_list (NULL_TREE, TREE_TYPE (a)); d = build_tree_list (build_tree_list (d, name), build_tree_list (NULL_TREE, NULL_TREE)); push_parm_decl (d);