github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-28 12:39:28 +00:00
Code Issues Projects Releases Wiki Activity

Remove unused atom_to_str() function and the warning it generates

Browse Source
This commit is contained in:
Nick Briggs
2022-12-28 14:16:19 -08:00
parent 55939e0bc9
commit a17460cd6b
2 changed files with 0 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/subr.c
View File

@@ -77,15 +77,6 @@ extern LispPTR *PENDINGINTERRUPT68k;
*/
/***********************************************************/
char *atom_to_str(LispPTR atom_index) {
PNCell *pnptr;
char *pname_base;
pnptr = (PNCell *)GetPnameCell(atom_index);
pname_base = (char *)NativeAligned2FromLAddr(pnptr->pnamebase);
return (pname_base + 1);
} /*atom_to_str*/
#define POP_SUBR_ARGS \
do { \
args[0] = NIL_PTR; \