From 8c6aceac1889ebefc1e81c2b20c34c6d00a62608 Mon Sep 17 00:00:00 2001 From: Bruce Mitchener Date: Tue, 22 Dec 2020 22:29:04 +0700 Subject: [PATCH] Remove #ifdef DEMO. --- src/dsk.c | 6 ------ src/main.c | 3 --- src/vmemsave.c | 5 ----- 3 files changed, 14 deletions(-) diff --git a/src/dsk.c b/src/dsk.c index 0e1e804a..e48a17b8 100644 --- a/src/dsk.c +++ b/src/dsk.c @@ -2030,10 +2030,6 @@ LispPTR COM_writepage(register LispPTR *args) return (NIL); } -#ifdef DEMO -/* Do nothing if this is a demo emulator--not allowed to write files. */ -#else - /* OK to write the page. */ #ifdef BYTESWAP @@ -2055,8 +2051,6 @@ LispPTR COM_writepage(register LispPTR *args) word_swap_page((DLword *)bufp, (count + 3) >> 2); #endif /* BYTESWAP */ -#endif /* DEMO */ - return (ATOM_T); } diff --git a/src/main.c b/src/main.c index 67ea9c1f..c51d2c38 100644 --- a/src/main.c +++ b/src/main.c @@ -743,9 +743,6 @@ void print_info_lines() { #else printf("Creation date: %s", ctime(&MDate)); #endif -#ifdef DEMO - printf("Demonstration emulator, not for commercial use\n"); -#endif /* DEMO */ #ifdef LPSOLVE printf("Contains lp_solve LP solver.\n"); #endif /* LPSOLVE */ diff --git a/src/vmemsave.c b/src/vmemsave.c index 392cb9cd..545298f0 100644 --- a/src/vmemsave.c +++ b/src/vmemsave.c @@ -160,10 +160,6 @@ LispPTR vmem_save0(LispPTR *args) Lisp_errno = &Dummy_errno; -#ifdef DEMO - return FILECANNOTOPEN; -#else - if ((args[0] != NIL) && lispstringP(args[0])) { /* Check of lispstringP is safer for LispStringToCString */ LispStringToCString(args[0], pathname, MAXPATHLEN); @@ -203,7 +199,6 @@ LispPTR vmem_save0(LispPTR *args) } return (vmem_save(sysout)); } -#endif /* DEMO */ } /************************************************************************/