diff -ru src/part.c b/part.c
--- src/part.c	Thu May 14 06:01:00 2009 -0400
+++ b/part.c 	Thu May 14 06:01:00 2009 -0400
@@ -1767,8 +1767,8 @@
 /* to compute number of partitions */
 {
     INT erg = OK;
-    if (ni<0) return;
-    if (not EMPTYP(S_V_I(vec,ni))) return;
+    if (ni<0) return 0;
+    if (not EMPTYP(S_V_I(vec,ni))) return 0;
     else if (ni<=1) M_I_I(1,S_V_I(vec,ni));
     else {
     
//git.koszko.org/cgit-static/cgit.png' alt='cgit logo'/></a></td>
<td class='main'><a href='/'>index</a> : <a href='/guix/'>guix</a></td><td class='form'><form method='get'>
<input type='hidden' name='id' value='d63f58848601cf45f60c88d9bb0f789ac1aa8438'/><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=d63f58848601cf45f60c88d9bb0f789ac1aa8438'>refs</a><a class='active' href='/guix/log/.dir-locals.el'>log</a><a href='/guix/tree/.dir-locals.el?id=d63f58848601cf45f60c88d9bb0f789ac1aa8438'>tree</a><a href='/guix/commit/.dir-locals.el?id=d63f58848601cf45f60c88d9bb0f789ac1aa8438'>commit</a><a href='/guix/diff/.dir-locals.el?id=d63f58848601cf45f60c88d9bb0f789ac1aa8438'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/.dir-locals.el'>
<input type='hidden' name='id' value='d63f58848601cf45f60c88d9bb0f789ac1aa8438'/><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=d63f58848601cf45f60c88d9bb0f789ac1aa8438'>root</a>/<a href='/guix/log/.dir-locals.el?id=d63f58848601cf45f60c88d9bb0f789ac1aa8438'>.dir-locals.el</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/.dir-locals.el?id=d63f58848601cf45f60c88d9bb0f789ac1aa8438&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2018-10-19 18:28:57 +0200'>2018-10-19</span></td><td><a href='/guix/commit/.dir-locals.el?id=19c924af4f3726688ca155a905ebf1cb9acdfca2'>tests: Run 'guix pack' tests using the external store.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-09-27 23:21:53 +0200'>2018-09-27</span></td><td><a href='/guix/commit/.dir-locals.el?id=dc0f74e5fc26977a3ee6c4f2aa74a141f4359982'>Add (guix status) and use it for pretty colored output.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-06-01 15:35:32 +0200'>2018-06-01</span></td><td><a href='/guix/commit/.dir-locals.el?id=7f9d184d9b688d13ce76eefabaddcfa76bdde2b5'>Add (gnu store database).</a><span class='msg-avail'>...</span></td><td>Caleb Ristvedt</td></tr>
<tr><td><span title='2018-06-01 15:20:54 +0200'>2018-06-01</span></td><td><a href='/guix/commit/.dir-locals.el?id=838e17d8050236a6d3ffde991fb0035412eb3046'>gexp: Add 'with-extensions'.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-01-08 10:40:17 +0100'>2018-01-08</span></td><td><a href='/guix/commit/.dir-locals.el?id=f4596f7630ba8d281b972ebd40fd9947ef79e957'>services: guix: Add 'log-compression' option.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-12-01 16:00:14 +0100'>2017-12-01</span></td><td><a href='/guix/commit/.dir-locals.el?id=1fafa2f58732a3fb75258be342c92a2772af2860'>weather: Use (guix progress) for progress report.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-05-18 11:38:48 +0200'>2017-05-18</span></td><td><a href='/guix/commit/.dir-locals.el?id=22ef06b801b284760b4ffd9587ea1a3dffd31baa'>union: Gracefully handle dangling symlinks in the input.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2017-05-04 22:45:53 +0300'>2017-05-04</span></td><td><a href='/guix/commit/.dir-locals.el?id=da99126ca2fc2959189ca7901c328c19cd80ae82'>dir-locals.el: Add 'modify-phases' keywords.</a><span class='msg-avail'>...</span></td><td>Alex Kost</td></tr>