# HG changeset patch # User Eli Zaretskii # Date 1021641441 0 # Node ID 5d4cefa40da1304e5a11206961b173bf02c5a5a5 # Parent a5bfb38230e34fffd7396f95ce2d48f88c6c02e3 Fix whitespace. diff -r a5bfb38230e3 -r 5d4cefa40da1 src/w16select.c --- a/src/w16select.c Fri May 17 13:12:37 2002 +0000 +++ b/src/w16select.c Fri May 17 13:17:21 2002 +0000 @@ -1,6 +1,6 @@ /* 16-bit Windows Selection processing for emacs on MS-Windows Copyright (C) 1996, 1997, 2001 Free Software Foundation. - + This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify @@ -168,7 +168,7 @@ empty_clipboard () { __dpmi_regs regs; - + /* Calls Int 2Fh/AX=1702h Return Values AX == 0: Error occurred <> 0: OK, Clipboard emptied */ @@ -399,7 +399,7 @@ the next loop by an additional test. */ register unsigned char *lcdp = last_clipboard_text == NULL ? &null_char : last_clipboard_text; - + /* Copy data from low memory, remove CR characters before LF if needed. */ _farsetsel (_dos_ds); @@ -486,10 +486,8 @@ Lisp_Object string, frame; { unsigned ok = 1, put_status = 0; - int nbytes; + int nbytes, charset_info, no_crlf_conversion; unsigned char *src, *dst = NULL; - int charset_info; - int no_crlf_conversion; CHECK_STRING (string); @@ -606,8 +604,7 @@ unsigned data_size, truelen; unsigned char *htext; Lisp_Object ret = Qnil; - int no_crlf_conversion; - int require_encoding = 0; + int no_crlf_conversion, require_encoding = 0; if (NILP (frame)) frame = Fselected_frame (); @@ -685,9 +682,9 @@ unblock: UNBLOCK_INPUT; - + done: - + return (ret); } @@ -736,7 +733,7 @@ return Qnil; } -void +void syms_of_win16select () { defsubr (&Sw16_set_clipboard_data);