commit after reset fuckup

[m6w6/ext-psi] / src / types / let_stmt.c

diff --git a/src/types/let_stmt.c b/src/types/let_stmt.c
index b85f0cedb3f2bf415544e68b2d0131ffdd70aaeb..776d20637c241a41313ce9632aa6c43be22c0575 100644 (file)
--- a/src/types/let_stmt.c
+++ b/src/types/let_stmt.c
@@ -28,7 +28,7 @@
 
 struct psi_let_stmt *psi_let_stmt_init(struct psi_let_exp *exp)
 {
-       struct psi_let_stmt *let = calloc(1, sizeof(*let));
+       struct psi_let_stmt *let = pecalloc(1, sizeof(*let), 1);
        let->exp = exp;
 
        return let;
@@ -48,11 +48,11 @@ void psi_let_stmt_free(struct psi_let_stmt **stmt_ptr)
        }
 }
 
-void psi_let_stmt_dump(int fd, struct psi_let_stmt *let)
+void psi_let_stmt_dump(struct psi_dump *dump, struct psi_let_stmt *let)
 {
-       dprintf(fd, "\t%s ", let->exp->kind == PSI_LET_TMP ? "temp" : "let");
-       psi_let_exp_dump(fd, let->exp, 1, 1);
-       dprintf(fd, "\n");
+       PSI_DUMP(dump, "\t%s ", let->exp->kind == PSI_LET_TMP ? "temp" : "let");
+       psi_let_exp_dump(dump, let->exp, 1, 1);
+       PSI_DUMP(dump, "\n");
 }
 
 bool psi_let_stmts_validate(struct psi_data *data, struct psi_validate_scope *scope)