diff --git a/mozilla/nsprpub/pr/tests/Makefile.in b/mozilla/nsprpub/pr/tests/Makefile.in
index 122ef1c280e..82a6463cd0c 100644
--- a/mozilla/nsprpub/pr/tests/Makefile.in
+++ b/mozilla/nsprpub/pr/tests/Makefile.in
@@ -114,6 +114,7 @@ CSRCS =             \
 	provider.c		\
 	prpoll.c		\
 	prpollml.c		\
+	pushtop.c		\
 	ranfile.c       \
 	randseed.c      \
 	reinit.c        \
diff --git a/mozilla/nsprpub/pr/tests/pushtop.c b/mozilla/nsprpub/pr/tests/pushtop.c
new file mode 100644
index 00000000000..bd09930ff18
--- /dev/null
+++ b/mozilla/nsprpub/pr/tests/pushtop.c
@@ -0,0 +1,62 @@
+/* -*- Mode: C++; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/* This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
+
+/* A regression test for bug 794316 */
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#include "prio.h"
+
+static PRIOMethods dummyMethods;
+
+int main()
+{
+    PRDescIdentity topId, middleId, bottomId;
+    PRFileDesc *top, *middle, *bottom;
+    PRFileDesc *fd;
+
+    topId = PR_GetUniqueIdentity("top");
+    middleId = PR_GetUniqueIdentity("middle");
+    bottomId = PR_GetUniqueIdentity("bottom");
+
+    top = PR_CreateIOLayerStub(topId, &dummyMethods);
+    middle = PR_CreateIOLayerStub(middleId, &dummyMethods);
+    bottom = PR_CreateIOLayerStub(bottomId, &dummyMethods);
+
+    fd = bottom;
+    PR_PushIOLayer(fd, PR_TOP_IO_LAYER, middle);
+    PR_PushIOLayer(fd, PR_TOP_IO_LAYER, top);
+
+    top = fd;
+    middle = top->lower;
+    bottom = middle->lower;
+
+    /* Verify that the higher pointers are correct. */
+    if (middle->higher != top) {
+        fprintf(stderr, "middle->higher is wrong\n");
+        fprintf(stderr, "FAILED\n");
+        exit(1);
+    }
+    if (bottom->higher != middle) {
+        fprintf(stderr, "bottom->higher is wrong\n");
+        fprintf(stderr, "FAILED\n");
+        exit(1);
+    }
+
+    top = PR_PopIOLayer(fd, topId);
+    top->dtor(top);
+    middle = PR_PopIOLayer(fd, middleId);
+    middle->dtor(middle);
+    if (fd->identity != bottomId) {
+        fprintf(stderr, "The bottom layer has the wrong identity\n");
+        fprintf(stderr, "FAILED\n");
+        exit(1);
+    }
+    fd->dtor(fd);
+
+    printf("PASS\n");
+    return 0;
+}
diff --git a/mozilla/nsprpub/pr/tests/runtests.pl b/mozilla/nsprpub/pr/tests/runtests.pl
index 7191d91efc8..3a164b17709 100755
--- a/mozilla/nsprpub/pr/tests/runtests.pl
+++ b/mozilla/nsprpub/pr/tests/runtests.pl
@@ -313,6 +313,7 @@ $prog = shift;  # Program to test
 "primblok",
 "provider",
 "prpollml",
+"pushtop",
 "ranfile",
 "randseed",
 "reinit",
diff --git a/mozilla/nsprpub/pr/tests/runtests.sh b/mozilla/nsprpub/pr/tests/runtests.sh
index 43df19f16b9..535b93afeea 100755
--- a/mozilla/nsprpub/pr/tests/runtests.sh
+++ b/mozilla/nsprpub/pr/tests/runtests.sh
@@ -143,6 +143,7 @@ prftest
 primblok
 provider
 prpollml
+pushtop
 ranfile
 randseed
 reinit