Further small changes on the way to a reader.

This commit is contained in:
Simon Brooke 2026-04-01 08:50:35 +01:00
parent a302663b32
commit cc8e96eda4
4 changed files with 60 additions and 3 deletions

View file

@ -69,4 +69,17 @@ struct pso_pointer read_example( struct pso4 *frame,
}
// struct pso_pointer read
/**
* Read the next object on this input stream and return a pso_pointer to it.
*/
struct pso_pointer read( struct pso4 *frame,
struct pso_pointer frame_pointer,
struct pso_pointer env ) {
struct pso_pointer* character = fetch_arg( frame, 0);
struct pso_pointer stream = fetch_arg( frame, 1);
struct pso_pointer readtable = fetch_arg( frame, 2);
if (nilp(stream)) {
}
}