# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1079883227 0
# Node ID 5c8be4779a364e9bc15c6105129953f65e064753
# Parent  82f7cd1ab4eb59f1a67d91d4851b2cc1adef4345
(rx): Work at compile time, not run time.

diff -r 82f7cd1ab4eb -r 5c8be4779a36 lisp/emacs-lisp/rx.el
--- a/lisp/emacs-lisp/rx.el	Sun Mar 21 15:29:42 2004 +0000
+++ b/lisp/emacs-lisp/rx.el	Sun Mar 21 15:33:47 2004 +0000
@@ -1,6 +1,6 @@
 ;;; rx.el --- sexp notation for regular expressions
 
-;; Copyright (C) 2001 Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2003 Free Software Foundation, Inc.
 
 ;; Author: Gerd Moellmann <gerd@gnu.org>
 ;; Maintainer: FSF
@@ -799,14 +799,17 @@
 `(repeat N M SEXP)'
      matches N to M occurrences of what SEXP matches.
 
+`(backref N)'
+     matches what was matched previously by submatch N.
+
 `(eval FORM)'
-      evaluate FORM and insert result.  If result is a string,
-      `regexp-quote' it.
+     evaluate FORM and insert result.  If result is a string,
+     `regexp-quote' it.
 
 `(regexp REGEXP)'
-      include REGEXP in string notation in the result."
+     include REGEXP in string notation in the result."
 
-  `(rx-to-string ',regexp))
+  (rx-to-string regexp))
 
 
 (provide 'rx)