ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/rxvtperl.h
(Generate patch)

Comparing rxvt-unicode/src/rxvtperl.h (file contents):
Revision 1.7 by root, Wed Jan 4 02:37:30 2006 UTC vs.
Revision 1.13 by root, Sat Jan 7 19:29:17 2006 UTC

… …
4 4
5#ifndef RXVTPERL_H_ 5#ifndef RXVTPERL_H_
6#define RXVTPERL_H_ 6#define RXVTPERL_H_
7 7
8#if ENABLE_PERL 8#if ENABLE_PERL
9# define SHOULD_INVOKE(htype) rxvt_perl.should_invoke [htype]
10# define HOOK_INVOKE(args) rxvt_perl.invoke args
9 11
10#include "rxvt.h" 12#include "rxvt.h"
11
12#define PERL_INVOKE(args) rxvt_perl.invoke args
13 13
14enum data_type { 14enum data_type {
15 DT_END, 15 DT_END,
16 DT_INT, 16 DT_INT,
17 DT_LONG, 17 DT_LONG,
18 DT_STRING, 18 DT_STR,
19 DT_STR_LEN,
20 DT_WCS_LEN,
19 DT_XEVENT, 21 DT_XEVENT,
20}; 22};
21 23
22enum hook_type { 24enum hook_type {
23# define def(sym) HOOK_ ## sym, 25# define def(sym) HOOK_ ## sym,
24# include "hookinc.h" 26# include "hookinc.h"
25# undef def 27# undef def
26 HOOK_NUM, 28 HOOK_NUM,
29};
30
31struct rxvt_perl_term
32{
33 void *self;
34 unsigned long grabtime;
27}; 35};
28 36
29struct rxvt_perl_interp 37struct rxvt_perl_interp
30{ 38{
31 rxvt_perl_interp (); 39 rxvt_perl_interp ();
… …
33 41
34 bool should_invoke[HOOK_NUM]; 42 bool should_invoke[HOOK_NUM];
35 43
36 void init (); 44 void init ();
37 bool invoke (rxvt_term *term, hook_type htype, ...); 45 bool invoke (rxvt_term *term, hook_type htype, ...);
46 void line_update (rxvt_term *term);
38}; 47};
39 48
40extern struct rxvt_perl_interp rxvt_perl; 49extern struct rxvt_perl_interp rxvt_perl;
41 50
42#else 51#else
52# define SHOULD_INVOKE(htype) false
43# define PERL_INVOKE(args) false 53# define HOOK_INVOKE(args) false
44#endif 54#endif
45 55
46#endif 56#endif
47 57

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines