05/376: Shut up some signedness warnings

[Ludovic Courtès]

civodul pushed a commit to tag 1.8
in repository guix.

commit f0fdbd0897ce63c138ec663ed89a94709a8441a7
Author: Eelco Dolstra <address@hidden>
Date:   Mon May 26 12:34:15 2014 +0200

    Shut up some signedness warnings
---
 src/libexpr/primops.cc |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/libexpr/primops.cc b/src/libexpr/primops.cc
index c69d520..f402478 100644
--- a/src/libexpr/primops.cc
+++ b/src/libexpr/primops.cc
@@ -944,7 +944,7 @@ static void prim_isList(EvalState & state, const Pos & pos, 
Value * * args, Valu
 static void elemAt(EvalState & state, const Pos & pos, Value & list, int n, 
Value & v)
 {
     state.forceList(list, pos);
-    if (n < 0 || n >= list.list.length)
+    if (n < 0 || (unsigned int) n >= list.list.length)
         throw Error(format("list index %1% is out of bounds, at %2%") % n % 
pos);
     state.forceValue(*list.list.elems[n]);
     v = *list.list.elems[n];
@@ -1123,7 +1123,7 @@ static void prim_substring(EvalState & state, const Pos & 
pos, Value * * args, V
 
     if (start < 0) throw EvalError(format("negative start position in 
`substring', at %1%") % pos);
 
-    mkString(v, start >= s.size() ? "" : string(s, start, len), context);
+    mkString(v, (unsigned int) start >= s.size() ? "" : string(s, start, len), 
context);
 }