diff --git a/libstdc++-v3/ChangeLog b/libstdc++-v3/ChangeLog
index 103f75d50e6..c2145be7ae3 100644
--- a/libstdc++-v3/ChangeLog
+++ b/libstdc++-v3/ChangeLog
@@ -1,3 +1,8 @@
+2006-09-08  Paolo Carlini  <pcarlini@suse.de>
+
+	* include/tr1/random.tcc (poisson_distribution<>::operator()):
+	Avoid potential warnings when _IntType is unsigned.
+
 2006-09-08  Benjamin Kosnik  <bkoz@redhat.com>
 
 	* include/debug/debug.h (_GLIBCXX_DEBUG_ONLY): New.
diff --git a/libstdc++-v3/include/tr1/random.tcc b/libstdc++-v3/include/tr1/random.tcc
index e6d4d941d59..a7322605f68 100644
--- a/libstdc++-v3/include/tr1/random.tcc
+++ b/libstdc++-v3/include/tr1/random.tcc
@@ -906,7 +906,7 @@ _GLIBCXX_BEGIN_NAMESPACE(tr1)
 	else
 #endif
 	  {
-	    _IntType     __x = -1;
+	    _IntType     __x = 0;
 	    _RealType __prod = 1.0;
 
 	    do
@@ -916,7 +916,7 @@ _GLIBCXX_BEGIN_NAMESPACE(tr1)
 	      }
 	    while (__prod > _M_lm_thr);
 
-	    return __x;
+	    return __x - 1;
 	  }
       }