kyle
/
ulisp-picocalc
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Version 4.3a - 18th September 2022 

Fixes compile errors with BBC Micro:bit.
This commit is contained in:
David Johnson-Davies 2022-09-18 10:56:27 +01:00 committed by GitHub
parent d72cfe3833
commit 27d2480c65
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
ulisp-arm.ino
View File

@ -1,5 +1,5 @@
/* uLisp ARM Version 4.3 - www.ulisp.com
David Johnson-Davies - www.technoblogy.com - 15th September 2022
/* uLisp ARM Version 4.3a - www.ulisp.com
David Johnson-Davies - www.technoblogy.com - 18th September 2022
Licensed under the MIT license: https://opensource.org/licenses/MIT
*/
@ -1707,7 +1707,7 @@ char *cstring (builtin_t name, object *form, char *buffer, int buflen) {
return buffer;
}
IPAddress ipstring (builtin_t name, object *form) {
uint32_t ipstring (builtin_t name, object *form) {
form = cdr(checkstring(name, form));
int p = 0;
union { uint32_t ipaddress; uint8_t ipbytes[4]; } ;
@ -2076,7 +2076,6 @@ void serialend (int address) {
#elif defined(ULISP_SERIAL1)
if (address == 1) {Serial1.flush(); Serial1.end(); }
#else
(void) baud;
if (false);
#endif
else error(WITHSERIAL, PSTR("port not supported"), number(address));
@ -7062,7 +7061,7 @@ void setup () {
initenv();
initsleep();
initgfx();
pfstring(PSTR("uLisp 4.3 "), pserial); pln(pserial);
pfstring(PSTR("uLisp 4.3a "), pserial); pln(pserial);
}
// Read/Evaluate/Print loop
@ -7116,4 +7115,4 @@ void loop () {
client.stop();
#endif
repl(NULL);
}
}