/usr/lib/perl5/Tk/pTk/imgInt.t is in perl-tk 1:804.030-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 | #ifdef _IMGINT
#ifndef ImgFixChanMatchProc
#ifndef RESOURCE_INCLUDED
VFUNC(void,ImgFixChanMatchProc,V_ImgFixChanMatchProc,_ANSI_ARGS_((Tcl_Interp **interp, Tcl_Channel *chan,
Tcl_Obj **file, Tcl_Obj **format, int **width, int **height)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgFixChanMatchProc */
#ifndef ImgFixObjMatchProc
#ifndef RESOURCE_INCLUDED
VFUNC(void,ImgFixObjMatchProc,V_ImgFixObjMatchProc,_ANSI_ARGS_((Tcl_Interp **interp, Tcl_Obj **data,
Tcl_Obj **format, int **width, int **height)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgFixObjMatchProc */
#ifndef ImgFixStringWriteProc
#ifndef RESOURCE_INCLUDED
VFUNC(void,ImgFixStringWriteProc,V_ImgFixStringWriteProc,_ANSI_ARGS_((Tcl_DString *data, Tcl_Interp **interp,
Tcl_DString **dataPtr, Tcl_Obj **format, Tk_PhotoImageBlock **blockPtr)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgFixStringWriteProc */
#ifndef ImgGetByteArrayFromObj
#ifndef RESOURCE_INCLUDED
VFUNC(char *,ImgGetByteArrayFromObj,V_ImgGetByteArrayFromObj,_ANSI_ARGS_((Tcl_Obj *objPtr,
int *lengthPtr)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgGetByteArrayFromObj */
#ifndef ImgGetc
#ifndef RESOURCE_INCLUDED
VFUNC(int,ImgGetc,V_ImgGetc,_ANSI_ARGS_((MFile *handle)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgGetc */
#ifndef ImgListObjGetElements
#ifndef RESOURCE_INCLUDED
VFUNC(int,ImgListObjGetElements,V_ImgListObjGetElements,_ANSI_ARGS_((Tcl_Interp *interp,
Tcl_Obj *objPtr, int *argc, Tcl_Obj ***objv)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgListObjGetElements */
#ifndef ImgObjInit
#ifndef RESOURCE_INCLUDED
VFUNC(int,ImgObjInit,V_ImgObjInit,_ANSI_ARGS_((Tcl_Interp *interp)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgObjInit */
#ifndef ImgOpenFileChannel
#ifndef RESOURCE_INCLUDED
VFUNC(Tcl_Channel,ImgOpenFileChannel,V_ImgOpenFileChannel,_ANSI_ARGS_((Tcl_Interp *interp,
CONST char *fileName, int permissions)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgOpenFileChannel */
#ifndef ImgPhotoPutBlock
#ifndef RESOURCE_INCLUDED
VFUNC(int,ImgPhotoPutBlock,V_ImgPhotoPutBlock,_ANSI_ARGS_((Tk_PhotoHandle handle,
Tk_PhotoImageBlock *blockPtr, int x, int y, int width, int height)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgPhotoPutBlock */
#ifndef ImgPutc
#ifndef RESOURCE_INCLUDED
VFUNC(int,ImgPutc,V_ImgPutc,_ANSI_ARGS_((int c, MFile *handle)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgPutc */
#ifndef ImgRead
#ifndef RESOURCE_INCLUDED
VFUNC(int,ImgRead,V_ImgRead,_ANSI_ARGS_((MFile *handle, char *dst, int count)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgRead */
#ifndef ImgReadInit
#ifndef RESOURCE_INCLUDED
VFUNC(int,ImgReadInit,V_ImgReadInit,_ANSI_ARGS_((Tcl_Obj *data, int c, MFile *handle)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgReadInit */
#ifndef ImgWrite
#ifndef RESOURCE_INCLUDED
VFUNC(int,ImgWrite,V_ImgWrite,_ANSI_ARGS_((MFile *handle, CONST char *src, int count)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgWrite */
#ifndef ImgWriteInit
#ifndef RESOURCE_INCLUDED
VFUNC(void,ImgWriteInit,V_ImgWriteInit,_ANSI_ARGS_((Tcl_DString *buffer, MFile *handle)))
#endif /* #ifndef RESOURCE_INCLUDED */
#endif /* #ifndef ImgWriteInit */
#endif /* _IMGINT */
|