| 1 | /* |
1 | /* |
| 2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
| 3 | * |
3 | * |
| 4 | * Copyright (©) 2005,2006,2007,2008,2009 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
| 5 | * |
5 | * |
| 6 | * Deliantra is free software: you can redistribute it and/or modify it under |
6 | * Deliantra is free software: you can redistribute it and/or modify it under |
| 7 | * the terms of the Affero GNU General Public License as published by the |
7 | * the terms of the Affero GNU General Public License as published by the |
| 8 | * Free Software Foundation, either version 3 of the License, or (at your |
8 | * Free Software Foundation, either version 3 of the License, or (at your |
| 9 | * option) any later version. |
9 | * option) any later version. |
| … | |
… | |
| 24 | // cfperl.h perl interface |
24 | // cfperl.h perl interface |
| 25 | // |
25 | // |
| 26 | #ifndef CFPERL_H__ |
26 | #ifndef CFPERL_H__ |
| 27 | #define CFPERL_H__ |
27 | #define CFPERL_H__ |
| 28 | |
28 | |
| 29 | #include <cstdarg> |
|
|
| 30 | #include <cstdio> |
|
|
| 31 | #include <bitset> |
|
|
| 32 | |
|
|
| 33 | using namespace std; |
29 | using namespace std; |
| 34 | |
30 | |
| 35 | #include <EXTERN.h> |
31 | #include <EXTERN.h> |
| 36 | #include <perl.h> |
32 | #include <perl.h> |
| 37 | #include <XSUB.h> |
33 | #include <XSUB.h> |
| … | |
… | |
| 254 | set_key (key, value, 0); |
250 | set_key (key, value, 0); |
| 255 | } |
251 | } |
| 256 | |
252 | |
| 257 | attachable &operator =(const attachable &src); |
253 | attachable &operator =(const attachable &src); |
| 258 | |
254 | |
| 259 | // used to _quickly_ device wether to shortcut the evaluation |
255 | // used to _quickly_ decide wether to shortcut the evaluation |
| 260 | bool should_invoke (event_type event) |
256 | bool should_invoke (event_type event) |
| 261 | { |
257 | { |
| 262 | return ev_want_event [event] || cb; |
258 | return ev_want_event [event] || cb; |
| 263 | } |
259 | } |
| 264 | |
260 | |
