Mercurial > emacs
comparison src/lread.c @ 53581:78f37e5ea2f2
(defvar_per_buffer): Remove dead declaration.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 14 Jan 2004 14:29:48 +0000 |
| parents | 695cf19ef79e |
| children | 2b5be9da52c2 82c3b4da43ca |
comparison
equal
deleted
inserted
replaced
| 53580:9c0323a1fb76 | 53581:78f37e5ea2f2 |
|---|---|
| 1 /* Lisp parsing and input streams. | 1 /* Lisp parsing and input streams. |
| 2 Copyright (C) 1985, 86, 87, 88, 89, 93, 94, 95, 97, 98, 99, 2000, 01, 2003 | 2 Copyright (C) 1985,86,87,88,89,93,94,95,97,98,99,2000,01,03,2004 |
| 3 Free Software Foundation, Inc. | 3 Free Software Foundation, Inc. |
| 4 | 4 |
| 5 This file is part of GNU Emacs. | 5 This file is part of GNU Emacs. |
| 6 | 6 |
| 7 GNU Emacs is free software; you can redistribute it and/or modify | 7 GNU Emacs is free software; you can redistribute it and/or modify |
| 3493 Lisp_Object type; | 3493 Lisp_Object type; |
| 3494 char *doc; | 3494 char *doc; |
| 3495 { | 3495 { |
| 3496 Lisp_Object sym, val; | 3496 Lisp_Object sym, val; |
| 3497 int offset; | 3497 int offset; |
| 3498 extern struct buffer buffer_local_symbols; | |
| 3499 | 3498 |
| 3500 sym = intern (namestring); | 3499 sym = intern (namestring); |
| 3501 val = allocate_misc (); | 3500 val = allocate_misc (); |
| 3502 offset = (char *)address - (char *)current_buffer; | 3501 offset = (char *)address - (char *)current_buffer; |
| 3503 | 3502 |