diff -urN otp_src_R11B-4.orig/lib/stdlib/src/erl_parse.yrl otp_src_R11B-4/lib/stdlib/src/erl_parse.yrl
--- otp_src_R11B-4.orig/lib/stdlib/src/erl_parse.yrl	2007-01-29 21:52:56.000000000 +0900
+++ otp_src_R11B-4/lib/stdlib/src/erl_parse.yrl	2007-06-13 11:04:03.000000000 +0900
@@ -258,6 +258,10 @@
 	{record_field,line('$2'),'$1',element(3, '$3'),'$5'}.
 record_expr -> expr_max '#' atom record_tuple :
 	{record,line('$2'),'$1',element(3, '$3'),'$4'}.
+record_expr -> record_expr '#' atom '.' atom :
+	{record_field,line('$2'),'$1',element(3, '$3'),'$5'}.
+record_expr -> record_expr '#' atom record_tuple :
+	{record,line('$2'),'$1',element(3, '$3'),'$4'}.
 
 record_tuple -> '{' '}' : [].
 record_tuple -> '{' record_fields '}' : '$2'.