   initworkspace();
   initenv();
   initsleep();
-  pfstring(PSTR("uLisp 4.0 "), pserial); pln(pserial);
+  pfstring(PSTR("uLisp 4.1 "), pserial); pln(pserial);
 }
 
 // Read/Evaluate/Print loop

/* uLisp AVR Version 4.0b - www.ulisp.com
   David Johnson-Davies - www.technoblogy.com - 31st August 2021
   
   Licensed under the MIT license: https://opensource.org/licenses/MIT
*/

  { string160, fn_millis, 0x00 },
  { string161, fn_sleep, 0x11 },
  { string162, fn_note, 0x03 },
  { string163, fn_register, 0x12 },
  { string164, fn_edit, 0x11 },
  { string165, fn_pprint, 0x12 },
  { string166, fn_pprintall, 0x01 },
  { string167, fn_format, 0x2F },
  { string168, fn_require, 0x11 },
  { string169, fn_listlibrary, 0x00 },
  { string170, NULL, 0x00 },
  { string171, (fn_ptr_type)LED_BUILTIN, 0 },
  { string172, (fn_ptr_type)HIGH, DIGITALWRITE },
  { string173, (fn_ptr_type)LOW, DIGITALWRITE },
#if defined(CPU_ATmega328P)
  { string174, (fn_ptr_type)INPUT, PINMODE },
  { string175, (fn_ptr_type)INPUT_PULLUP, PINMODE },
  { string176, (fn_ptr_type)OUTPUT, PINMODE },
  { string177, (fn_ptr_type)DEFAULT, ANALOGREFERENCE },
  { string178, (fn_ptr_type)INTERNAL, ANALOGREFERENCE },
  { string179, (fn_ptr_type)EXTERNAL, ANALOGREFERENCE },
  { string180, (fn_ptr_type)&PORTB, REGISTER },
  { string181, (fn_ptr_type)&DDRB, REGISTER },
  { string182, (fn_ptr_type)&PINB, REGISTER },
  { string183, (fn_ptr_type)&PORTC, REGISTER },
  { string184, (fn_ptr_type)&DDRC, REGISTER },
  { string185, (fn_ptr_type)&PINC, REGISTER },
  { string186, (fn_ptr_type)&PORTD, REGISTER },
  { string187, (fn_ptr_type)&DDRD, REGISTER },
  { string188, (fn_ptr_type)&PIND, REGISTER },
  { string189, NULL, 0x00 },
#elif defined(CPU_ATmega1284P)
  { string174, (fn_ptr_type)INPUT, PINMODE },
  { string175, (fn_ptr_type)INPUT_PULLUP, PINMODE },
  { string176, (fn_ptr_type)OUTPUT, PINMODE },
  { string177, (fn_ptr_type)DEFAULT, ANALOGREFERENCE },
  { string178, (fn_ptr_type)INTERNAL1V1, ANALOGREFERENCE },
  { string179, (fn_ptr_type)INTERNAL2V56, ANALOGREFERENCE },
  { string180, (fn_ptr_type)EXTERNAL, ANALOGREFERENCE },
  { string181, (fn_ptr_type)&PORTA, REGISTER },
  { string182, (fn_ptr_type)&DDRA, REGISTER },
  { string183, (fn_ptr_type)&PINA, REGISTER },
  { string184, (fn_ptr_type)&PORTB, REGISTER },
  { string185, (fn_ptr_type)&DDRB, REGISTER },
  { string186, (fn_ptr_type)&PINB, REGISTER },
  { string187, (fn_ptr_type)&PORTC, REGISTER },
  { string188, (fn_ptr_type)&DDRC, REGISTER },
  { string189, (fn_ptr_type)&PINC, REGISTER },
  { string190, (fn_ptr_type)&PORTD, REGISTER },
  { string191, (fn_ptr_type)&DDRD, REGISTER },
  { string192, (fn_ptr_type)&PIND, REGISTER },
  { string193, NULL, 0x00 },
#elif defined(CPU_ATmega2560)
  { string174, (fn_ptr_type)INPUT, PINMODE },
  { string175, (fn_ptr_type)INPUT_PULLUP, PINMODE },
  { string176, (fn_ptr_type)OUTPUT, PINMODE },
  { string177, (fn_ptr_type)DEFAULT, ANALOGREFERENCE },
  { string178, (fn_ptr_type)INTERNAL1V1, ANALOGREFERENCE },
  { string179, (fn_ptr_type)INTERNAL2V56, ANALOGREFERENCE },
  { string180, (fn_ptr_type)EXTERNAL, ANALOGREFERENCE },
  { string181, (fn_ptr_type)&PORTA, REGISTER },
  { string182, (fn_ptr_type)&DDRA, REGISTER },
  { string183, (fn_ptr_type)&PINA, REGISTER },
  { string184, (fn_ptr_type)&PORTB, REGISTER },
  { string185, (fn_ptr_type)&DDRB, REGISTER },
  { string186, (fn_ptr_type)&PINB, REGISTER },
  { string187, (fn_ptr_type)&PORTC, REGISTER },
  { string188, (fn_ptr_type)&DDRC, REGISTER },
  { string189, (fn_ptr_type)&PINC, REGISTER },
  { string190, (fn_ptr_type)&PORTD, REGISTER },
  { string191, (fn_ptr_type)&DDRD, REGISTER },
  { string192, (fn_ptr_type)&PIND, REGISTER },
  { string193, (fn_ptr_type)&PORTE, REGISTER },
  { string194, (fn_ptr_type)&DDRE, REGISTER },
  { string195, (fn_ptr_type)&PINE, REGISTER },
  { string196, (fn_ptr_type)&PORTF, REGISTER },
  { string197, (fn_ptr_type)&DDRF, REGISTER },
  { string198, (fn_ptr_type)&PINF, REGISTER },
  { string199, (fn_ptr_type)&PORTG, REGISTER },
  { string200, (fn_ptr_type)&DDRG, REGISTER },
  { string201, (fn_ptr_type)&PING, REGISTER },
  { string202, (fn_ptr_type)&PORTJ, REGISTER },
  { string203, (fn_ptr_type)&DDRJ, REGISTER },
  { string204, (fn_ptr_type)&PINJ, REGISTER },
  { string205, NULL, 0x00 },
