Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Dear Perl Monks, when i am installing TK-TableMatrix in to Active perl 5.8.8 i am getting the follow error 

C:\Documents and Settings\local\Desktop\Tk-TableMatrix-1.23>C:\strawbe
+rry-perl\dmake\bin\dmake
d pTk && dmake
cc -c  -IC:/strawberry-perl/perl/lib/Tk -IC:/strawberry-perl/perl/lib/
+Tk/pTk -IC:/strawberry-perl/perl/lib/Tk/pTk/mTk/xlib
s -O2 -DWIN32 -DHAVE_DES_FCRYPT -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICI
+T_SYS -fno-strict-aliasing -DPERL_MSVCRT_READFIX -s -O2
         -DVERSION=\"1.23\"    -DXS_VERSION=\"1.23\"  "-IC:\strawberry
+-perl\perl\lib\CORE"  -DTK800XSTK  TableMatrix.c
ableMatrix.xs: In function `XS_Tk_tablematrix':
ableMatrix.xs:44: warning: passing arg 2 of pointer to function makes 
+integer from pointer without a cast
ableMatrix.xs:44: warning: passing arg 3 of pointer to function makes 
+pointer from integer without a cast
ableMatrix.xs:44: warning: passing arg 4 of pointer to function makes 
+integer from pointer without a cast
ableMatrix.xs:44: error: too few arguments to function
make:  Error code 129, while making 'TableMatrix.o'

[download]

Replies are listed 'Best First'.
Re: problem to install TK::TableMatrix
by Anonymous Monk on Sep 22, 2008 at 15:21 UTC
    You'll see here that it fails for many platforms. I would install it from PPM.
[reply]
Re: problem to install TK::TableMatrix
by syphilis (Archbishop) on Sep 22, 2008 at 22:50 UTC
    There's an #ifdef/#else condition in TableMatrix.xs and it could be that you're entering the inappropriate block. Try replacing the existing version of TableMatrix.xs with this rendition (which removes the option of the first block): 
    
#define PERL_NO_GET_CONTEXT
#include <EXTERN.h>
#include <perl.h>
#include <XSUB.h>

#undef MAX
#undef MIN

#include "tkGlue.def"

#include "pTk/tkPort.h"
#include "pTk/tkTable.h"
#include "pTk/tkInt.h"
#include "pTk/tixPort.h"
#include "pTk/tixInt.h"
#include "tkGlue.h"
#include "tkGlue.m"
#include "pTk/tkVMacro.h"


/* perltk TableMatrix's replacement for TCL_unsetVar. deletes an eleme
+nt in a hash */
EXTERN void    tkTableUnsetElement _ANSI_ARGS_((Var hashEntry, char * 
+key)){
    int len;
    dTHX;    
    len = strlen(key);
    hv_delete( (HV*) hashEntry, key, len, G_DISCARD);
}


DECLARE_VTABLES;

MODULE = Tk::TableMatrix    PACKAGE = Tk

PROTOTYPES: DISABLE


void
tablematrix(...)
CODE:
 {
  XSRETURN(XSTkCommand(cv,1,Tk_TableObjCmd,items,&ST(0)));
 }
 
BOOT:
 {
  IMPORT_VTABLES;
 }

    [download]
    Cheers,
    Rob
[reply]
[d/l]
      thanks a lot ...... i am able to install now
[reply]

Back to Seekers of Perl Wisdom