--- a/absyntax_utils/search_base_type.cc	Thu Nov 08 18:55:57 2012 +0100
+++ b/absyntax_utils/search_base_type.cc	Thu Nov 15 22:28:53 2012 +0100
@@ -88,6 +88,11 @@
   return this->is_enumerated;
 }
 
+bool search_base_type_c::type_is_fb(symbol_c* type_decl) {
+  this->is_fb = false;
+  type_decl->accept(*this);
+  return this->is_fb;
+}
 
 /*************************/
 /* B.1 - Common elements */
@@ -335,7 +340,10 @@
 /*****************************/
 /*  FUNCTION_BLOCK derived_function_block_name io_OR_other_var_declarations function_block_body END_FUNCTION_BLOCK */
 // SYM_REF3(function_block_declaration_c, fblock_name, var_declarations, fblock_body)
-void *search_base_type_c::visit(function_block_declaration_c *symbol)                   {return (void *)symbol;}
+void *search_base_type_c::visit(function_block_declaration_c *symbol)                   {
+	this->is_fb = true;
+	return (void *)symbol;
+}