#elif defined(CPU_ATmega4809)
  { string174, (fn_ptr_type)INPUT, PINMODE },
  { string175, (fn_ptr_type)INPUT_PULLUP, PINMODE },
  { string176, (fn_ptr_type)OUTPUT, PINMODE },
  { string177, (fn_ptr_type)DEFAULT, ANALOGREFERENCE },
  { string178, (fn_ptr_type)INTERNAL, ANALOGREFERENCE },
  { string179, (fn_ptr_type)VDD, ANALOGREFERENCE },
  { string180, (fn_ptr_type)INTERNAL0V55, ANALOGREFERENCE },
  { string181, (fn_ptr_type)INTERNAL1V1, ANALOGREFERENCE },
  { string182, (fn_ptr_type)INTERNAL1V5, ANALOGREFERENCE },
  { string183, (fn_ptr_type)INTERNAL2V5, ANALOGREFERENCE },
  { string184, (fn_ptr_type)INTERNAL4V3, ANALOGREFERENCE },
  { string185, (fn_ptr_type)EXTERNAL, ANALOGREFERENCE },
  { string186, (fn_ptr_type)&PORTA_DIR, REGISTER },
  { string187, (fn_ptr_type)&PORTA_OUT, REGISTER },
  { string188, (fn_ptr_type)&PORTA_IN, REGISTER },
  { string189, (fn_ptr_type)&PORTB_DIR, REGISTER },
  { string190, (fn_ptr_type)&PORTB_OUT, REGISTER },
  { string191, (fn_ptr_type)&PORTB_IN, REGISTER },
  { string192, (fn_ptr_type)&PORTC_DIR, REGISTER },
  { string193, (fn_ptr_type)&PORTC_OUT, REGISTER },
  { string194, (fn_ptr_type)&PORTC_IN, REGISTER },
  { string195, (fn_ptr_type)&PORTD_DIR, REGISTER },
  { string196, (fn_ptr_type)&PORTD_OUT, REGISTER },
  { string197, (fn_ptr_type)&PORTD_IN, REGISTER },
  { string198, (fn_ptr_type)&PORTE_DIR, REGISTER },
  { string199, (fn_ptr_type)&PORTE_OUT, REGISTER },
  { string200, (fn_ptr_type)&PORTE_IN, REGISTER },
  { string201, (fn_ptr_type)&PORTF_DIR, REGISTER },
  { string202, (fn_ptr_type)&PORTF_OUT, REGISTER },
  { string203, (fn_ptr_type)&PORTF_IN, REGISTER },
  { string204, NULL, 0x00 },
#elif defined(CPU_AVR128DX48)
  { string174, (fn_ptr_type)INPUT, PINMODE },
  { string175, (fn_ptr_type)INPUT_PULLUP, PINMODE },
  { string176, (fn_ptr_type)OUTPUT, PINMODE },
  { string177, (fn_ptr_type)DEFAULT, ANALOGREFERENCE },
  { string178, (fn_ptr_type)VDD, ANALOGREFERENCE },
  { string179, (fn_ptr_type)INTERNAL1V024, ANALOGREFERENCE },
  { string180, (fn_ptr_type)INTERNAL2V048, ANALOGREFERENCE },
  { string181, (fn_ptr_type)INTERNAL4V096, ANALOGREFERENCE },
  { string182, (fn_ptr_type)INTERNAL2V5, ANALOGREFERENCE },
  { string183, (fn_ptr_type)EXTERNAL, ANALOGREFERENCE },
  { string184, (fn_ptr_type)ADC_DAC0, ANALOGREAD },
  { string185, (fn_ptr_type)ADC_TEMPERATURE, ANALOGREAD },
  { string186, (fn_ptr_type)&PORTA_DIR, REGISTER },
  { string187, (fn_ptr_type)&PORTA_OUT, REGISTER },
  { string188, (fn_ptr_type)&PORTA_IN, REGISTER },
  { string189, (fn_ptr_type)&PORTB_DIR, REGISTER },
  { string190, (fn_ptr_type)&PORTB_OUT, REGISTER },
  { string191, (fn_ptr_type)&PORTB_IN, REGISTER },
  { string192, (fn_ptr_type)&PORTC_DIR, REGISTER },
  { string193, (fn_ptr_type)&PORTC_OUT, REGISTER },
  { string194, (fn_ptr_type)&PORTC_IN, REGISTER },
  { string195, (fn_ptr_type)&PORTD_DIR, REGISTER },
  { string196, (fn_ptr_type)&PORTD_OUT, REGISTER },
  { string197, (fn_ptr_type)&PORTD_IN, REGISTER },
  { string198, (fn_ptr_type)&PORTE_DIR, REGISTER },
  { string199, (fn_ptr_type)&PORTE_OUT, REGISTER },
  { string200, (fn_ptr_type)&PORTE_IN, REGISTER },
  { string201, (fn_ptr_type)&PORTF_DIR, REGISTER },
  { string202, (fn_ptr_type)&PORTF_OUT, REGISTER },
  { string203, (fn_ptr_type)&PORTF_IN, REGISTER },
  { string204, NULL, 0x00 },
#endif

// Insert your own table entries here
