commit 756be0c2e796e1ce9e14fbc964d23900f6372a32
author bfrankel <bfrankel@6a79697e-3843-0410-8446-a9668620458d> Tue Oct 27 00:40:58 2009 +0000
committer bfrankel <bfrankel@6a79697e-3843-0410-8446-a9668620458d> Tue Oct 27 00:40:58 2009 +0000
tree 10abb70820ba6adf388fa540acbe87d62359bd4c
parent f1dfa753e4ba268acf581ecefca0fe9f1c9d4e5c

performance enhancements to Startup...

packages/xdc/runtime/Startup.c

diff --git a/packages/xdc/runtime/Startup.c b/packages/xdc/runtime/Startup.c
index 2f7207a..db9b917 100644
--- a/packages/xdc/runtime/Startup.c
+++ b/packages/xdc/runtime/Startup.c
@@ -30,14 +30,14 @@
 
     module->execFlag = TRUE;
 
-    for (i = 0; i < Startup_firstFxns.length; i++) {
-        Startup_firstFxns.elem[i]();
+    for (i = 0; i < Startup_firstFxnsLen; i++) {
+        Startup_firstFxns[i]();
     }
 
     (Startup_execImpl)();
 
-    for (i = 0; i < Startup_lastFxns.length; i++) {
-        Startup_lastFxns.elem[i]();
+    for (i = 0; i < Startup_lastFxnsLen; i++) {
+        Startup_lastFxns[i]();
     }
 }
 

packages/xdc/runtime/Startup.xdc

diff --git a/packages/xdc/runtime/Startup.xdc b/packages/xdc/runtime/Startup.xdc
index ed89203..e0eb72b 100644
--- a/packages/xdc/runtime/Startup.xdc
+++ b/packages/xdc/runtime/Startup.xdc
@@ -131,14 +131,14 @@
      *  List of functions called before module startup
      *
      */
-    config InitFxn firstFxns[length] = [];
+    config InitFxn firstFxns[] = [];
 
     /*!
      *  ======== lastFxns ========
      *  List of functions called after module startup
      *
      */
-    config InitFxn lastFxns[length] = [];
+    config InitFxn lastFxns[] = [];
 
     /*!
      *  ======== resetFxn ========
@@ -217,6 +217,9 @@
      */
     config Bool sfxnRts[];
 
+    config Int firstFxnsLen;
+    config Int lastFxnsLen;
+
     struct Module_State {
         Int *stateTab;      /* initially null */
         Bool execFlag;	    /* if true, startup code processing started */

packages/xdc/runtime/Startup.xs

diff --git a/packages/xdc/runtime/Startup.xs b/packages/xdc/runtime/Startup.xs
index d6da56d..04aea36 100644
--- a/packages/xdc/runtime/Startup.xs
+++ b/packages/xdc/runtime/Startup.xs
@@ -24,6 +24,9 @@
  */
 function module$static$init(obj, params)
 {
+    this.firstFxnsLen = this.firstFxns.length;
+    this.lastFxnsLen = this.lastFxns.length;
+
     obj.stateTab = null;
     obj.execFlag = false;
     obj.rtsDoneFlag = false;