| 118 | } |
| 119 | |
| 120 | static OBJECT * debug_object_read( FILE * in ) |
| 121 | { |
| 122 | string buf[ 1 ]; |
| 123 | int ch; |
| 124 | OBJECT * result; |
| 125 | string_new( buf ); |
| 126 | while( ( ch = fgetc( in ) ) > 0 ) |
| 127 | { |
| 128 | string_push_back( buf, (char)ch ); |
| 129 | } |
| 130 | result = object_new( buf->value ); |
| 131 | string_free( buf ); |
| 132 | return result; |
| 133 | } |
| 134 | |
| 135 | static void debug_int_write( FILE * out, int i ) |
| 136 | { |
no test coverage detected