From 54707c575f96f5e1a3104bbcf17d7b2ebd7a0ad5 Mon Sep 17 00:00:00 2001
From: John van Groningen
Date: Wed, 12 Aug 2015 11:32:18 +0000
Subject: parse and ignore .algtype directives

---
 cgcode.c  | 4 ++++
 cgcodep.h | 1 +
 cginput.c | 1 +
 3 files changed, 6 insertions(+)

diff --git a/cgcode.c b/cgcode.c
index 3b9d908..1de82dd 100644
--- a/cgcode.c
+++ b/cgcode.c
@@ -735,6 +735,10 @@ void code_addR (VOID)
 #endif
 }
 
+void code_algtype (int n_constructors)
+{
+}
+
 void code_andB (VOID)
 {
 	INSTRUCTION_GRAPH graph_1,graph_2,graph_3;
diff --git a/cgcodep.h b/cgcodep.h
index 41cd9fb..d637531 100644
--- a/cgcodep.h
+++ b/cgcodep.h
@@ -25,6 +25,7 @@ void code_addLU (VOID);
 #ifndef M68000
 void code_addIo (VOID);
 #endif
+void code_algtype (int n_constructors);
 void code_addR (VOID);
 void code_andB (VOID);
 void code_and (VOID);
diff --git a/cginput.c b/cginput.c
index 9220932..06acd4f 100644
--- a/cginput.c
+++ b/cginput.c
@@ -2565,6 +2565,7 @@ static void put_instructions_in_table2 (void)
 	put_instruction_name ("updateS",		parse_instruction_n_n,		code_updateS );
 	put_instruction_name ("update",			parse_instruction_a_n_n,	code_update );
 	put_instruction_name ("xor%",			parse_instruction,			code_xor );
+	put_instruction_name (".algtype",		parse_instruction_n,		code_algtype );
 	put_instruction_name (".caf",			parse_instruction_a_n_n,	code_caf );
 	put_instruction_name (".code",			parse_directive_n_n_n,		code_dummy	);
 	put_instruction_name (".comp",			parse_directive_n_l,		code_comp	);
-- 
cgit v1.2.3