config/gen/platform/win32/misc.c

   1 /*
   2  * $Id$
   3  * Copyright (C) 2004-2006, The Perl Foundation.
   4  */
   5
   6 /*
   7
   8 =head1 NAME
   9
  10 config\gen\platform\win32\misc.c
  11
  12 =head1 DESCRIPTION
  13
  14 RT#48264
  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 RT#48260: Not yet documented!!!
  29
  30 =cut
  31
  32 */
  33
  34 void
  35 Parrot_platform_init_code(void)
  36 {
  37     SetErrorMode(SEM_NOGPFAULTERRORBOX);
  38 }
  39
  40 /*
  41
  42 =back
  43
  44 =cut
  45
  46 */
  47
  48 /*
  49  * Local variables:
  50  *   c-file-style: "parrot"
  51  * End:
  52  * vim: expandtab shiftwidth=4:
  53  */
  54