diff --git a/Makefile b/Makefile new file mode 100644 index 0000000..cd1060b --- /dev/null +++ b/Makefile @@ -0,0 +1,5 @@ +ARDUINO_LIBS = SPI EEPROM +BOARD_TAG = uno +MONITOR_PORT = /dev/ttyACM* +# USER_LIB_PATH := $(realpath ../../libraries) +include /usr/share/arduino/Arduino.mk diff --git a/ulisp.ino b/ulisp.ino index d816e27..74df3b2 100644 --- a/ulisp.ino +++ b/ulisp.ino @@ -6,6 +6,7 @@ #include #include +#include // Compile options @@ -142,8 +143,24 @@ void repl(object *env); void printobject (object *form); char *lookupbuiltin (symbol_t name); int lookupfn (symbol_t name); +int lookupmin(symbol_t name); +int lookupmax(symbol_t name); int builtin (char* n); void Display (char c); +void error (const __FlashStringHelper *); +void pfstring (const __FlashStringHelper *); +void pint (int i); +void pln (); +void pfl (); +void pchar (char c); +int gchar (); +object *apply (object *function, object *args, object **env); +char *lookupsymbol (symbol_t name); +void deletesymbol (symbol_t name); +object *edit(object *fun); +int subwidthlist (object *form, int w); +void superprint (object *form, int lm); +void supersub (object *form, int lm, int super); // Set up workspace