1 files changed, 76 insertions, 0 deletions
diff --git a/cgcode.h b/cgcode.h
new file mode 100644
index 0000000..7b329e8
--- /dev/null
+++ b/cgcode.h
@@ -0,0 +1,76 @@
+
+#define g_fhighlow(gh,gl,gf) \
+	(gh)=g_instruction_2 (GFHIGH,(gf),NULL); \
+	(gl)=g_instruction_2 (GFLOW,(gf),(gh)); \
+	(gh)->instruction_parameters[1].p=(gl)
+
+extern void initialize_coding (VOID);
+extern void show_code (VOID);
+extern void show_imports_and_exports (VOID);
+
+extern INSTRUCTION_GRAPH g_load (int offset,int stack);
+extern INSTRUCTION_GRAPH g_fjoin (INSTRUCTION_GRAPH graph_1,INSTRUCTION_GRAPH graph_2);
+extern INSTRUCTION_GRAPH g_fregister (int float_reg);
+extern INSTRUCTION_GRAPH g_fstore (int offset,int reg_1,INSTRUCTION_GRAPH graph_1,
+									INSTRUCTION_GRAPH graph_2,INSTRUCTION_GRAPH graph_3);
+extern INSTRUCTION_GRAPH g_fstore_r (int reg_1,INSTRUCTION_GRAPH graph_1);
+extern INSTRUCTION_GRAPH g_store (int offset,int reg_1,INSTRUCTION_GRAPH graph_1,INSTRUCTION_GRAPH graph_2);
+extern INSTRUCTION_GRAPH g_store_r (int reg_1,INSTRUCTION_GRAPH graph_1);
+extern INSTRUCTION_GRAPH g_register (int reg);
+extern INSTRUCTION_GRAPH g_fload (int offset,int stack);
+extern INSTRUCTION_GRAPH g_instruction_1 (int instruction_code,INSTRUCTION_GRAPH graph_1);
+extern INSTRUCTION_GRAPH g_instruction_2 (int instruction_code,INSTRUCTION_GRAPH graph_1,INSTRUCTION_GRAPH graph_2);
+extern INSTRUCTION_GRAPH g_new_node (int,int,int);
+
+#ifndef g_fhighlow
+# define g_fhigh(g1) g_instruction_1(GFHIGH,(g1))
+# define g_flow(g1) g_instruction_1(GFLOW,(g1))
+#endif
+
+extern LABEL *enter_label (char *label_name,int label_flags);
+extern LABEL *new_local_label (int label_flags);
+
+extern int next_label_id;
+extern struct basic_block *first_block;
+extern struct label_node *labels;
+extern struct local_label *local_labels;
+extern struct dependency_list *first_dependency;
+extern LABEL
+	*collect_0_label,*collect_1_label,*collect_2_label,
+#ifndef I486
+	*collect_3_label,
+#endif
+#ifdef I486
+	*collect_0l_label,*collect_1l_label,*collect_2l_label,*end_heap_label,
+#endif
+#ifdef G_POWER
+	*collect_00_label,*collect_01_label,*collect_02_label,*collect_03_label,
+	*eval_01_label,*eval_11_label,*eval_02_label,*eval_12_label,*eval_22_label,
+#endif
+	*EMPTY_label;
+#if defined (G_POWER) || defined (I486)
+extern LABEL
+	*profile_l_label,*profile_l2_label,*profile_n_label,*profile_n2_label,
+	*profile_s_label,*profile_s2_label,*profile_r_label,*profile_t_label;
+# ifdef G_POWER
+extern LABEL *profile_ti_label;
+# endif
+#endif
+extern INSTRUCTION_GRAPH load_indexed_list;
+
+extern int no_memory_profiling;
+
+#define PROFILE_NOT 0
+#define PROFILE_NORMAL 1
+#define PROFILE_DOUBLE 2
+#define PROFILE_TAIL 3
+#define PROFILE_CURRIED 4
+#define PROFILE_CURRIED_DOUBLE 5
+
+extern LABEL *_STRING__label;
+extern LABEL*copy_graph_label,*CHANNEL_label,*create_channel_label,*currentP_label,*newP_label,
+			*randomP_label,*suspend_label;
+extern struct block_label *last_block_label;
+extern LABEL *profile_table_label;
+
+extern void write_profile_table (void);