[perl #40380] [PATCH] errors on 'make install' - src/pdb.c

[Herbert Poul]

# New Ticket Created by  "Herbert Poul" 
# Please include the string:  [perl #40380]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=40380 >


hi,

'make install' failed due to a change in compilers/imcc/parser.h (rev.
14633) which added a second parameter to do_yylex_init:
src/pdb.c
src/pdb.c: In function `main':
src/pdb.c:139: warning: passing arg 1 of `do_yylex_init' from
incompatible pointer type
src/pdb.c:139: error: too few arguments to function `do_yylex_init'
make: *** [src/pdb.o] Error 1

here is a very simple patch which got it working for me:

Index: src/pdb.c
===================================================================
--- src/pdb.c   (revision 14634)
+++ src/pdb.c   (working copy)
@@ -136,7 +136,7 @@
    PDB_t *pdb;
    void *yyscanner;

-    do_yylex_init ( &yyscanner );
+    do_yylex_init ( NULL, &yyscanner );

    /*Parrot_set_config_hash();  TODO link with cfg */
    debugger = Parrot_new(NULL);



cu,
 herbert poul

Index: src/pdb.c
===================================================================
--- src/pdb.c   (revision 14634)
+++ src/pdb.c   (working copy)
@@ -136,7 +136,7 @@
     PDB_t *pdb;
     void *yyscanner;
 
-    do_yylex_init ( &yyscanner );
+    do_yylex_init ( NULL, &yyscanner );
 
     /*Parrot_set_config_hash();  TODO link with cfg */
     debugger = Parrot_new(NULL);