From e933c51fc644d4f2254f73f3a655a65d389db4a4 Mon Sep 17 00:00:00 2001
From: kvigor <kvigor@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Thu, 24 Feb 2000 19:15:39 +0000
Subject: [PATCH] Only generate jump to sdcc_program_startup in module
 containing main()

git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@123 4a8a32a2-be11-0410-ad9d-d568d2c75423
---
 src/SDCCglue.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/SDCCglue.c b/src/SDCCglue.c
index 28997cc2..40c14485 100644
--- a/src/SDCCglue.c
+++ b/src/SDCCglue.c
@@ -1044,9 +1044,10 @@ void glue ()
 	
     }
     copyFile (asmFile, statsg->oFile);
-    if (port->general.glue_up_main)
-	fprintf (asmFile,"\tljmp\t__sdcc_program_startup\n");
 
+    if (port->general.glue_up_main && mainf && mainf->fbody)
+	fprintf (asmFile,"\tljmp\t__sdcc_program_startup\n");
+	
     /* copy over code */
     fprintf (asmFile, "%s", iComments2);
     fprintf (asmFile, "; code\n");
-- 
2.47.2