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;
 }
 
a91961842ca593a6'/><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=e5f6d0ecafba223031d8f379a91961842ca593a6'>refs</a><a class='active' href='/guix/log/gnu/packages/sagemath.scm'>log</a><a href='/guix/tree/gnu/packages/sagemath.scm?id=e5f6d0ecafba223031d8f379a91961842ca593a6'>tree</a><a href='/guix/commit/gnu/packages/sagemath.scm?id=e5f6d0ecafba223031d8f379a91961842ca593a6'>commit</a><a href='/guix/diff/gnu/packages/sagemath.scm?id=e5f6d0ecafba223031d8f379a91961842ca593a6'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/sagemath.scm'>
<input type='hidden' name='id' value='e5f6d0ecafba223031d8f379a91961842ca593a6'/><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=e5f6d0ecafba223031d8f379a91961842ca593a6'>root</a>/<a href='/guix/log/gnu?id=e5f6d0ecafba223031d8f379a91961842ca593a6'>gnu</a>/<a href='/guix/log/gnu/packages?id=e5f6d0ecafba223031d8f379a91961842ca593a6'>packages</a>/<a href='/guix/log/gnu/packages/sagemath.scm?id=e5f6d0ecafba223031d8f379a91961842ca593a6'>sagemath.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/sagemath.scm?id=e5f6d0ecafba223031d8f379a91961842ca593a6&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2022-11-22 08:37:24 +0100'>2022-11-22</span></td><td><a href='/guix/commit/gnu/packages/sagemath.scm?id=0fec067efec0e70a9cd3c25d7a3aa40401667b4a'>gnu: ecl: Remove 16.1.3.</a><span class='msg-avail'>...<span class='msg-tooltip'>This package fails to build and has no users in Guix.

* gnu/packages/sagemath.scm (ecl-16): Remove variable.
* gnu/packages/patches/ecl-16-format-directive-limit.patch,
gnu/packages/patches/ecl-16-ignore-stderr-write-error.patch,
gnu/packages/patches/ecl-16-libffi.patch: Delete files.
* gnu/local.mk (dist_patch_DATA): Adjust accordingly.
</span></span></td><td>Marius Bakke</td></tr>