all messages for Guix-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
blob 7bf4222cf11a24c1745b41036bb133808e5eae23 2576 bytes (raw)
name: gnu/packages/patches/gcc-cross-environment-variables.patch 	 # note: path name is non-authoritative(*)

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
 
From a1d8c3d926cb43e51a2b4838ad5cca9c2510fbbb Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Sat, 16 Apr 2016 10:08:16 +0200
Subject: [PATCH] Search path environment variables for cross-compilers.  See
 the discussion at <http://gcc.gnu.org/ml/gcc/2013-02/msg00124.html>

and

<https://lists.gnu.org/archive/html/guix-devel/2016-04/msg00533.html>
---
 gcc/gcc.c     | 2 +-
 gcc/incpath.c | 6 +++---
 gcc/system.h  | 2 ++
 gcc/tlink.c   | 2 +-
 4 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/gcc/incpath.c b/gcc/incpath.c
index f495c0a..ba12249 100644
--- a/gcc/incpath.c
+++ b/gcc/incpath.c
@@ -461,8 +461,8 @@ register_include_chains (cpp_reader *pfile, const char *sysroot,
 			 int stdinc, int cxx_stdinc, int verbose)
 {
   static const char *const lang_env_vars[] =
-    { "C_INCLUDE_PATH", "CPLUS_INCLUDE_PATH",
-      "OBJC_INCLUDE_PATH", "OBJCPLUS_INCLUDE_PATH" };
+    { "CROSS_C_INCLUDE_PATH", "CROSS_CPLUS_INCLUDE_PATH",
+      "CROSS_OBJC_INCLUDE_PATH", "CROSS_OBJCPLUS_INCLUDE_PATH" };
   cpp_options *cpp_opts = cpp_get_options (pfile);
   size_t idx = (cpp_opts->objc ? 2: 0);
 
@@ -473,7 +473,7 @@ register_include_chains (cpp_reader *pfile, const char *sysroot,
 
   /* CPATH and language-dependent environment variables may add to the
      include chain.  */
-  add_env_var_paths ("CPATH", BRACKET);
+  add_env_var_paths ("CROSS_CPATH", BRACKET);
   add_env_var_paths (lang_env_vars[idx], SYSTEM);
 
   target_c_incpath.extra_pre_includes (sysroot, iprefix, stdinc);
diff --git a/gcc/system.h b/gcc/system.h
index 42bc509..af3b9ad 100644
--- a/gcc/system.h
+++ b/gcc/system.h
@@ -1063,4 +1063,6 @@ helper_const_non_const_cast (const char *p)
 /* Get definitions of HOST_WIDE_INT and HOST_WIDEST_INT.  */
 #include "hwint.h"
 
+#define LIBRARY_PATH_ENV "CROSS_LIBRARY_PATH"
+
 #endif /* ! GCC_SYSTEM_H */
diff --git a/gcc/tlink.c b/gcc/tlink.c
index bc358b8..ad6242f 100644
--- a/gcc/tlink.c
+++ b/gcc/tlink.c
@@ -458,7 +458,7 @@ recompile_files (void)
   file *f;
 
   putenv (xstrdup ("COMPILER_PATH="));
-  putenv (xstrdup ("LIBRARY_PATH="));
+  putenv (xstrdup (LIBRARY_PATH_ENV "="));
 
   while ((f = file_pop ()) != NULL)
     {
diff --git a/gcc/gcc.c b/gcc/gcc.c
index adbf0c4..70448c6 100644
--- a/gcc/gcc.c
+++ b/gcc/gcc.c
@@ -3853,7 +3853,7 @@ process_command (unsigned int decoded_options_count,
     }
 
   temp = getenv (LIBRARY_PATH_ENV);
-  if (temp && *cross_compile == '0')
+  if (temp)
     {
       const char *startp, *endp;
       char *nstore = (char *) alloca (strlen (temp) + 3);
-- 
2.1.4


debug log:

solving 7bf4222 ...
found 7bf4222 in https://yhetil.org/guix/87lh4080wu.fsf@drakenvlieg.flower/
found 0bd0be5 in https://git.savannah.gnu.org/cgit/guix.git
preparing index
index prepared:
100644 0bd0be59840523470b253457666d3e3d890cfcac	gnu/packages/patches/gcc-cross-environment-variables.patch

applying [1/1] https://yhetil.org/guix/87lh4080wu.fsf@drakenvlieg.flower/
diff --git a/gnu/packages/patches/gcc-cross-environment-variables.patch b/gnu/packages/patches/gcc-cross-environment-variables.patch
index 0bd0be5..7bf4222 100644

1:32: space before tab in indent.
 			 int stdinc, int cxx_stdinc, int verbose)
1:41: trailing whitespace.
 
1:99: trailing whitespace.
-- 
Checking patch gnu/packages/patches/gcc-cross-environment-variables.patch...
1:101: new blank line at EOF.
+
Applied patch gnu/packages/patches/gcc-cross-environment-variables.patch cleanly.
warning: 4 lines add whitespace errors.

index at:
100644 7bf4222cf11a24c1745b41036bb133808e5eae23	gnu/packages/patches/gcc-cross-environment-variables.patch

(*) Git path names are given by the tree(s) the blob belongs to.
    Blobs themselves have no identifier aside from the hash of its contents.^

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/guix.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.