diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 9647593b9b2..63ba4a47474 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2014-02-04  Marek Polacek  <polacek@redhat.com>
+
+	* gdbinit.in (pel): Define.
+
 2014-02-04  Bernd Edlinger  <bernd.edlinger@hotmail.de>
 
 	* doc/invoke.texi (fstrict-volatile-bitfields): Clarify current
diff --git a/gcc/gdbinit.in b/gcc/gdbinit.in
index c388f8ac704..25c530aa222 100644
--- a/gcc/gdbinit.in
+++ b/gcc/gdbinit.in
@@ -190,6 +190,15 @@ document pbm
 Dump the bitmap that is in $ as a comma-separated list of numbers.
 end
 
+define pel
+output expand_location ($)
+echo \n
+end
+
+document pel
+Print expanded location of $.
+end
+
 # Define some macros helpful to gdb when it is expanding macros.
 macro define __FILE__ "gdb"
 macro define __LINE__ 1