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.8 by root, Thu Jan 5 01:04:10 2006 UTC vs.
Revision 1.18 by root, Fri Jan 13 04:59:04 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) 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_USTRING_LEN, 19 DT_STR_LEN,
20 DT_WCS_LEN,
20 DT_XEVENT, 21 DT_XEVENT,
21}; 22};
22 23
23enum hook_type { 24enum hook_type {
24# define def(sym) HOOK_ ## sym, 25# define def(sym) HOOK_ ## sym,
25# include "hookinc.h" 26# include "hookinc.h"
26# undef def 27# undef def
27 HOOK_NUM, 28 HOOK_NUM,
28}; 29};
29 30
31struct rxvt_perl_term
32{
33 void *self;
34 unsigned long grabtime;
35 uint8_t should_invoke[HOOK_NUM];
36};
37
30struct rxvt_perl_interp 38struct rxvt_perl_interp
31{ 39{
32 rxvt_perl_interp (); 40 char **perl_environ;
41
33 ~rxvt_perl_interp (); 42 ~rxvt_perl_interp ();
34
35 bool should_invoke[HOOK_NUM];
36 43
37 void init (); 44 void init ();
38 bool invoke (rxvt_term *term, hook_type htype, ...); 45 bool invoke (rxvt_term *term, hook_type htype, ...);
46 void line_update (rxvt_term *term);
39}; 47};
40 48
41extern struct rxvt_perl_interp rxvt_perl; 49extern struct rxvt_perl_interp rxvt_perl;
42 50
43#else 51#else
52# define SHOULD_INVOKE(htype) false
44# define PERL_INVOKE(args) false 53# define HOOK_INVOKE(args) false
45#endif 54#endif
46 55
47#endif 56#endif
48 57

Diff Legend

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