diff --git a/libgloss/ChangeLog b/libgloss/ChangeLog
index de0d3f7fe..18ec48283 100644
--- a/libgloss/ChangeLog
+++ b/libgloss/ChangeLog
@@ -1,3 +1,7 @@
+2001-03-08  Geoffrey Keating  <geoffk@redhat.com>
+
+	* rs6000/simulator.S (dup): New syscall.
+
 2001-02-28  Will Cohen  <wcohen@redhat.com>
 
         * src/libgloss/m68k/Makefile.in: Updated copyright and
diff --git a/libgloss/rs6000/simulator.S b/libgloss/rs6000/simulator.S
index 8859b5b3a..e8c18380c 100644
--- a/libgloss/rs6000/simulator.S
+++ b/libgloss/rs6000/simulator.S
@@ -1,7 +1,7 @@
 /*
  * simulator.S -- PowerPC simulator system calls.
  *
- * Copyright (c) 1995, 2000 Cygnus Support
+ * Copyright (c) 1995, 2000, 2001 Cygnus Support
  *
  * The authors hereby grant permission to use, copy, modify, distribute,
  * and license this software and its documentation for any purpose, provided
@@ -72,6 +72,13 @@ FUNC_START(access)
 	b	FUNC_NAME(_cerror)
 FUNC_END(access)
 
+FUNC_START(dup)
+	li	r0,41
+	sc
+	bnslr+
+	b	FUNC_NAME(_cerror)
+FUNC_END(dup)
+
 FUNC_START(lseek)
 	li	r0,199
 	sc