File tree Expand file tree Collapse file tree 3 files changed +0
-14
lines changed Expand file tree Collapse file tree 3 files changed +0
-14
lines changed Original file line number Diff line number Diff line change @@ -2030,10 +2030,6 @@ LispPTR COM_writepage(register LispPTR *args)
20302030 return (NIL );
20312031 }
20322032
2033- #ifdef DEMO
2034- /* Do nothing if this is a demo emulator--not allowed to write files. */
2035- #else
2036-
20372033/* OK to write the page. */
20382034
20392035#ifdef BYTESWAP
@@ -2055,8 +2051,6 @@ LispPTR COM_writepage(register LispPTR *args)
20552051 word_swap_page ((DLword * )bufp , (count + 3 ) >> 2 );
20562052#endif /* BYTESWAP */
20572053
2058- #endif /* DEMO */
2059-
20602054 return (ATOM_T );
20612055}
20622056
Original file line number Diff line number Diff line change @@ -743,9 +743,6 @@ void print_info_lines() {
743743#else
744744 printf ("Creation date: %s" , ctime (& MDate ));
745745#endif
746- #ifdef DEMO
747- printf ("Demonstration emulator, not for commercial use\n" );
748- #endif /* DEMO */
749746#ifdef LPSOLVE
750747 printf ("Contains lp_solve LP solver.\n" );
751748#endif /* LPSOLVE */
Original file line number Diff line number Diff line change @@ -160,10 +160,6 @@ LispPTR vmem_save0(LispPTR *args)
160160
161161 Lisp_errno = & Dummy_errno ;
162162
163- #ifdef DEMO
164- return FILECANNOTOPEN ;
165- #else
166-
167163 if ((args [0 ] != NIL ) && lispstringP (args [0 ])) {
168164 /* Check of lispstringP is safer for LispStringToCString */
169165 LispStringToCString (args [0 ], pathname , MAXPATHLEN );
@@ -203,7 +199,6 @@ LispPTR vmem_save0(LispPTR *args)
203199 }
204200 return (vmem_save (sysout ));
205201 }
206- #endif /* DEMO */
207202}
208203
209204/************************************************************************/
You can’t perform that action at this time.
0 commit comments