amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: guile: Make relocatable patch version-independent.

Browse source 
* gnu/packages/patches/guile-relocatable.patch: Use
SCM_EFFECTIVE_VERSION instead of "2.0".
This commit is contained in:
Ludovic Courtès 2017-07-18 14:07:17 +02:00
parent 44455ab951
commit 920f2c42ce
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
gnu/packages/patches/guile-relocatable.patch
View file

@ -35,11 +35,11 @@ location of the `guile' binary, allowing it to be relocated.
+ +
+ module_dir = scm_gc_malloc_pointerless (strlen (prefix) + 50, "string"); + module_dir = scm_gc_malloc_pointerless (strlen (prefix) + 50, "string");
+ strcpy (module_dir, prefix); + strcpy (module_dir, prefix);
+ strcat (module_dir, "/share/guile/2.0"); + strcat (module_dir, "/share/guile/" SCM_EFFECTIVE_VERSION);
+ +
+ ccache_dir = scm_gc_malloc_pointerless (strlen (prefix) + 50, "string"); + ccache_dir = scm_gc_malloc_pointerless (strlen (prefix) + 50, "string");
+ strcpy (ccache_dir, prefix); + strcpy (ccache_dir, prefix);
+ strcat (ccache_dir, "/lib/guile/2.0/ccache"); + strcat (ccache_dir, "/lib/guile/" SCM_EFFECTIVE_VERSION "/ccache");
+ +
env = scm_i_mirror_backslashes (getenv ("GUILE_SYSTEM_PATH")); env = scm_i_mirror_backslashes (getenv ("GUILE_SYSTEM_PATH"));
if (env && strcmp (env, "") == 0) if (env && strcmp (env, "") == 0)