| … | |
… | |
| 62 | |
62 | |
| 63 | // serialise perl part |
63 | // serialise perl part |
| 64 | void put_ (attachable *ext); |
64 | void put_ (attachable *ext); |
| 65 | void put (attachable *ext) |
65 | void put (attachable *ext) |
| 66 | { |
66 | { |
| 67 | if (expect_false (ext->self)) |
67 | if (ecb_expect_false (ext->self)) |
| 68 | put_ (ext); |
68 | put_ (ext); |
| 69 | } |
69 | } |
| 70 | |
70 | |
| 71 | // null value (== no space after keyword) |
71 | // null value (== no space after keyword) |
| 72 | void put (const keyword_string k) |
72 | void put (const keyword_string k) |
| … | |
… | |
| 84 | alloc (p); |
84 | alloc (p); |
| 85 | } |
85 | } |
| 86 | |
86 | |
| 87 | void put (const keyword_string k, const_utf8_string v) |
87 | void put (const keyword_string k, const_utf8_string v) |
| 88 | { |
88 | { |
| 89 | if (expect_true (v)) |
89 | if (ecb_expect_true (v)) |
| 90 | put (k, keyword_string (v, strlen (v))); |
90 | put (k, keyword_string (v, strlen (v))); |
| 91 | else |
91 | else |
| 92 | put (k); |
92 | put (k); |
| 93 | } |
93 | } |
| 94 | |
94 | |
| … | |
… | |
| 138 | void put (const keyword_string kbeg, const keyword_string kend, shstr_tmp v) |
138 | void put (const keyword_string kbeg, const keyword_string kend, shstr_tmp v) |
| 139 | { |
139 | { |
| 140 | force (MAX_KEYWORD_LEN + 1); |
140 | force (MAX_KEYWORD_LEN + 1); |
| 141 | fadd (kbeg.s, kbeg.l); fadd ('\n'); |
141 | fadd (kbeg.s, kbeg.l); fadd ('\n'); |
| 142 | |
142 | |
| 143 | if (expect_true (v)) |
143 | if (ecb_expect_true (v)) |
| 144 | { |
144 | { |
| 145 | add (v); |
145 | add (v); |
| 146 | add ('\n'); |
146 | add ('\n'); |
| 147 | } |
147 | } |
| 148 | |
148 | |
