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 {
     
'><img src='https://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='1d6b31c150e317f7fd3283538c080887b4d1712e'/><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=1d6b31c150e317f7fd3283538c080887b4d1712e'>refs</a><a class='active' href='/guix/log/gnu/packages/search.scm'>log</a><a href='/guix/tree/gnu/packages/search.scm?id=1d6b31c150e317f7fd3283538c080887b4d1712e'>tree</a><a href='/guix/commit/gnu/packages/search.scm?id=1d6b31c150e317f7fd3283538c080887b4d1712e'>commit</a><a href='/guix/diff/gnu/packages/search.scm?id=1d6b31c150e317f7fd3283538c080887b4d1712e'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/search.scm'>
<input type='hidden' name='id' value='1d6b31c150e317f7fd3283538c080887b4d1712e'/><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=1d6b31c150e317f7fd3283538c080887b4d1712e'>root</a>/<a href='/guix/log/gnu?id=1d6b31c150e317f7fd3283538c080887b4d1712e'>gnu</a>/<a href='/guix/log/gnu/packages?id=1d6b31c150e317f7fd3283538c080887b4d1712e'>packages</a>/<a href='/guix/log/gnu/packages/search.scm?id=1d6b31c150e317f7fd3283538c080887b4d1712e'>search.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/search.scm?id=1d6b31c150e317f7fd3283538c080887b4d1712e&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2023-09-10 02:00:00 +0200'>2023-09-10</span></td><td><a href='/guix/commit/gnu/packages/search.scm?id=93f8124c5e4f6a703ea0d20ca2a09aeeb48695d3'>gnu: fsearch: Update to 0.2.3.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/search.scm (fsearch): Update to 0.2.3.
</span></span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2023-09-10 02:00:00 +0200'>2023-09-10</span></td><td><a href='/guix/commit/gnu/packages/search.scm?id=efaeb605adeb70edbc40e8258feaed6d69eef70c'>gnu: plocate: Update to 1.1.19.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/search.scm (plocate): Update to 1.1.19.
</span></span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2023-05-26 20:52:50 +0800'>2023-05-26</span></td><td><a href='/guix/commit/gnu/packages/search.scm?id=152523748e8bd3ca9579229c878702d697428650'>gnu: ugrep: Update to 3.11.2.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/search.scm (ugrep): Update to 3.11.2.

Signed-off-by: 宋文武 &lt;iyzsong@member.fsf.org&gt;
</span></span></td><td>Greg Hogan</td></tr>
<tr><td><span title='2023-04-26 14:49:08 +0200'>2023-04-26</span></td><td><a href='/guix/commit/gnu/packages/search.scm?id=9d12ce6fa4556dd35a2f56bbd73e7fee27cc336f'>gnu: plocate: Update to 1.1.18.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/search.scm (plocate): Update to 1.1.18.

Signed-off-by: Nicolas Goaziou &lt;mail@nicolasgoaziou.fr&gt;
</span></span></td><td>kiasoc5</td></tr>
<tr><td><span title='2023-04-25 01:13:35 +0200'>2023-04-25</span></td><td><a href='/guix/commit/gnu/packages/search.scm?id=69e9349adc79b1d24ac7a3efb7664628c7ecd7da'>gnu: recoll: Update to 1.34.0.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/search.scm (recoll): Update to 1.34.0.
[arguments]: Add --enable-recollq configure flag.

Signed-off-by: Nicolas Goaziou &lt;mail@nicolasgoaziou.fr&gt;
</span></span></td><td>kiasoc5</td></tr>
<tr><td><span title='2023-04-22 11:55:50 +0200'>2023-04-22</span></td><td><a href='/guix/commit/gnu/packages/search.scm?id=f07d5c38c55bf561b2f3948096a6a050fd291fb8'>gnu: Add dataparksearch.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/search.scm (dataparksearch): New variable.

Signed-off-by: Nicolas Goaziou &lt;mail@nicolasgoaziou.fr&gt;
</span></span></td><td>Adam Faiz</td></tr>
<tr><td><span title='2023-03-27 16:40:04 +0100'>2023-03-27</span></td><td><a href='/guix/commit/gnu/packages/search.scm?id=4cf7aea2b9ae3a85b6de5eed43c4666c48cf786b'>gnu: ugrep: Update to 3.11.0.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/search.scm (ugrep): Update to 3.11.0.

Signed-off-by: Christopher Baines &lt;mail@cbaines.net&gt;
</span></span></td><td>Greg Hogan</td></tr>