|
Lines 142-153
Link Here
|
| 142 |
#endif |
142 |
#endif |
| 143 |
if(code < 0) { |
143 |
if(code < 0) { |
| 144 |
if(bufp != buffer) |
144 |
if(bufp != buffer) |
| 145 |
free(buffer); |
145 |
free(bufp); |
| 146 |
failwith("ml_print_string"); |
146 |
failwith("ml_print_string"); |
| 147 |
} |
147 |
} |
| 148 |
v_result = copy_string(bufp); |
148 |
v_result = copy_string(bufp); |
| 149 |
if(bufp != buffer) |
149 |
if(bufp != buffer) |
| 150 |
free(buffer); |
150 |
free(bufp); |
| 151 |
return v_result; |
151 |
return v_result; |
| 152 |
} |
152 |
} |
| 153 |
|
153 |
|
|
Lines 190-201
Link Here
|
| 190 |
#endif |
190 |
#endif |
| 191 |
if(code < 0) { |
191 |
if(code < 0) { |
| 192 |
if(bufp != buffer) |
192 |
if(bufp != buffer) |
| 193 |
free(buffer); |
193 |
free(bufp); |
| 194 |
failwith("ml_print_string"); |
194 |
failwith("ml_print_string"); |
| 195 |
} |
195 |
} |
| 196 |
v_result = copy_string(bufp); |
196 |
v_result = copy_string(bufp); |
| 197 |
if(bufp != buffer) |
197 |
if(bufp != buffer) |
| 198 |
free(buffer); |
198 |
free(bufp); |
| 199 |
return v_result; |
199 |
return v_result; |
| 200 |
} |
200 |
} |
| 201 |
|
201 |
|
