diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 9a6ec0bc2e137b35289d613faee59c88ae5d8bd5..a8af9d1b6a3a6833a4d33e4bfefa66adfc14a1d7 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2001-04-12  kaz Kojima  <kkojima@rr.iij4u.or.jp>
+
+	* sh.md (builtin_setjmp_receiver): New expander.
+
 2001-04-12  David Edelsohn  <dje@watson.ibm.com>
 
 	* config/rs6000/rs6000.c (rs6000_emit_move): Do not
diff --git a/gcc/config/sh/sh.md b/gcc/config/sh/sh.md
index 420c33630a8ce2587a3bc0cccd94efe5b0759940..4e5269710cd569fc2d4bdba9547964a3f2d525ed 100644
--- a/gcc/config/sh/sh.md
+++ b/gcc/config/sh/sh.md
@@ -3753,6 +3753,15 @@
 }
 ")
 
+(define_expand "builtin_setjmp_receiver"
+  [(match_operand 0 "" "")]
+  "flag_pic"
+  "
+{
+  emit_insn (gen_GOTaddr2picreg ());
+  DONE;
+}")
+
 (define_expand "call_site"
   [(unspec [(match_dup 0)] UNSPEC_CALLER)]
   ""