Mercurial > hg > Members > kono > os9 > sbc09

diff os9/mc09/crtos9.asm @ 109:613615c9b946

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
open
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 30 Dec 2018 15:41:25 +0900
parents 6eef99bb4771
children c4e909f21b25
line wrap: on
line diff
--- a/os9/mc09/crtos9.asm	Sun Dec 30 08:27:58 2018 +0900
+++ b/os9/mc09/crtos9.asm	Sun Dec 30 15:41:25 2018 +0900
@@ -1,10 +1,6 @@
 
-*
-* micro-C driver under FLEX
-*
-*	12-Dec-81	M.Ohta,H.Tezuka
-*	12-Dec-2018	S.Kono
-*
+* * micro-C driver under FLEX * * 12-Dec-81 M.Ohta,H.Tezuka
+* 12-Dec-2018 S.Kono * 
 
 *
 * micro-C user program
@@ -31,8 +27,6 @@
         pshs    x,y             POINT TO CONTENT OF ARGUMENT VECTOR
         leay    ,u 
 	PSHS	Y
-        leay    _GLOBALS,y
-        sty     heapp,y
 
 *       allocate memory and change stack
 *       try to allocate maximum memory if not specified
@@ -67,6 +61,9 @@
         subd     #1
 	BNE	_0C002
 _0C003	
+        tfr     y,d
+        addd    #_GLOBALS
+        std     heapp,y
 	LBSR	_INITIALIZE	call initializer
 	LBSR	_main
 exit	clrb