Skip to content

Commit 769869d

Browse files
dragoncoder047dragoncoder047
committed
remove PROGMEM from extension files
1 parent 9711ac0 commit 769869d

File tree

2 files changed

+48
-48
lines changed

2 files changed

+48
-48
lines changed

‎bignums.hpp

Lines changed: 37 additions & 37 deletions
Original file line numberDiff line numberDiff line change
@@ -489,64 +489,64 @@ object* fn_BIGash (object* args, object* env) {
489489
}
490490

491491
// Symbol names
492-
const char stringBIGbignum[] PROGMEM = "$bignum";
493-
const char stringBIGinteger[] PROGMEM = "$integer";
494-
const char stringBIGbignumstring[] PROGMEM = "$bignum-string";
495-
const char stringBIGstringbignum[] PROGMEM = "$string-bignum";
496-
const char stringBIGzerop[] PROGMEM = "$zerop";
497-
const char stringBIGdecf[] PROGMEM = "$decf";
498-
const char stringBIGincf[] PROGMEM = "$incf";
499-
const char stringBIGadd[] PROGMEM = "$+";
500-
const char stringBIGsub[] PROGMEM = "$-";
501-
const char stringBIGmul[] PROGMEM = "$*";
502-
const char stringBIGdiv[] PROGMEM = "$/";
503-
const char stringBIGmod[] PROGMEM = "$mod";
504-
const char stringBIGequal[] PROGMEM = "$=";
505-
const char stringBIGless[] PROGMEM = "$<";
506-
const char stringBIGgreater[] PROGMEM = "$>";
507-
const char stringBIGlogand[] PROGMEM = "$logand";
508-
const char stringBIGlogior[] PROGMEM = "$logior";
509-
const char stringBIGlogxor[] PROGMEM = "$logxor";
510-
const char stringBIGash[] PROGMEM = "$ash";
492+
const char stringBIGbignum[] = "$bignum";
493+
const char stringBIGinteger[] = "$integer";
494+
const char stringBIGbignumstring[] = "$bignum-string";
495+
const char stringBIGstringbignum[] = "$string-bignum";
496+
const char stringBIGzerop[] = "$zerop";
497+
const char stringBIGdecf[] = "$decf";
498+
const char stringBIGincf[] = "$incf";
499+
const char stringBIGadd[] = "$+";
500+
const char stringBIGsub[] = "$-";
501+
const char stringBIGmul[] = "$*";
502+
const char stringBIGdiv[] = "$/";
503+
const char stringBIGmod[] = "$mod";
504+
const char stringBIGequal[] = "$=";
505+
const char stringBIGless[] = "$<";
506+
const char stringBIGgreater[] = "$>";
507+
const char stringBIGlogand[] = "$logand";
508+
const char stringBIGlogior[] = "$logior";
509+
const char stringBIGlogxor[] = "$logxor";
510+
const char stringBIGash[] = "$ash";
511511

512512
// Documentation strings
513-
const char docBIGbignum[] PROGMEM = "($bignum int)\n"
513+
const char docBIGbignum[] = "($bignum int)\n"
514514
"Converts an integer to a bignum and returns it.";
515-
const char docBIGinteger[] PROGMEM = "($integer bignum)\n"
515+
const char docBIGinteger[] = "($integer bignum)\n"
516516
"Converts a bignum to an integer and returns it.";
517-
const char docBIGbignumstring[] PROGMEM = "($bignum-string bignum [base])\n"
517+
const char docBIGbignumstring[] = "($bignum-string bignum [base])\n"
518518
"Converts a bignum to a string in base 10 (default) or 16 and returns it.";
519-
const char docBIGstringbignum[] PROGMEM = "($string-bignum bignum [base])\n"
519+
const char docBIGstringbignum[] = "($string-bignum bignum [base])\n"
520520
"Converts a bignum to a string in the specified base (default 10) and returns it.";
521-
const char docBIGzerop[] PROGMEM = "($zerop bignum)\n"
521+
const char docBIGzerop[] = "($zerop bignum)\n"
522522
"Tests whether a bignum is zero, allowing for trailing zeros.";
523-
const char docBIGadd[] PROGMEM = "($+ bignum1 bignum2)\n"
523+
const char docBIGadd[] = "($+ bignum1 bignum2)\n"
524524
"Adds two bignums and returns the sum as a new bignum.";
525-
const char docBIGsub[] PROGMEM = "($- bignum1 bignum2)\n"
525+
const char docBIGsub[] = "($- bignum1 bignum2)\n"
526526
"Subtracts two bignums and returns the difference as a new bignum.";
527-
const char docBIGmul[] PROGMEM = "($* bignum1 bignum2)\n"
527+
const char docBIGmul[] = "($* bignum1 bignum2)\n"
528528
"Multiplies two bignums and returns the product as a new bignum.";
529-
const char docBIGdiv[] PROGMEM = "($/ bignum1 bignum2)\n"
529+
const char docBIGdiv[] = "($/ bignum1 bignum2)\n"
530530
"Divides two bignums and returns the quotient as a new bignum.";
531-
const char docBIGmod[] PROGMEM = "($mod bignum1 bignum2)\n"
531+
const char docBIGmod[] = "($mod bignum1 bignum2)\n"
532532
"Divides two bignums and returns the remainder as a new bignum.";
533-
const char docBIGequal[] PROGMEM = "($= bignum1 bignum2)\n"
533+
const char docBIGequal[] = "($= bignum1 bignum2)\n"
534534
"Returns t if the two bignums are equal.";
535-
const char docBIGless[] PROGMEM = "($< bignum1 bignum2)\n"
535+
const char docBIGless[] = "($< bignum1 bignum2)\n"
536536
"Returns t if bignum1 is less than bignum2.";
537-
const char docBIGgreater[] PROGMEM = "($> bignum1 bignum2)\n"
537+
const char docBIGgreater[] = "($> bignum1 bignum2)\n"
538538
"Returns t if bignum1 is greater than bignum2.";
539-
const char docBIGlogand[] PROGMEM = "($logand bignum bignum)\n"
539+
const char docBIGlogand[] = "($logand bignum bignum)\n"
540540
"Returns the logical AND of two bignums.";
541-
const char docBIGlogior[] PROGMEM = "($logior bignum bignum)\n"
541+
const char docBIGlogior[] = "($logior bignum bignum)\n"
542542
"Returns the logical inclusive OR of two bignums.";
543-
const char docBIGlogxor[] PROGMEM = "($logxor bignum bignum)\n"
543+
const char docBIGlogxor[] = "($logxor bignum bignum)\n"
544544
"Returns the logical exclusive OR of two bignums.";
545-
const char docBIGash[] PROGMEM = "($ash bignum shift)\n"
545+
const char docBIGash[] = "($ash bignum shift)\n"
546546
"Returns bignum shifted by shift bits; positive means left.";
547547

