File: tkGlue.m

package info (click to toggle)
perl-tk 1%3A800.015-1
  • links: PTS
  • area: main
  • in suites: potato
  • size: 17,636 kB
  • ctags: 18,270
  • sloc: ansic: 195,135; perl: 37,385; makefile: 4,380; sh: 2,286; yacc: 762
file content (70 lines) | stat: -rw-r--r-- 1,418 bytes parent folder | download | duplicates (3)
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
#ifndef _TKGLUE_VM
#define _TKGLUE_VM
#include "tkGlue_f.h"
#ifndef NO_VTABLES
#ifndef Call_Tk
#  define Call_Tk (*TkglueVptr->V_Call_Tk)
#endif

#ifndef EnterWidgetMethods
#  define EnterWidgetMethods (*TkglueVptr->V_EnterWidgetMethods)
#endif

#ifndef FindTkVarName
#  define FindTkVarName (*TkglueVptr->V_FindTkVarName)
#endif

#ifndef InterpHv
#  define InterpHv (*TkglueVptr->V_InterpHv)
#endif

#ifndef Lang_TkCommand
#  define Lang_TkCommand (*TkglueVptr->V_Lang_TkCommand)
#endif

#ifndef Lang_TkSubCommand
#  define Lang_TkSubCommand (*TkglueVptr->V_Lang_TkSubCommand)
#endif

#ifndef MakeReference
#  define MakeReference (*TkglueVptr->V_MakeReference)
#endif

#ifndef SVtoFont
#  define SVtoFont (*TkglueVptr->V_SVtoFont)
#endif

#ifndef SVtoHWND
#  define SVtoHWND (*TkglueVptr->V_SVtoHWND)
#endif

#ifndef SVtoWindow
#  define SVtoWindow (*TkglueVptr->V_SVtoWindow)
#endif

#ifndef TkToMainWindow
#  define TkToMainWindow (*TkglueVptr->V_TkToMainWindow)
#endif

#ifndef TkToWidget
#  define TkToWidget (*TkglueVptr->V_TkToWidget)
#endif

#ifndef WidgetRef
#  define WidgetRef (*TkglueVptr->V_WidgetRef)
#endif

#ifndef WindowCommand
#  define WindowCommand (*TkglueVptr->V_WindowCommand)
#endif

#ifndef XSTkCommand
#  define XSTkCommand (*TkglueVptr->V_XSTkCommand)
#endif

#ifndef install_vtab
#  define install_vtab (*TkglueVptr->V_install_vtab)
#endif

#endif /* NO_VTABLES */
#endif /* _TKGLUE_VM */