… | |
… | |
12 | |
12 | |
13 | rxvt_term * TERM |
13 | rxvt_term * TERM |
14 | rxvt_img * IMG |
14 | rxvt_img * IMG |
15 | |
15 | |
16 | GError ** T_UV |
16 | GError ** T_UV |
|
|
17 | |
|
|
18 | render_repeat_mode RENDER_REPEAT_MODE |
17 | |
19 | |
18 | INPUT |
20 | INPUT |
19 | |
21 | |
20 | TERM |
22 | TERM |
21 | $var = SvTERM ($arg); |
23 | $var = SvTERM ($arg); |
… | |
… | |
32 | if (SvROK ($arg) && sv_derived_from ($arg, \"urxvt::img\")) |
34 | if (SvROK ($arg) && sv_derived_from ($arg, \"urxvt::img\")) |
33 | $var = INT2PTR ($type, SvIV ((SV *) SvRV ($arg))); |
35 | $var = INT2PTR ($type, SvIV ((SV *) SvRV ($arg))); |
34 | else |
36 | else |
35 | croak (\"%s is not of type urxvt::img\", \"$var\") |
37 | croak (\"%s is not of type urxvt::img\", \"$var\") |
36 | |
38 | |
|
|
39 | RENDER_REPEAT_MODE |
|
|
40 | if (SvOK ($arg)) |
|
|
41 | { |
|
|
42 | $var = SvIV ($arg); |
|
|
43 | if ($var != RepeatNone && $var != RepeatNormal && $var != RepeatPad && $var != RepeatReflect) |
|
|
44 | croak (\"invalid repeat mode specified (%d)\\n\", $var); |
|
|
45 | } |
|
|
46 | else |
|
|
47 | $var = RepeatNormal; |
|
|
48 | |
37 | OUTPUT |
49 | OUTPUT |
38 | |
50 | |
39 | TERM |
51 | TERM |
40 | $arg = newSVterm ($var); |
52 | $arg = newSVterm ($var); |
41 | |
53 | |