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;
 }
 
7fefdde6b0fec17f3224e62377'/><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=4089d7920fc5f27fefdde6b0fec17f3224e62377'>refs</a><a class='active' href='/guix/log/gnu/packages/serialization.scm'>log</a><a href='/guix/tree/gnu/packages/serialization.scm?id=4089d7920fc5f27fefdde6b0fec17f3224e62377'>tree</a><a href='/guix/commit/gnu/packages/serialization.scm?id=4089d7920fc5f27fefdde6b0fec17f3224e62377'>commit</a><a href='/guix/diff/gnu/packages/serialization.scm?id=4089d7920fc5f27fefdde6b0fec17f3224e62377'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/serialization.scm'>
<input type='hidden' name='id' value='4089d7920fc5f27fefdde6b0fec17f3224e62377'/><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=4089d7920fc5f27fefdde6b0fec17f3224e62377'>root</a>/<a href='/guix/log/gnu?id=4089d7920fc5f27fefdde6b0fec17f3224e62377'>gnu</a>/<a href='/guix/log/gnu/packages?id=4089d7920fc5f27fefdde6b0fec17f3224e62377'>packages</a>/<a href='/guix/log/gnu/packages/serialization.scm?id=4089d7920fc5f27fefdde6b0fec17f3224e62377'>serialization.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/serialization.scm?id=4089d7920fc5f27fefdde6b0fec17f3224e62377&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-07-12 23:08:15 +0200'>2020-07-12</span></td><td><a href='/guix/commit/gnu/packages/serialization.scm?id=b0e7b6992f3f845e83cfbca4d700b51dba50b4d5'>gnu: Remove ".git" from "https://github/…/….git".</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-06-09 10:43:54 +0200'>2020-06-09</span></td><td><a href='/guix/commit/gnu/packages/serialization.scm?id=a50628bbe0fa4ba3835e311098e4fdf7a1d8a29e'>gnu: apache-arrow: Update to 0.17.1.</a><span class='msg-avail'>...</span></td><td>Katherine Cox-Buday</td></tr>
<tr><td><span title='2020-05-13 09:30:26 +0300'>2020-05-13</span></td><td><a href='/guix/commit/gnu/packages/serialization.scm?id=3c986a7dc268756c097212de958f046b29b76c1b'>mailmap: Update entries for Nikita.</a><span class='msg-avail'>...</span></td><td>nikita</td></tr>
<tr><td><span title='2020-05-11 21:55:02 +0200'>2020-05-11</span></td><td><a href='/guix/commit/gnu/packages/serialization.scm?id=56c8b524e336727e67d5c102ee3b6a68e63b353a'>gnu: capnproto: Update to 0.8.0.</a><span class='msg-avail'>...</span></td><td>Marius Bakke</td></tr>