… | |
… | |
14 | |
14 | |
15 | #ifdef _WIN32 |
15 | #ifdef _WIN32 |
16 | # undef pipe |
16 | # undef pipe |
17 | #endif |
17 | #endif |
18 | |
18 | |
|
|
19 | #include <assert.h> |
19 | #include <math.h> |
20 | #include <math.h> |
20 | #include <string.h> |
21 | #include <string.h> |
21 | #include <stdio.h> |
22 | #include <stdio.h> |
22 | #include <stdlib.h> |
23 | #include <stdlib.h> |
23 | |
24 | |
… | |
… | |
491 | newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); |
492 | newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); |
492 | |
493 | |
493 | assert (SDLK_MODIFIER_MIN == SDLK_NUMLOCK); |
494 | assert (SDLK_MODIFIER_MIN == SDLK_NUMLOCK); |
494 | assert (SDLK_MODIFIER_MAX == SDLK_COMPOSE); |
495 | assert (SDLK_MODIFIER_MAX == SDLK_COMPOSE); |
495 | } |
496 | } |
|
|
497 | |
|
|
498 | void |
|
|
499 | weaken (SV *rv) |
|
|
500 | PROTOTYPE: $ |
|
|
501 | CODE: |
|
|
502 | sv_rvweaken (rv); |
496 | |
503 | |
497 | int |
504 | int |
498 | in_destruct () |
505 | in_destruct () |
499 | CODE: |
506 | CODE: |
500 | RETVAL = PL_main_cv == Nullcv; |
507 | RETVAL = PL_main_cv == Nullcv; |