diff options
| author | Dan Nicolaescu | 2010-07-04 00:50:25 -0700 |
|---|---|---|
| committer | Dan Nicolaescu | 2010-07-04 00:50:25 -0700 |
| commit | 971de7fb158335fbda39525feb2d7776a26bc030 (patch) | |
| tree | 605333d85f16e35bb06baffcb66ac49f4ec0dce9 /src/doc.c | |
| parent | b8463cbfbe2c5183cf40772df2746e58b787ddeb (diff) | |
| download | emacs-971de7fb158335fbda39525feb2d7776a26bc030.tar.gz emacs-971de7fb158335fbda39525feb2d7776a26bc030.zip | |
Convert (most) functions in src to standard C.
* src/alloc.c: Convert function definitions to standard C.
* src/atimer.c:
* src/bidi.c:
* src/bytecode.c:
* src/callint.c:
* src/callproc.c:
* src/casefiddle.c:
* src/casetab.c:
* src/category.c:
* src/ccl.c:
* src/character.c:
* src/charset.c:
* src/chartab.c:
* src/cmds.c:
* src/coding.c:
* src/composite.c:
* src/data.c:
* src/dbusbind.c:
* src/dired.c:
* src/dispnew.c:
* src/doc.c:
* src/doprnt.c:
* src/ecrt0.c:
* src/editfns.c:
* src/fileio.c:
* src/filelock.c:
* src/filemode.c:
* src/fns.c:
* src/font.c:
* src/fontset.c:
* src/frame.c:
* src/fringe.c:
* src/ftfont.c:
* src/ftxfont.c:
* src/gtkutil.c:
* src/indent.c:
* src/insdel.c:
* src/intervals.c:
* src/keymap.c:
* src/lread.c:
* src/macros.c:
* src/marker.c:
* src/md5.c:
* src/menu.c:
* src/minibuf.c:
* src/prefix-args.c:
* src/print.c:
* src/ralloc.c:
* src/regex.c:
* src/region-cache.c:
* src/scroll.c:
* src/search.c:
* src/sound.c:
* src/strftime.c:
* src/syntax.c:
* src/sysdep.c:
* src/termcap.c:
* src/terminal.c:
* src/terminfo.c:
* src/textprop.c:
* src/tparam.c:
* src/undo.c:
* src/unexelf.c:
* src/window.c:
* src/xfaces.c:
* src/xfns.c:
* src/xfont.c:
* src/xftfont.c:
* src/xgselect.c:
* src/xmenu.c:
* src/xrdb.c:
* src/xselect.c:
* src/xsettings.c:
* src/xsmfns.c:
* src/xterm.c: Likewise.
Diffstat (limited to 'src/doc.c')
| -rw-r--r-- | src/doc.c | 21 |
1 files changed, 8 insertions, 13 deletions
| @@ -71,8 +71,7 @@ Lisp_Object Fsnarf_documentation (Lisp_Object); | |||
| 71 | If UNREADFLAG is 1, we unread a byte. */ | 71 | If UNREADFLAG is 1, we unread a byte. */ |
| 72 | 72 | ||
| 73 | int | 73 | int |
| 74 | read_bytecode_char (unreadflag) | 74 | read_bytecode_char (int unreadflag) |
| 75 | int unreadflag; | ||
| 76 | { | 75 | { |
| 77 | if (unreadflag) | 76 | if (unreadflag) |
| 78 | { | 77 | { |
| @@ -102,9 +101,7 @@ read_bytecode_char (unreadflag) | |||
| 102 | and return a cons cell. */ | 101 | and return a cons cell. */ |
| 103 | 102 | ||
| 104 | Lisp_Object | 103 | Lisp_Object |
| 105 | get_doc_string (filepos, unibyte, definition) | 104 | get_doc_string (Lisp_Object filepos, int unibyte, int definition) |
| 106 | Lisp_Object filepos; | ||
| 107 | int unibyte, definition; | ||
| 108 | { | 105 | { |
| 109 | char *from, *to; | 106 | char *from, *to; |
| 110 | register int fd; | 107 | register int fd; |
| @@ -311,15 +308,13 @@ get_doc_string (filepos, unibyte, definition) | |||
| 311 | of a compiled function from the .elc file. */ | 308 | of a compiled function from the .elc file. */ |
| 312 | 309 | ||
| 313 | Lisp_Object | 310 | Lisp_Object |
| 314 | read_doc_string (filepos) | 311 | read_doc_string (Lisp_Object filepos) |
| 315 | Lisp_Object filepos; | ||
| 316 | { | 312 | { |
| 317 | return get_doc_string (filepos, 0, 1); | 313 | return get_doc_string (filepos, 0, 1); |
| 318 | } | 314 | } |
| 319 | 315 | ||
| 320 | static int | 316 | static int |
| 321 | reread_doc_file (file) | 317 | reread_doc_file (Lisp_Object file) |
| 322 | Lisp_Object file; | ||
| 323 | { | 318 | { |
| 324 | #if 0 | 319 | #if 0 |
| 325 | Lisp_Object reply, prompt[3]; | 320 | Lisp_Object reply, prompt[3]; |
| @@ -515,10 +510,10 @@ aren't strings. */) | |||
| 515 | /* Scanning the DOC files and placing docstring offsets into functions. */ | 510 | /* Scanning the DOC files and placing docstring offsets into functions. */ |
| 516 | 511 | ||
| 517 | static void | 512 | static void |
| 518 | store_function_docstring (fun, offset) | 513 | store_function_docstring (Lisp_Object fun, EMACS_INT offset) |
| 519 | Lisp_Object fun; | 514 | |
| 520 | /* Use EMACS_INT because we get this from pointer subtraction. */ | 515 | /* Use EMACS_INT because we get this from pointer subtraction. */ |
| 521 | EMACS_INT offset; | 516 | |
| 522 | { | 517 | { |
| 523 | fun = indirect_function (fun); | 518 | fun = indirect_function (fun); |
| 524 | 519 | ||
| @@ -951,7 +946,7 @@ a new string, without any text properties, is returned. */) | |||
| 951 | } | 946 | } |
| 952 | 947 | ||
| 953 | void | 948 | void |
| 954 | syms_of_doc () | 949 | syms_of_doc (void) |
| 955 | { | 950 | { |
| 956 | Qfunction_documentation = intern_c_string ("function-documentation"); | 951 | Qfunction_documentation = intern_c_string ("function-documentation"); |
| 957 | staticpro (&Qfunction_documentation); | 952 | staticpro (&Qfunction_documentation); |