--- 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))) { /a>logtreecommitdiff
path: root/gnu/home/services/dict.scm
AgeCommit message (Expand)Author
2023-08-29home: services: dicod, syncthing: Import (gnu home services shepherd)....Fixes <https://issues.guix.gnu.org/65510>. Without this import, 'shepherd-service-type' is not mapped, leading to an error about missing 'system' target. * gnu/home/services/dict.scm, gnu/home/services/syncthing.scm: Add #:use-module clause. Reported-by: Morgan Smith <Morgan.J.Smith@outlook.com> Ludovic Courtès
2023-08-20home: services: Add dicod....* gnu/home/services/dict.scm: New file. * gnu/local.mk (GNU_SYSTEM_MODULES): Add it. * gnu/services/dict.scm (<dicod-configuration>)[home-service?]: New field. (dicod-shepherd-service): Do not map /dev/log when 'home-service?' is true. Remove 'user-processes' requirement when 'home-service?' is true. (dicod-shepherd-service): Set #:user and #:group to #f when 'home-service?' is true. * doc/guix.texi (Miscellaneous Home Services): New node. (Miscellaneous Services): Add cross-reference. Ludovic Courtès