diff options
| author | Stefan Monnier | 2012-11-08 09:21:21 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2012-11-08 09:21:21 -0500 |
| commit | 784c1a7b3aae2f43894ba711ae6dd77aa8bb96c7 (patch) | |
| tree | 1ec57c347441a3e86138f3bd4ec5f9ee51007ebb | |
| parent | 914adc427f7d1159356e465ec616c65a2ea902af (diff) | |
| download | emacs-784c1a7b3aae2f43894ba711ae6dd77aa8bb96c7.tar.gz emacs-784c1a7b3aae2f43894ba711ae6dd77aa8bb96c7.zip | |
* lisp/emacs-lisp/gv.el (gv-ref, gv-deref): New function and macro.
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/emacs-lisp/gv.el | 1 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e0ff05aa7dc..e44f1a7cdff 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,11 @@ | |||
| 1 | 2012-11-08 Stefan Monnier <monnier@iro.umontreal.ca> | 1 | 2012-11-08 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 2 | ||
| 3 | * emacs-lisp/bytecomp.el (byte-compile-initial-macro-environment): | ||
| 4 | Byte-compile *before* eval in eval-and-compile. | ||
| 5 | (byte-compile-log-warning): Remove redundant inhibit-read-only. | ||
| 6 | (byte-compile-file-form-autoload): Don't hide actual definition. | ||
| 7 | (byte-compile-maybe-guarded): Accept `functionp' as well. | ||
| 8 | |||
| 3 | * emacs-lisp/gv.el (gv-ref, gv-deref): New function and macro. | 9 | * emacs-lisp/gv.el (gv-ref, gv-deref): New function and macro. |
| 4 | 10 | ||
| 5 | 2012-11-07 Michael Albinus <michael.albinus@gmx.de> | 11 | 2012-11-07 Michael Albinus <michael.albinus@gmx.de> |
diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el index 34e29ba1cbd..72c2ec60734 100644 --- a/lisp/emacs-lisp/gv.el +++ b/lisp/emacs-lisp/gv.el | |||
| @@ -443,7 +443,6 @@ This is like the `&' operator of the C language." | |||
| 443 | `(cons (lambda () ,getter) | 443 | `(cons (lambda () ,getter) |
| 444 | (lambda (gv--val) ,(funcall setter 'gv--val))))) | 444 | (lambda (gv--val) ,(funcall setter 'gv--val))))) |
| 445 | 445 | ||
| 446 | ;;;###autoload | ||
| 447 | (defsubst gv-deref (ref) | 446 | (defsubst gv-deref (ref) |
| 448 | "Dereference REF, returning the referenced value. | 447 | "Dereference REF, returning the referenced value. |
| 449 | This is like the `*' operator of the C language. | 448 | This is like the `*' operator of the C language. |