Mercurial > emacs
comparison src/fringe.c @ 109179:8cfee7d2955f
Convert DEFUNs to standard C.
* src/alloc.c: Convert DEFUNs to standard C.
* src/buffer.c:
* src/bytecode.c:
* src/callint.c:
* src/callproc.c:
* src/casefiddle.c:
* src/casetab.c:
* src/category.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/dosfns.c:
* src/editfns.c:
* src/emacs.c:
* src/eval.c:
* src/fileio.c:
* src/filelock.c:
* src/floatfns.c:
* src/fns.c:
* src/font.c:
* src/fontset.c:
* src/frame.c:
* src/fringe.c:
* src/image.c:
* src/indent.c:
* src/insdel.c:
* src/keyboard.c:
* src/keymap.c:
* src/lread.c:
* src/macros.c:
* src/marker.c:
* src/menu.c:
* src/minibuf.c:
* src/msdos.c:
* src/nsfns.m:
* src/nsmenu.m:
* src/nsselect.m:
* src/print.c:
* src/process.c:
* src/search.c:
* src/sound.c:
* src/syntax.c:
* src/term.c:
* src/terminal.c:
* src/textprop.c:
* src/undo.c:
* src/w16select.c:
* src/w32console.c:
* src/w32fns.c:
* src/w32font.c:
* src/w32menu.c:
* src/w32proc.c:
* src/w32select.c:
* src/window.c:
* src/xdisp.c:
* src/xfaces.c:
* src/xfns.c:
* src/xmenu.c:
* src/xselect.c:
* src/xsettings.c:
* src/xsmfns.c: Likewise.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Thu, 08 Jul 2010 14:25:08 -0700 |
parents | 750db9f3e6d8 |
children | 60516122d066 |
comparison
equal
deleted
inserted
replaced
109178:53f8ebcd9a97 | 109179:8cfee7d2955f |
---|---|
1274 | 1274 |
1275 DEFUN ("destroy-fringe-bitmap", Fdestroy_fringe_bitmap, Sdestroy_fringe_bitmap, | 1275 DEFUN ("destroy-fringe-bitmap", Fdestroy_fringe_bitmap, Sdestroy_fringe_bitmap, |
1276 1, 1, 0, | 1276 1, 1, 0, |
1277 doc: /* Destroy fringe bitmap BITMAP. | 1277 doc: /* Destroy fringe bitmap BITMAP. |
1278 If BITMAP overrides a standard fringe bitmap, the original bitmap is restored. */) | 1278 If BITMAP overrides a standard fringe bitmap, the original bitmap is restored. */) |
1279 (bitmap) | 1279 (Lisp_Object bitmap) |
1280 Lisp_Object bitmap; | |
1281 { | 1280 { |
1282 int n; | 1281 int n; |
1283 | 1282 |
1284 CHECK_SYMBOL (bitmap); | 1283 CHECK_SYMBOL (bitmap); |
1285 n = lookup_fringe_bitmap (bitmap); | 1284 n = lookup_fringe_bitmap (bitmap); |
1386 indicating the positioning of the bitmap relative to the rows where it | 1385 indicating the positioning of the bitmap relative to the rows where it |
1387 is used; the default is to center the bitmap. Fifth arg may also be a | 1386 is used; the default is to center the bitmap. Fifth arg may also be a |
1388 list (ALIGN PERIODIC) where PERIODIC non-nil specifies that the bitmap | 1387 list (ALIGN PERIODIC) where PERIODIC non-nil specifies that the bitmap |
1389 should be repeated. | 1388 should be repeated. |
1390 If BITMAP already exists, the existing definition is replaced. */) | 1389 If BITMAP already exists, the existing definition is replaced. */) |
1391 (bitmap, bits, height, width, align) | 1390 (Lisp_Object bitmap, Lisp_Object bits, Lisp_Object height, Lisp_Object width, Lisp_Object align) |
1392 Lisp_Object bitmap, bits, height, width, align; | |
1393 { | 1391 { |
1394 int n, h, i, j; | 1392 int n, h, i, j; |
1395 unsigned short *b; | 1393 unsigned short *b; |
1396 struct fringe_bitmap fb, *xfb; | 1394 struct fringe_bitmap fb, *xfb; |
1397 int fill1 = 0, fill2 = 0; | 1395 int fill1 = 0, fill2 = 0; |
1518 | 1516 |
1519 DEFUN ("set-fringe-bitmap-face", Fset_fringe_bitmap_face, Sset_fringe_bitmap_face, | 1517 DEFUN ("set-fringe-bitmap-face", Fset_fringe_bitmap_face, Sset_fringe_bitmap_face, |
1520 1, 2, 0, | 1518 1, 2, 0, |
1521 doc: /* Set face for fringe bitmap BITMAP to FACE. | 1519 doc: /* Set face for fringe bitmap BITMAP to FACE. |
1522 If FACE is nil, reset face to default fringe face. */) | 1520 If FACE is nil, reset face to default fringe face. */) |
1523 (bitmap, face) | 1521 (Lisp_Object bitmap, Lisp_Object face) |
1524 Lisp_Object bitmap, face; | |
1525 { | 1522 { |
1526 int n; | 1523 int n; |
1527 int face_id; | 1524 int face_id; |
1528 | 1525 |
1529 CHECK_SYMBOL (bitmap); | 1526 CHECK_SYMBOL (bitmap); |
1551 in that window. Return value is a list (LEFT RIGHT OV), where LEFT | 1548 in that window. Return value is a list (LEFT RIGHT OV), where LEFT |
1552 is the symbol for the bitmap in the left fringe (or nil if no bitmap), | 1549 is the symbol for the bitmap in the left fringe (or nil if no bitmap), |
1553 RIGHT is similar for the right fringe, and OV is non-nil if there is an | 1550 RIGHT is similar for the right fringe, and OV is non-nil if there is an |
1554 overlay arrow in the left fringe. | 1551 overlay arrow in the left fringe. |
1555 Return nil if POS is not visible in WINDOW. */) | 1552 Return nil if POS is not visible in WINDOW. */) |
1556 (pos, window) | 1553 (Lisp_Object pos, Lisp_Object window) |
1557 Lisp_Object pos, window; | |
1558 { | 1554 { |
1559 struct window *w; | 1555 struct window *w; |
1560 struct glyph_row *row; | 1556 struct glyph_row *row; |
1561 int textpos; | 1557 int textpos; |
1562 | 1558 |