config/gen/platform/win32/misc.c

   1 /*
   2  * $Id$
   3  * Copyright (C) 2004-2006, Parrot Foundation.
   4  */
   5
   6 /*
   7
   8 =head1 NAME
   9
  10 config\gen\platform\win32\misc.c
  11
  12 =head1 DESCRIPTION
  13
  14 Miscellaneous helper functions that are specific to Win32.
  15
  16 =head2 Functions
  17
  18 =over 4
  19
  20 =cut
  21
  22 */
  23
  24 /*
  25
  26 =item C<void Parrot_platform_init_code(void)>
  27
  28 Initialize Parrot for the Win32 platform. Turns off ugly crash dialog
  29 boxes on Win32.
  30
  31 =cut
  32
  33 */
  34
  35 void
  36 Parrot_platform_init_code(void)
  37 {
  38     SetErrorMode(SEM_NOGPFAULTERRORBOX);
  39 }
  40
  41 /*
  42
  43 =back
  44
  45 =cut
  46
  47 */
  48
  49 /*
  50  * Local variables:
  51  *   c-file-style: "parrot"
  52  * End:
  53  * vim: expandtab shiftwidth=4:
  54  */
  55