Finish basics of Lisp parser, add simple test
diff --git a/src/lisp/main.c b/src/lisp/main.c
index 7c8224e..4ed48ea 100644
--- a/src/lisp/main.c
+++ b/src/lisp/main.c
@@ -2,7 +2,13 @@
int main (int argc, char **argv)
{
- struct istream *is = new_stristream_nt ("abcde \"asdf dsf sdf\"");
+ if ( argc < 2 )
+ {
+ puts ("pass the string you want to parse as the first argument please");
+ return 1;
+ }
+
+ struct istream *is = new_stristream_nt (argv[ 1 ]);
struct value val;
while ( read1 (is, &val) )