Mercurial > emacs
comparison src/w16select.c @ 40656:cdfd4d09b79a
Update usage of CHECK_ macros (remove unused second argument).
author | Pavel Janík <Pavel@Janik.cz> |
---|---|
date | Fri, 02 Nov 2001 20:46:55 +0000 |
parents | 6145836b795c |
children | 63819c5d6049 |
comparison
equal
deleted
inserted
replaced
40655:45453187feeb | 40656:cdfd4d09b79a |
---|---|
489 int nbytes; | 489 int nbytes; |
490 unsigned char *src, *dst = NULL; | 490 unsigned char *src, *dst = NULL; |
491 int charset_info; | 491 int charset_info; |
492 int no_crlf_conversion; | 492 int no_crlf_conversion; |
493 | 493 |
494 CHECK_STRING (string, 0); | 494 CHECK_STRING (string); |
495 | 495 |
496 if (NILP (frame)) | 496 if (NILP (frame)) |
497 frame = Fselected_frame (); | 497 frame = Fselected_frame (); |
498 | 498 |
499 CHECK_LIVE_FRAME (frame, 0); | 499 CHECK_LIVE_FRAME (frame); |
500 if ( !FRAME_MSDOS_P (XFRAME (frame))) | 500 if ( !FRAME_MSDOS_P (XFRAME (frame))) |
501 goto done; | 501 goto done; |
502 | 502 |
503 BLOCK_INPUT; | 503 BLOCK_INPUT; |
504 | 504 |
603 int require_encoding = 0; | 603 int require_encoding = 0; |
604 | 604 |
605 if (NILP (frame)) | 605 if (NILP (frame)) |
606 frame = Fselected_frame (); | 606 frame = Fselected_frame (); |
607 | 607 |
608 CHECK_LIVE_FRAME (frame, 0); | 608 CHECK_LIVE_FRAME (frame); |
609 if ( !FRAME_MSDOS_P (XFRAME (frame))) | 609 if ( !FRAME_MSDOS_P (XFRAME (frame))) |
610 goto done; | 610 goto done; |
611 | 611 |
612 BLOCK_INPUT; | 612 BLOCK_INPUT; |
613 | 613 |
699 For convenience, the symbol nil is the same as `PRIMARY',\n\ | 699 For convenience, the symbol nil is the same as `PRIMARY',\n\ |
700 and t is the same as `SECONDARY'.") | 700 and t is the same as `SECONDARY'.") |
701 (selection) | 701 (selection) |
702 Lisp_Object selection; | 702 Lisp_Object selection; |
703 { | 703 { |
704 CHECK_SYMBOL (selection, 0); | 704 CHECK_SYMBOL (selection); |
705 | 705 |
706 /* Return nil for SECONDARY selection. For PRIMARY (or nil) | 706 /* Return nil for SECONDARY selection. For PRIMARY (or nil) |
707 selection, check if there is some text on the kill-ring; | 707 selection, check if there is some text on the kill-ring; |
708 for CLIPBOARD, check if the clipboard currently has valid | 708 for CLIPBOARD, check if the clipboard currently has valid |
709 text format contents. | 709 text format contents. |