diff --git a/ChangeLog b/ChangeLog
index 1d3ba18640..8a39f3bc9c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -59,6 +59,10 @@ Mon Feb 11 04:25:54 2002  Yukihiro Matsumoto  <matz@ruby-lang.org>
 
 	* variable.c (rb_cvar_singleton): removed.
 
+Mon Feb 11 00:10:41 2002  Nobuyoshi Nakada  <nobu.nakada@nifty.ne.jp>
+
+	* regex.c (re_compile_fastmap): skip begpos.
+
 Sun Feb 10 16:52:53 2002  Nobuyoshi Nakada  <nobu.nakada@nifty.ne.jp>
 
 	* ruby.c (load_file): avoid SEGV on '#' only input.
diff --git a/regex.c b/regex.c
index c9436a820f..9f84c5ae23 100644
--- a/regex.c
+++ b/regex.c
@@ -2782,6 +2782,7 @@ re_compile_fastmap(bufp)
 
       case begline:
       case begbuf:
+      case begpos:
       case endbuf:
       case endbuf2:
       case wordbound:
@@ -3049,7 +3050,6 @@ re_compile_fastmap(bufp)
 	}
 	break;
 
-      case begpos:
       case unused:	/* pacify gcc -Wall */
 	break;
       }