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;
 }
 
800664'/><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=18bb73c69539f5e03425005a02c2144242800664'>refs</a><a class='active' href='/guix/log/gnu/services/nix.scm'>log</a><a href='/guix/tree/gnu/services/nix.scm?id=18bb73c69539f5e03425005a02c2144242800664'>tree</a><a href='/guix/commit/gnu/services/nix.scm?id=18bb73c69539f5e03425005a02c2144242800664'>commit</a><a href='/guix/diff/gnu/services/nix.scm?id=18bb73c69539f5e03425005a02c2144242800664'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/services/nix.scm'>
<input type='hidden' name='id' value='18bb73c69539f5e03425005a02c2144242800664'/><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=18bb73c69539f5e03425005a02c2144242800664'>root</a>/<a href='/guix/log/gnu?id=18bb73c69539f5e03425005a02c2144242800664'>gnu</a>/<a href='/guix/log/gnu/services?id=18bb73c69539f5e03425005a02c2144242800664'>services</a>/<a href='/guix/log/gnu/services/nix.scm?id=18bb73c69539f5e03425005a02c2144242800664'>nix.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/services/nix.scm?id=18bb73c69539f5e03425005a02c2144242800664&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-07-25 12:27:35 +0300'>2020-07-25</span></td><td><a href='/guix/commit/gnu/services/nix.scm?id=64c6282e7fc69ff58e7257a7e72284f63f2f5956'>services: nix: Add extra-options.</a><span class='msg-avail'>...</span></td><td>Oleg Pykhalov</td></tr>
<tr><td><span title='2020-07-25 12:27:35 +0300'>2020-07-25</span></td><td><a href='/guix/commit/gnu/services/nix.scm?id=3601d802d55106e36e3279680d4728dd3cfe3b4c'>services: nix: Fix typo.</a><span class='msg-avail'>...</span></td><td>Oleg Pykhalov</td></tr>
<tr><td><span title='2020-07-25 12:27:35 +0300'>2020-07-25</span></td><td><a href='/guix/commit/gnu/services/nix.scm?id=ee67d193b3d1ddd18b10e845d5a75fbbf904b9c2'>services: nix: Export nix-configuration.</a><span class='msg-avail'>...</span></td><td>Peng Mei Yu</td></tr>
<tr><td><span title='2020-07-25 12:27:35 +0300'>2020-07-25</span></td><td><a href='/guix/commit/gnu/services/nix.scm?id=db65d7447c3adc46e2b24abfc07ae10c6c537df4'>services: nix: Provide nix commands.</a><span class='msg-avail'>...</span></td><td>Peng Mei Yu via Guix-patches via</td></tr>
<tr><td><span title='2020-07-22 22:10:11 +0300'>2020-07-22</span></td><td><a href='/guix/commit/gnu/services/nix.scm?id=4656180d5de1fef2846bea9af27ae509f32376ba'>services: nix: Fix sandbox.</a><span class='msg-avail'>...</span></td><td>Oleg Pykhalov</td></tr>
<tr><td><span title='2020-06-25 01:20:31 +0200'>2020-06-25</span></td><td><a href='/guix/commit/gnu/services/nix.scm?id=db170ee9210431cdbb3716a6b9a26ca5b6d931ee'>services: Add missing (ice-9 format) import.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-06-12 17:26:28 +0200'>2019-06-12</span></td><td><a href='/guix/commit/gnu/services/nix.scm?id=79d19d7d90c63eca83068cc9b1f22d8020e27563'>services: Import (srfi srfi-26) from the build side.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2019-06-11 21:05:32 +0200'>2019-06-11</span></td><td><a href='/guix/commit/gnu/services/nix.scm?id=2be6b5e2eea9ac084cc22281f64f7a089e46cdae'>services: Add SRFI-26 to Nix activation gexp.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2019-06-10 09:15:45 +0300'>2019-06-10</span></td><td><a href='/guix/commit/gnu/services/nix.scm?id=47b9614b3110307093382363c0ba70d31f32ef59'>services: Add 'nix-service-type'.</a><span class='msg-avail'>...</span></td><td>Oleg Pykhalov</td></tr>