Changeset 35 for sources/src/gen_code.cc

Timestamp:

Jun 29, 2009, 6:03:59 PM (15 years ago)

Author:

buchmann

Message:

Code cleanup.

Add --dynamiclink option to systemcass executable.

File:

• sources/src/gen_code.cc (modified) (10 diffs)

sources/src/gen_code.cc

@@ -79 +79 @@
 ostream& operator << (ostream &o, const SC_ENTRY_FUNC &f)
 {
-        register fct p;
-        p.pmf = f;
-        return o << "0x" << hex << p.integer << "ULL";
+  register fct p;
+  p.integer = 0;
+  p.pmf = f;
+  return o << "0x" << hex << p.integer << "ULL";
 }
 
@@ -242 +243 @@
   o << "\nextern void mealy_generation (void)\n{\n";
   o << "  register fct p;\n"
-          << "\n\n  /* fonctions de mealy */\n";
-        ProcessDependencyList::iterator it;
-        for (it = mealy_func_list.begin(); it != mealy_func_list.end(); ++it)
-        {
-                const method_process_t *m = *it;
-          PrintCall (o, *m);
-        }
+    << "\n\n  /* fonctions de mealy */\n";
+  ProcessDependencyList::iterator it;
+  for (it = mealy_func_list.begin(); it != mealy_func_list.end(); ++it)
+  {
+    const method_process_t *m = *it;
+    PrintCall (o, *m);
+  }
 }
 
@@ -260 +261 @@
     cerr << "Generating C code for scheduling...\n";
 
-        // open temporary file
-        ofstream o;
+  // open temporary file
+  ofstream o;
   char base_name[PATH_MAX];
-        open_temp (o, base_name);
+  open_temp (o, base_name);
  
-        if (! o.good ()) {
+  if (! o.good ()) {
     perror("scheduling: open file\n");
     exit(-1);
@@ -271 +272 @@
 
   o << "// generated by " << sc_version () << endl
-                << "#include <casc.h>\n\n"
-                << "#include <cstdio>\n\n"
-//              << "#include <iostream>\n\n"
-                << "namespace sc_core {\n"
+    << "#include <casc.h>\n\n"
+    << "#include <cstdio>\n\n"
+//  << "#include <iostream>\n\n"
+    << "namespace sc_core {\n"
     << " typedef void (sc_module::*SC_ENTRY_FUNC)();\n"
-                << " typedef void (*CASC_ENTRY_FUNC)(void *);\n";
+    << " typedef void (*CASC_ENTRY_FUNC)(void *);\n";
   const char *pmf_type = (sizeof (SC_ENTRY_FUNC) == 4)?
                          // G4 pointer-to-member-function style
@@ -286 +287 @@
     << " integer; SC_ENTRY_FUNC pmf; CASC_ENTRY_FUNC pf; } fct;\n"; 
         
-        gen_transition (o, transition_func_list);       
-        gen_moore      (o, moore_func_list);    
-        gen_mealy      (o, strongcomponents);
+  gen_transition (o, transition_func_list);     
+  gen_moore      (o, moore_func_list);  
+  gen_mealy      (o, strongcomponents);
 
   o << " \n}\n";
@@ -340 +341 @@
     << " typedef union { unsigned long long int integer; SC_ENTRY_FUNC pmf; CASC_ENTRY_FUNC pf; } fct;\n"; 
         
-        gen_transition (o, transition_func_list);       
-        gen_moore      (o, moore_func_list);    
-        gen_mealy      (o, mealy_func_list);
+  gen_transition (o, transition_func_list);     
+  gen_moore      (o, moore_func_list);  
+  gen_mealy      (o, mealy_func_list);
 
   o << "\n}\n";
@@ -567 +568 @@
 {
 #ifdef CONFIG_CHECK_FSM_RULES
-        casc_fsm_step = TRANSITION;
+  casc_fsm_step = TRANSITION;
 #endif
   call_functions (pf[0]); // transition
   update     ();
 #ifdef CONFIG_CHECK_FSM_RULES
-        casc_fsm_step = GEN_MOORE;
+  casc_fsm_step = GEN_MOORE;
 #endif
   call_functions (pf[1]); // moore generation
 #ifdef CONFIG_CHECK_FSM_RULES
-        casc_fsm_step = GEN_MEALY;
+  casc_fsm_step = GEN_MEALY;
 #endif
   call_functions (pf[2]); // mealy generation
 #ifdef CONFIG_CHECK_FSM_RULES
-        casc_fsm_step = STIMULI;
+  casc_fsm_step = STIMULI;
 #endif
 }
@@ -626 +627 @@
 {
 #ifdef CONFIG_CHECK_FSM_RULES
-        casc_fsm_step = TRANSITION;
+  casc_fsm_step = TRANSITION;
 #endif
   method_process_list_t::iterator mm;
@@ -636 +637 @@
   update     ();
 #ifdef CONFIG_CHECK_FSM_RULES
-        casc_fsm_step = GEN_MOORE;
+  casc_fsm_step = GEN_MOORE;
 #endif
   for( mm = func_list[1].begin(); mm != func_list[1].end(); ++mm)
@@ -644 +645 @@
   }
 #ifdef CONFIG_CHECK_FSM_RULES
-        casc_fsm_step = GEN_MEALY;
+  casc_fsm_step = GEN_MEALY;
 #endif
   quasistatic_mealy_generation ();
 #ifdef CONFIG_CHECK_FSM_RULES
-        casc_fsm_step = STIMULI;
+  casc_fsm_step = STIMULI;
 #endif
 }