Mercurial > hg > xemacs-beta

comparison src/dialog-msw.c @ 5581:56144c8593a8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Mechanically change INT to FIXNUM in our sources. src/ChangeLog addition: 2011-10-09 Aidan Kehoe <kehoea@parhasard.net> [...] Mechanically change INT (where it refers to non-bignum Lisp integers) to FIXNUM in our sources. Done for the following functions, enums, and macros: Lisp_Type_Int_Even, Lisp_Type_Int_Odd, INT_GCBITS, INT_VALBITS, make_int(), INTP(), XINT(), CHECK_INT(), XREALINT(), INT_PLUS(), INT_MINUS(), EMACS_INT_MAX (to MOST_POSITIVE_FIXNUM), EMACS_INT_MIN (to MOST_NEGATIVE_FIXNUM), NUMBER_FITS_IN_AN_EMACS_INT() to NUMBER_FITS_IN_A_FIXNUM(), XFLOATINT, XCHAR_OR_INT, INT_OR_FLOAT. The EMACS_INT typedef was not changed, it does not describe non-bignum Lisp integers. Script that did the change available in http://mid.gmane.org/20067.17650.181273.12014@parhasard.net . modules/ChangeLog addition: 2011-10-09 Aidan Kehoe <kehoea@parhasard.net> [...] Mechanically change INT to FIXNUM, where the usage describes non-bignum Lisp integers. See the src/ChangeLog entry for more details. man/ChangeLog addition: 2011-10-09 Aidan Kehoe <kehoea@parhasard.net> * internals/internals.texi (How Lisp Objects Are Represented in C): * internals/internals.texi (Integers and Characters): Mechanically change INT to FIXNUM, where the usage describes non-bignum Lisp integers.
author Aidan Kehoe <kehoea@parhasard.net>
date Sun, 09 Oct 2011 09:51:57 +0100
parents 308d34e9f07d
children 0f2338afbabf
comparison
equal deleted inserted replaced
5580:a0e81357194e 5581:56144c8593a8
445 signal_quit (); 445 signal_quit ();
446 } 446 }
447 else 447 else
448 signal_error (Qdialog_box_error, 448 signal_error (Qdialog_box_error,
449 "Unable to create folder browser", 449 "Unable to create folder browser",
450 make_int (0)); 450 make_fixnum (0));
451 return ret; 451 return ret;
452 } 452 }
453 453
454 static Lisp_Object 454 static Lisp_Object
455 handle_file_dialog_box (struct frame *f, Lisp_Object keys) 455 handle_file_dialog_box (struct frame *f, Lisp_Object keys)
521 (common_dialog_errors[i].errname)); 521 (common_dialog_errors[i].errname));
522 } 522 }
523 523
524 signal_error (Qdialog_box_error, 524 signal_error (Qdialog_box_error,
525 "Unknown common dialog box error???", 525 "Unknown common dialog box error???",
526 make_int (err)); 526 make_fixnum (err));
527 } 527 }
528 } 528 }
529 529
530 return tstr_to_local_file_format ((Extbyte *) ofn.lpstrFile); 530 return tstr_to_local_file_format ((Extbyte *) ofn.lpstrFile);
531 } 531 }