548548
// Symbol lookup table
549-
const tbl_entry_t BignumsTable[] PROGMEM = {
549+
const tbl_entry_t BignumsTable[] = {
550550
{ stringBIGbignum, fn_BIGbignum, MINMAX(FUNCTIONS, 1, 1), docBIGbignum },
551551
{ stringBIGinteger, fn_BIGinteger, MINMAX(FUNCTIONS, 1, 1), docBIGinteger },
552552
{ stringBIGbignumstring, fn_BIGbignumstring, MINMAX(FUNCTIONS, 1, 2), docBIGbignumstring },

‎extensions.hpp

Lines changed: 11 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -25,8 +25,8 @@ object* fn_now (object* args, object* env) {
2525
return cons(hours, cons(minutes, cons(seconds, nil)));
2626
}
2727

28-
const char stringnow[] PROGMEM = "now";
29-
const char docnow[] PROGMEM = "(now [hh mm ss])\n"
28+
const char stringnow[] = "now";
29+
const char docnow[] = "(now [hh mm ss])\n"
3030
"Sets the current time, or with no arguments returns the current time\n"
3131
"as a list of three integers (hh mm ss).";
3232

@@ -48,8 +48,8 @@ object* fn_gensym (object* args, object* env) {
4848
return result;
4949
}
5050

51-
const char stringgensym[] PROGMEM = "gensym";
52-
const char docgensym[] PROGMEM = "(gensym [prefix])\n"
51+
const char stringgensym[] = "gensym";
52+
const char docgensym[] = "(gensym [prefix])\n"
5353
"Returns a new symbol, optionally beginning with prefix (which must be a string).\n"
5454
"The returned symbol is guaranteed to not conflict with any existing bound symbol.";
5555

@@ -58,8 +58,8 @@ object* fn_intern (object* args, object* env) {
5858
return buftosymbol(cstring(checkstring(first(args)), b, BUFFERSIZE));
5959
}
6060

61-
const char stringintern[] PROGMEM = "intern";
62-
const char docintern[] PROGMEM = "(intern string)\n"
61+
const char stringintern[] = "intern";
62+
const char docintern[] = "(intern string)\n"
6363
"Creates a symbol, with the same name as the string.\n"
6464
"Unlike gensym, the returned symbol is not modified from the string in any way,\n"
6565
"and so it may be bound.";
@@ -77,8 +77,8 @@ object* fn_sizeof (object* args, object* env) {
7777
return number(count);
7878
}
7979

80-
const char stringsizeof[] PROGMEM = "sizeof";
81-
const char docsizeof[] PROGMEM = "(sizeof obj)\n"
80+
const char stringsizeof[] = "sizeof";
81+
const char docsizeof[] = "(sizeof obj)\n"
8282
"Returns the number of Lisp cells the object occupies in memory.";
8383

8484
void destructure (object* structure, object* data, object** env) {
@@ -106,13 +106,13 @@ object* sp_destructuring_bind (object* args, object* env) {
106106
return result;
107107
}
108108

109-
const char stringdestructuringbind[] PROGMEM = "destructuring-bind";
110-
const char docdestructuringbind[] PROGMEM = "(destructuring-bind structure data [forms*])\n\n"
109+
const char stringdestructuringbind[] = "destructuring-bind";
110+
const char docdestructuringbind[] = "(destructuring-bind structure data [forms*])\n\n"
111111
"Recursively assigns the datums of `data` to the symbols named in `structure`,\n"
112112
"and then evaluates forms in that new environment.";
113113

114114
// Symbol lookup table
115-
const tbl_entry_t ExtensionsTable[] PROGMEM = {
115+
const tbl_entry_t ExtensionsTable[] = {
116116
{ stringnow, fn_now, MINMAX(FUNCTIONS, 0, 3), docnow },
117117
{ stringgensym, fn_gensym, MINMAX(FUNCTIONS, 0, 1), docgensym },
118118
{ stringintern, fn_intern, MINMAX(FUNCTIONS, 1, 1), docintern },

0 commit comments

Comments
 (0)