diff --git a/backend/backendinterface.icl b/backend/backendinterface.icl
index 504e19f8773953890bcd558ee834e6d7e6518b35..da493d2923f7ef30d05f77386f89c08512c26b2d 100644
--- a/backend/backendinterface.icl
+++ b/backend/backendinterface.icl
@@ -97,7 +97,7 @@ printFunctionTypes all attr info components functions attrHeap file backEnd
 
 printFunctionType :: Bool Bool DictionaryToClassInfo (Int, FunDef) (*AttrVarHeap, *File, *BackEnd) -> (*AttrVarHeap, *File, *BackEnd)
 printFunctionType all attr info (functionIndex, {fun_symb,fun_type=Yes type}) (attrHeap, file, backEnd)
-	| not all && functionIndex > size info.dtic_dclModules.[info.dtci_iclModuleIndex].dcl_functions
+	| not all && functionIndex >= size info.dtic_dclModules.[info.dtci_iclModuleIndex].dcl_functions
 		=	(attrHeap, file, backEnd)
 	# (strictnessAdded, type, backEnd)
 		=	addStrictnessFromBackEnd functionIndex fun_symb.id_name backEnd type