X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Ftypes%2Flet_func.c;fp=src%2Ftypes%2Flet_func.c;h=4a61632238f4bf54e5ab84244455d6d19eee6c53;hp=fd8b49f968ed709610a41d156a84453260064137;hb=a0f437f26cd0f121ee911a55327a68a3544bf15f;hpb=a7ac1c0a3c855321f21682c127a4b707de33a303

diff --git a/src/types/let_func.c b/src/types/let_func.c
index fd8b49f..4a61632 100644
--- a/src/types/let_func.c
+++ b/src/types/let_func.c
@@ -58,26 +58,26 @@ void psi_let_func_free(struct psi_let_func **func_ptr)
 	}
 }
 
-void psi_let_func_dump(int fd, struct psi_let_func *func, unsigned level)
+void psi_let_func_dump(struct psi_dump *dump, struct psi_let_func *func, unsigned level)
 {
-	dprintf(fd, "%s(%s\t/* fqn=%s */", func->name->val, func->var->name->val,
+	PSI_DUMP(dump, "%s(%s\t/* fqn=%s */", func->name->val, func->var->name->val,
 			func->var->fqn->val);
 
 	if (func->inner) {
 		size_t i = 0, count = psi_plist_count(func->inner);
 		struct psi_let_exp *inner;
 
-		dprintf(fd, ",");
+		PSI_DUMP(dump, ",");
 		++level;
 		while (psi_plist_get(func->inner, i++, &inner)) {
-			dprintf(fd, "\n");
-			psi_let_exp_dump(fd, inner, level, i == count);
+			PSI_DUMP(dump, "\n");
+			psi_let_exp_dump(dump, inner, level, i == count);
 		}
 		--level;
-		dprintf(fd, "\n");
-		dprintf(fd, "%s", psi_t_indent(level));
+		PSI_DUMP(dump, "\n");
+		PSI_DUMP(dump, "%s", psi_t_indent(level));
 	}
-	dprintf(fd, ")");
+	PSI_DUMP(dump, ")");
 }
 
 static inline int validate_let_func_type(struct psi_data *data,