Add optional, variadic arguments
diff --git a/src/lisp/istream.c b/src/lisp/istream.c
index 957b2b5..8ac275a 100644
--- a/src/lisp/istream.c
+++ b/src/lisp/istream.c
@@ -130,6 +130,7 @@
int next;
bool has_next;
int line;
+ char *path;
};
int fistream_peek(struct istream *is)
@@ -192,7 +193,7 @@
struct fistream_private *p = is->data;
*line = p->line;
- *name = "<FILE *>";
+ *name = p->path;
}
struct istream *new_fistream(char *path, bool binary)
@@ -213,6 +214,7 @@
p->has_next = false;
p->file = fp;
p->line = 1;
+ p->path = path;
is->data = p;
is->get = fistream_get;