From 9b37fc86bc39324b3aa9592314d577d92d159a7e Mon Sep 17 00:00:00 2001
From: Ed J <mohawk2@users.noreply.github.com>
Date: Sun, 21 Jan 2024 11:18:24 +0000
Subject: [PATCH] pdl_dump fflush makes it interleave right with Perl printing
 if $|

---
 Basic/Core/pdlutil.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Basic/Core/pdlutil.c b/Basic/Core/pdlutil.c
index b6221f92b..14e13a1fb 100644
--- a/Basic/Core/pdlutil.c
+++ b/Basic/Core/pdlutil.c
@@ -482,6 +482,7 @@ void pdl_dump_fixspace(pdl *it,int nspac)
 
 void pdl_dump (pdl *it) {
 	pdl_dump_fixspace(it,0);
+	fflush(stdout);
 }
 
 void pdl_dump_anyval(PDL_Anyval v) {