Patch adapted from Sage.
diff -Naur ecl-16.1.2.orig/src/c/file.d ecl-16.1.2/src/c/file.d
--- ecl-16.1.2.orig/src/c/file.d	2016-05-11 13:10:51.867673867 +1200
+++ ecl-16.1.2/src/c/file.d	2016-05-11 14:44:48.121907307 +1200
@@ -3354,8 +3354,10 @@
   ecl_disable_interrupts();
   do {
     out = fwrite(c, sizeof(char), n, IO_STREAM_FILE(strm));
-  } while (out < n && restartable_io_error(strm, "fwrite"));
-  ecl_enable_interrupts();
+  /* Ignore write errors to stderr to avoid an infinite loop */
+  } while (out < n && (IO_STREAM_FILE(strm) != stderr) && restartable_io_error(strm, "fwrite"));
+
+  ecl_enable_interrupts();
   return out;
 }
 
ef2331780fee'/><select name='h' onchange='this.form.submit();'>
<option value='koszko' selected='selected'>koszko</option>
<option value='koszko-scripts'>koszko-scripts</option>
</select> <input type='submit' value='switch'/></form></td></tr>
<tr><td class='sub'>Wojtek's customized Guix</td><td class='sub right'></td></tr></table>
<table class='tabs'><tr><td>
<a href='/guix/about/'>about</a><a href='/guix/'>summary</a><a href='/guix/refs/?id=a9ee95aec119601332875d9c4becef2331780fee'>refs</a><a class='active' href='/guix/log/gnu/packages/sqlite.scm'>log</a><a href='/guix/tree/gnu/packages/sqlite.scm?id=a9ee95aec119601332875d9c4becef2331780fee'>tree</a><a href='/guix/commit/gnu/packages/sqlite.scm?id=a9ee95aec119601332875d9c4becef2331780fee'>commit</a><a href='/guix/diff/gnu/packages/sqlite.scm?id=a9ee95aec119601332875d9c4becef2331780fee'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/sqlite.scm'>
<input type='hidden' name='id' value='a9ee95aec119601332875d9c4becef2331780fee'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=a9ee95aec119601332875d9c4becef2331780fee'>root</a>/<a href='/guix/log/gnu?id=a9ee95aec119601332875d9c4becef2331780fee'>gnu</a>/<a href='/guix/log/gnu/packages?id=a9ee95aec119601332875d9c4becef2331780fee'>packages</a>/<a href='/guix/log/gnu/packages/sqlite.scm?id=a9ee95aec119601332875d9c4becef2331780fee'>sqlite.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/sqlite.scm?id=a9ee95aec119601332875d9c4becef2331780fee&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-09-12 08:30:08 +0100'>2023-09-12</span></td><td><a href='/guix/commit/gnu/packages/sqlite.scm?id=8d51e31f862181c835dc75b74033be325d85d967'>gnu: sqlite-next: Update to 3.42.0.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/sqlite.scm (sqlite-next): Update to 3.42.0.

Signed-off-by: Christopher Baines &lt;mail@cbaines.net&gt;
</span></span></td><td>Hilton Chain</td></tr>
<tr><td><span title='2023-01-30 12:39:40 +0200'>2023-01-30</span></td><td><a href='/guix/commit/gnu/packages/sqlite.scm?id=4cf1acc7f3033b50b0bf19e02c9f522d522d338c'>Merge remote-tracking branch 'origin/master' into core-updates</a><span class='msg-avail'>...<span class='msg-tooltip'> Conflicts:
	doc/guix.texi
	gnu/local.mk
	gnu/packages/admin.scm
	gnu/packages/base.scm
	gnu/packages/chromium.scm
	gnu/packages/compression.scm
	gnu/packages/databases.scm
	gnu/packages/diffoscope.scm
	gnu/packages/freedesktop.scm
	gnu/packages/gnome.scm
	gnu/packages/gnupg.scm
	gnu/packages/guile.scm
	gnu/packages/inkscape.scm
	gnu/packages/llvm.scm
	gnu/packages/openldap.scm
	gnu/packages/pciutils.scm
	gnu/packages/ruby.scm
	gnu/packages/samba.scm
	gnu/packages/sqlite.scm
	gnu/packages/statistics.scm
	gnu/packages/syndication.scm
	gnu/packages/tex.scm
	gnu/packages/tls.scm
	gnu/packages/version-control.scm
	gnu/packages/xml.scm
	guix/build-system/copy.scm
	guix/scripts/home.scm
</span></span></td><td>Efraim Flashner</td></tr>