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.22 by root, Sat Aug 26 06:37:11 2006 UTC vs.
Revision 1.25 by root, Tue Jun 5 19:32:29 2012 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) \
10 ( (htype) == HOOK_INIT \
11 || (htype) == HOOK_DESTROY \
12 || (htype) == HOOK_REFRESH_BEGIN \
13 || (htype) == HOOK_REFRESH_END \
14 || perl.should_invoke [htype])
15# define HOOK_INVOKE(args) rxvt_perl.invoke args
16 9
17#include "rxvt.h" 10#define SHOULD_INVOKE(htype) \
11 ( (htype) == HOOK_INIT \
12 || (htype) == HOOK_DESTROY \
13 || (htype) == HOOK_REFRESH_BEGIN \
14 || (htype) == HOOK_REFRESH_END \
15 || perl.should_invoke [htype])
16#define HOOK_INVOKE(args) rxvt_perl.invoke args
18 17
19enum data_type { 18enum data_type {
20 DT_END, // no further arguments 19 DT_END, // no further arguments
21 DT_INT, 20 DT_INT,
22 DT_LONG, 21 DT_LONG,
… …
37struct rxvt_perl_term 36struct rxvt_perl_term
38{ 37{
39 void *self; 38 void *self;
40 unsigned long grabtime; 39 unsigned long grabtime;
41 uint8_t should_invoke[HOOK_NUM]; 40 uint8_t should_invoke[HOOK_NUM];
41
42 // this object must be zero-initialised
43 rxvt_perl_term ()
44 {
45 should_invoke [HOOK_INIT] =
46 should_invoke [HOOK_DESTROY] = 1;
47 }
42}; 48};
43 49
44struct rxvt_perl_interp 50struct rxvt_perl_interp
45{ 51{
46 char **perl_environ; 52 char **perl_environ;
… …
48 ~rxvt_perl_interp (); 54 ~rxvt_perl_interp ();
49 55
50 void init (rxvt_term *term); 56 void init (rxvt_term *term);
51 bool invoke (rxvt_term *term, hook_type htype, ...); 57 bool invoke (rxvt_term *term, hook_type htype, ...);
52 void line_update (rxvt_term *term); 58 void line_update (rxvt_term *term);
59 void selection_finish (rxvt_selection *sel, char *data, unsigned int len);
60 void usage (int type);
61
62 enum
63 {
64 RESOURCE_AVAILABLE = 0,
65 RESOURCE_BOOLEAN = 1
66 };
67 uint8_t resource (rxvt_term *term, const char *name, bool arg, bool longopt, bool flag, const char *value);
53}; 68};
54 69
55extern struct rxvt_perl_interp rxvt_perl; 70extern struct rxvt_perl_interp rxvt_perl;
56 71
57#else 72#else
73
58# define SHOULD_INVOKE(htype) false 74#define SHOULD_INVOKE(htype) false
59# define HOOK_INVOKE(args) false 75#define HOOK_INVOKE(args) false
76
60#endif 77#endif
61 78
62#endif 79#endif
63 80

Diff Legend

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