1 files changed, 68 insertions, 0 deletions
diff --git a/gs/src/gs.c b/gs/src/gs.c
new file mode 100644
index 000000000..811604d14
--- /dev/null
+++ b/gs/src/gs.c
@@ -0,0 +1,68 @@
+/* Copyright (C) 1989, 1995, 1996 Aladdin Enterprises.  All rights reserved.
+  
+  This file is part of Aladdin Ghostscript.
+  
+  Aladdin Ghostscript is distributed with NO WARRANTY OF ANY KIND.  No author
+  or distributor accepts any responsibility for the consequences of using it,
+  or for whether it serves any particular purpose or works at all, unless he
+  or she says so in writing.  Refer to the Aladdin Ghostscript Free Public
+  License (the "License") for full details.
+  
+  Every copy of Aladdin Ghostscript must include a copy of the License,
+  normally in a plain ASCII text file named PUBLIC.  The License grants you
+  the right to copy, modify and redistribute Aladdin Ghostscript, but only
+  under certain conditions described in the License.  Among other things, the
+  License requires that the copyright notice and this notice be preserved on
+  all copies.
+*/
+
+/* gs.c */
+/* 'main' program for Ghostscript */
+#include "ghost.h"
+#include "imain.h"
+#include "imainarg.h"
+#include "iminst.h"
+
+/* Define an optional array of strings for testing. */
+/*#define RUN_STRINGS*/
+#ifdef RUN_STRINGS
+private const char *run_strings[] = {
+  "2 vmreclaim /SAVE save def 2 vmreclaim",
+  "(saved\n) print flush",
+  "SAVE restore (restored\n) print flush 2 vmreclaim",
+  "(done\n) print flush quit",
+  0
+};
+#endif
+
+int
+main(int argc, char *argv[])
+{	gs_main_instance *minst = gs_main_instance_default();
+	gs_main_init_with_args(minst, argc, argv);
+
+#ifdef RUN_STRINGS
+	{	/* Run a list of strings (for testing). */
+		const char **pstr = run_strings;
+		for ( ; *pstr; ++pstr )
+		  {	int exit_code;
+			ref error_object;
+			int code;
+			fprintf(stdout, "{%s} =>\n", *pstr);
+			fflush(stdout);
+			code = gs_main_run_string(minst, *pstr, 0,
+						  &exit_code, &error_object);
+			zflush(osp);
+			fprintf(stdout, " => code = %d\n", code);
+			fflush(stdout);
+			if ( code < 0 )
+			  gs_exit(1);
+		  }
+	}
+#endif
+
+	if ( minst->run_start )
+	  gs_main_run_start(minst);
+
+	gs_exit(0);			/* exit */
+	/* NOTREACHED */
+}