 
 // Setup
 
-void initenv() {
+void initenv () {
   GlobalEnv = NULL;
   tee = symbol(TEE);
 }
 
-void setup() {
+void setup () {
   Serial.begin(9600);
   while (!Serial);  // wait for Serial to initialize
   initworkspace();
   initenv();
-  pfstring(PSTR("uLisp 2.0 "), pserial); pln(pserial);
+  set_sleep_mode(SLEEP_MODE_PWR_DOWN);
+  pfstring(PSTR("uLisp 2.1 "), pserial); pln(pserial);
 }
 
 // Read/Evaluate/Print loop

void repl(object *env);
void printobject (object *form, pfun_t pfun);
char *lookupbuiltin (symbol_t name);
int lookupfn (symbol_t name);
int builtin (char* n);
void Display (char c);


  return number(loadimage(args));
}

object *fn_cls (object *args, object *env) {
  (void) args, (void) env;
  pserial(12);
  return nil;
