Skip to content

Commit 8d3886d

Browse files
Merge branch 'master' of https://github.com/technoblogy/ulisp-esp into master
2 parents f4cd15c + d182ddf commit 8d3886d

File tree

2 files changed

+1230
-824
lines changed

2 files changed

+1230
-824
lines changed

ulisp-esp32.ino

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
1-
/* uLisp ESP Release 4.4d - www.ulisp.com
2-
David Johnson-Davies - www.technoblogy.com - 30th June 2023
1+
/* uLisp ESP Release 4.6 - www.ulisp.com
2+
David Johnson-Davies - www.technoblogy.com - 13th June 2024
33
44
Licensed under the MIT license: https://opensource.org/licenses/MIT
55
*/
@@ -23,7 +23,7 @@
2323
#include "extensions.hpp"
2424
#include "bignums.hpp"
2525

26-
const char foo[] PROGMEM =
26+
const char foo[] =
2727
"(defvar *loaded* nil)"
2828
"(defun load(filename)(if(null(search(list filename)*loaded*))(with-sd-card(f filename)(push filename *loaded*)(loop(let((form(read f)))(unless form(return))(eval form))))))"
2929
"(load \"main.lisp\")"
@@ -38,7 +38,7 @@ int getfoo() {
3838
return temp;
3939
}
4040
if (fooi == foolen) return -1;
41-
char c = (char)pgm_read_byte(&foo[fooi]);
41+
char c = foo[fooi];
4242
fooi++;
4343
return c;
4444
}
@@ -69,7 +69,7 @@ void setup () {
6969
ulispinit();
7070
addtable(ExtensionsTable);
7171
addtable(BignumsTable);
72-
Serial.println(F("\n\n\nuLisp 4.4d-mod!"));
72+
Serial.println(F("\n\n\nuLisp 4.6-mod!"));
7373
sdmain();
7474
}
7575

0 commit comments

Comments
 (0)
pFad - Phonifier reborn

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.


Alternative Proxies:

Alternative Proxy

pFad Proxy

pFad v3 Proxy

pFad v4 Proxy