Mercurial > hg > xemacs-beta

comparison src/device-msw.c @ 647:b39c14581166

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-08-13 04:45:47 by ben] removal of unsigned, size_t, etc.
author ben
date Mon, 13 Aug 2001 04:46:48 +0000
parents 5fd7ba8b56e7
children ce0b3f2eff35
comparison
equal deleted inserted replaced
646:00c54252fe4f 647:b39c14581166
426 static void 426 static void
427 msprinter_init_device (struct device *d, Lisp_Object props) 427 msprinter_init_device (struct device *d, Lisp_Object props)
428 { 428 {
429 char* printer_name; 429 char* printer_name;
430 DEVMODE *pdm; 430 DEVMODE *pdm;
431 size_t dm_size; 431 LONG dm_size;
432 432
433 d->device_data = xnew_and_zero (struct msprinter_device); 433 d->device_data = xnew_and_zero (struct msprinter_device);
434 434
435 DEVICE_INFD (d) = DEVICE_OUTFD (d) = -1; 435 DEVICE_INFD (d) = DEVICE_OUTFD (d) = -1;
436 DEVICE_MSPRINTER_DEVMODE(d) = Qnil; 436 DEVICE_MSPRINTER_DEVMODE(d) = Qnil;
930 for printer's devmode size here, because despecialized settings 930 for printer's devmode size here, because despecialized settings
931 cannot force switching to a different printer, as they supply no 931 cannot force switching to a different printer, as they supply no
932 printer name at all. */ 932 printer name at all. */
933 if (ldm->printer_name == NULL) 933 if (ldm->printer_name == NULL)
934 { 934 {
935 size_t dm_size = 935 LONG dm_size =
936 DocumentProperties (NULL, DEVICE_MSPRINTER_HPRINTER(d), 936 DocumentProperties (NULL, DEVICE_MSPRINTER_HPRINTER(d),
937 DEVICE_MSPRINTER_NAME(d), NULL, NULL, 0); 937 DEVICE_MSPRINTER_NAME(d), NULL, NULL, 0);
938 if (dm_size <= 0) 938 if (dm_size <= 0)
939 signal_error (Qio_error, 939 signal_error (Qio_error,
940 "Unable to specialize settings, printer error", 940 "Unable to specialize settings, printer error",
1087 if (dm1->printer_name == NULL || dm2->printer_name == NULL) 1087 if (dm1->printer_name == NULL || dm2->printer_name == NULL)
1088 return 1; 1088 return 1;
1089 return stricmp (dm1->printer_name, dm2->printer_name) == 0; 1089 return stricmp (dm1->printer_name, dm2->printer_name) == 0;
1090 } 1090 }
1091 1091
1092 static unsigned long 1092 static Hash_Code
1093 hash_devmode (Lisp_Object obj, int depth) 1093 hash_devmode (Lisp_Object obj, int depth)
1094 { 1094 {
1095 Lisp_Devmode *dm = XDEVMODE (obj); 1095 Lisp_Devmode *dm = XDEVMODE (obj);
1096 1096
1097 return HASH3 (XDEVMODE_SIZE (dm), 1097 return HASH3 (XDEVMODE_SIZE (dm),
1199 */ 1199 */
1200 ()) 1200 ())
1201 { 1201 {
1202 int have_nt, ok; 1202 int have_nt, ok;
1203 BYTE *data_buf, dummy_byte; 1203 BYTE *data_buf, dummy_byte;
1204 size_t enum_entry_size; 1204 Memory_Count enum_entry_size;
1205 DWORD enum_flags, enum_level, bytes_needed, num_printers; 1205 DWORD enum_flags, enum_level, bytes_needed, num_printers;
1206 struct gcpro gcpro1, gcpro2; 1206 struct gcpro gcpro1, gcpro2;
1207 Lisp_Object result = Qnil, def_printer = Qnil; 1207 Lisp_Object result = Qnil, def_printer = Qnil;
1208 1208
1209 /* Determine OS flavor, to use the fastest enumeration method available */ 1209 /* Determine OS flavor, to use the fastest enumeration method available */