Mercurial > hg > xemacs-beta
comparison src/syntax.c @ 380:8626e4521993 r21-2-5
Import from CVS: tag r21-2-5
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:07:10 +0200 |
parents | cc15677e0335 |
children | 74fd4e045ea6 |
comparison
equal
deleted
inserted
replaced
379:76b7d63099ad | 380:8626e4521993 |
---|---|
25 | 25 |
26 #include <config.h> | 26 #include <config.h> |
27 #include "lisp.h" | 27 #include "lisp.h" |
28 | 28 |
29 #include "buffer.h" | 29 #include "buffer.h" |
30 #include "commands.h" | |
31 #include "insdel.h" | |
32 #include "syntax.h" | 30 #include "syntax.h" |
33 | 31 |
34 /* Here is a comment from Ken'ichi HANDA <handa@etl.go.jp> | 32 /* Here is a comment from Ken'ichi HANDA <handa@etl.go.jp> |
35 explaining the purpose of the Sextword syntax category: | 33 explaining the purpose of the Sextword syntax category: |
36 | 34 |
394 | 392 |
395 return from; | 393 return from; |
396 } | 394 } |
397 | 395 |
398 DEFUN ("forward-word", Fforward_word, 1, 2, "_p", /* | 396 DEFUN ("forward-word", Fforward_word, 1, 2, "_p", /* |
399 Move point forward ARG words (backward if ARG is negative). | 397 Move point forward COUNT words (backward if COUNT is negative). |
400 Normally returns t. | 398 Normally returns t. |
401 If an edge of the buffer is reached, point is left there | 399 If an edge of the buffer is reached, point is left there |
402 and nil is returned. | 400 and nil is returned. |
401 | |
402 Optional argument BUFFER defaults to the current buffer. | |
403 */ | 403 */ |
404 (count, buffer)) | 404 (count, buffer)) |
405 { | 405 { |
406 Bufpos val; | 406 Bufpos val; |
407 struct buffer *buf = decode_buffer (buffer, 0); | 407 struct buffer *buf = decode_buffer (buffer, 0); |