/usr/lib/perl5/Tk/tkGlue_f.h is in perl-tk 1:804.031-1build1.
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 | #ifndef TKGLUE_VT
#define TKGLUE_VT
typedef struct TkglueVtab
{
unsigned (*tabSize)(void);
#define VFUNC(type,name,mem,args) type (*mem) args;
#define VVAR(type,name,mem) type (*mem);
#include "tkGlue.t"
#undef VFUNC
#undef VVAR
} TkglueVtab;
extern TkglueVtab *TkglueVptr;
extern TkglueVtab *TkglueVGet(void);
#endif /* TKGLUE_VT */
|