--- src/bruch.c	2007-12-06 11:30:00.000000000 -0500
+++ b/bruch.c	2013-10-22 08:37:43.000000000 -0400
@@ -975,14 +975,16 @@
     ggterg = ggt_i(S_B_UI(bruch),S_B_OI(bruch));
 
     if (ggterg == S_B_UI(bruch)) {
+        INT tmp = S_B_OI(bruch);
         freeself_bruch(bruch);
-        M_I_I(S_B_OI(bruch) / ggterg,bruch);
+        M_I_I(tmp / ggterg,bruch);
         goto ende;
         }
 
     if (-ggterg == S_B_UI(bruch)) {
+        INT tmp = S_B_OI(bruch);
         freeself_bruch(bruch);
-        M_I_I(- S_B_OI(bruch) / ggterg,bruch);
+        M_I_I(- tmp / ggterg,bruch);
         goto ende;
         }
 
@@ -1032,12 +1034,14 @@
 
     if (S_O_K(S_B_U(bruch)) == INTEGER)
         if (S_B_UI(bruch) == 1) { 
+            INT tmp = S_B_OI(bruch);
             freeself_bruch(bruch);
-            M_I_I(S_B_OI(bruch),bruch); 
+            M_I_I(tmp,bruch); 
             goto ende; }
         else if (S_B_UI(bruch) == -1) { 
+            INT tmp = S_B_OI(bruch);
             freeself_bruch(bruch);
-            M_I_I( - S_B_OI(bruch),bruch); 
+            M_I_I( - tmp,bruch); 
             goto ende; }
     if (NEGP(S_B_O(bruch)) && NEGP(S_B_U(bruch)))
         {
s='active' href='/guix/log/gnu/packages/hurd.scm'>log</a><a href='/guix/tree/gnu/packages/hurd.scm?id=3fe666aa29e72a9fbb1e267eebcd7d197ec802f3'>tree</a><a href='/guix/commit/gnu/packages/hurd.scm?id=3fe666aa29e72a9fbb1e267eebcd7d197ec802f3'>commit</a><a href='/guix/diff/gnu/packages/hurd.scm?id=3fe666aa29e72a9fbb1e267eebcd7d197ec802f3'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/hurd.scm'>
<input type='hidden' name='id' value='3fe666aa29e72a9fbb1e267eebcd7d197ec802f3'/><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=3fe666aa29e72a9fbb1e267eebcd7d197ec802f3'>root</a>/<a href='/guix/log/gnu?id=3fe666aa29e72a9fbb1e267eebcd7d197ec802f3'>gnu</a>/<a href='/guix/log/gnu/packages?id=3fe666aa29e72a9fbb1e267eebcd7d197ec802f3'>packages</a>/<a href='/guix/log/gnu/packages/hurd.scm?id=3fe666aa29e72a9fbb1e267eebcd7d197ec802f3'>hurd.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/hurd.scm?id=3fe666aa29e72a9fbb1e267eebcd7d197ec802f3&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2017-04-22 23:01:30 +0300'>2017-04-22</span></td><td><a href='/guix/commit/gnu/packages/hurd.scm?id=cc4faa35f8fa8a64e39c62e77128ad880d0173fd'>gnu: Add the Hurd.</a><span class='msg-avail'>...</span></td><td>Manolis Ragkousis</td></tr>
<tr><td><span title='2017-04-22 23:01:24 +0300'>2017-04-22</span></td><td><a href='/guix/commit/gnu/packages/hurd.scm?id=b005a37ac23f97d6859152c2a86b7af5d26ebd5c'>gnu: hurd: Add hurd-source-url procedure.</a><span class='msg-avail'>...</span></td><td>Manolis Ragkousis</td></tr>
<tr><td><span title='2017-03-30 01:30:16 +0200'>2017-03-30</span></td><td><a href='/guix/commit/gnu/packages/hurd.scm?id=6fd52309b8f52c9bb59fccffac53e029ce94b698'>gnu: Use HTTPS for almost all gnu.org HOME-PAGEs.</a><span class='msg-avail'>...</span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2017-03-19 18:14:22 +0100'>2017-03-19</span></td><td><a href='/guix/commit/gnu/packages/hurd.scm?id=8df672aad5dc8d93da750c96f472ba2155d51da1'>gnu: Add GNU Mach.</a><span class='msg-avail'>...</span></td><td>Manolis Ragkousis</td></tr>
<tr><td><span title='2017-02-16 18:10:21 +0200'>2017-02-16</span></td><td><a href='/guix/commit/gnu/packages/hurd.scm?id=41bfcac35c99918e28753cc601ca9b6c0447d9b0'>gnu: hurd: Add gnumach-source-url procedure.</a><span class='msg-avail'>...</span></td><td>Manolis Ragkousis</td></tr>
<tr><td><span title='2017-01-03 16:00:39 +0200'>2017-01-03</span></td><td><a href='/guix/commit/gnu/packages/hurd.scm?id=62596a158b4878e3f4b64f3e0f3a3f846228afd4'>gnu: Use hurd-triplet? to check if GNU/Hurd.</a><span class='msg-avail'>...</span></td><td>Manolis Ragkousis</td></tr>
<tr><td><span title='2016-12-19 12:04:48 +0200'>2016-12-19</span></td><td><a href='/guix/commit/gnu/packages/hurd.scm?id=be6a70edc20ad570ec7511581bf109c73bfd87a8'>gnu: hurd-headers: Update to 0.9.</a><span class='msg-avail'>...</span></td><td>Manolis Ragkousis</td></tr>
<tr><td><span title='2016-12-19 12:04:43 +0200'>2016-12-19</span></td><td><a href='/guix/commit/gnu/packages/hurd.scm?id=9c9402be2e971db5d49ecb1bc4be67af8ca97a95'>gnu: mig: Update to 1.8.</a><span class='msg-avail'>...</span></td><td>Manolis Ragkousis</td></tr>
<tr><td><span title='2016-12-19 12:04:21 +0200'>2016-12-19</span></td><td><a href='/guix/commit/gnu/packages/hurd.scm?id=d950f038483a2e553fdbd01e6058ca1626629dfb'>gnu: gnumach-headers: Update to 1.8.</a><span class='msg-avail'>...</span></td><td>Manolis Ragkousis</td></tr>