20 lines
393 B
C
20 lines
393 B
C
/**
|
|
* read.c
|
|
*
|
|
* First pass at a reader, for bootstrapping.
|
|
*
|
|
*
|
|
* (c) 2017 Simon Brooke <simon@journeyman.cc>
|
|
* Licensed under GPL version 2.0, or, at your option, any later version.
|
|
*/
|
|
|
|
#ifndef __read_h
|
|
#define __read_h
|
|
|
|
/**
|
|
* read the next object on this input stream and return a cons_pointer to it.
|
|
*/
|
|
struct cons_pointer read( struct stack_frame *frame, FILE * input );
|
|
|
|
#endif
|