printp ("\n$Id: gdb_c_test.c,v 1.2 2004/05/21 20:23:43 kettenis Exp $\n");
printp ("\n$Id: gdb_c_test.c,v 1.3 2004/12/27 14:01:00 kettenis Exp $\n");
ULONG   gdb_c_test( ULONG *parm ){   char *p = "gdb_c_test";   char *ridiculously_long_variable_name_with_equally_long_string_assignment;   register long local_reg = 7;   static unsigned long local_static, local_static_sizeof;   long local_long;   unsigned long *stack_ptr;   unsigned long end_of_stack;   ridiculously_long_variable_name_with_equally_long_string_assignment =      "ridiculously long variable name with equally long string assignment";   local_static = 9;   local_static_sizeof = sizeof (struct GDB_STRUCT_TEST);   local_long = local_reg + 1;   stack_ptr  = (unsigned long *) &local_long;   end_of_stack =      (unsigned long) &stack_ptr + sizeof(stack_ptr) + sizeof(end_of_stack) - 1;   printp ("\n$Id: gdb_c_test.c,v 1.2 2004/05/21 20:23:43 kettenis Exp $\n");   printp( "%s: arguments = %X, %X, %X, %X, %X, %X\n",           p, parm[ 1 ], parm[ 2 ], parm[ 3 ], parm[ 4 ], parm[ 5 ], parm[ 6 ] );   gdb_char_test   = gdb_struct1_test.c = (char)   ((long) parm[1] & 0xff);   gdb_short_test  = gdb_struct1_test.s = (short)  ((long) parm[2] & 0xffff);   gdb_long_test   = gdb_struct1_test.l = (long)   ((long) parm[3] & 0xffffffff);   gdb_union1_test.l = (long) parm[4];   gdb_arr_test[0] = gdb_struct1_test.arr[0] = (char) ((long) parm[1] & 0xff);   gdb_arr_test[1] = gdb_struct1_test.arr[1] = (char) ((long) parm[2] & 0xff);   gdb_arr_test[2] = gdb_struct1_test.arr[2] = (char) ((long) parm[3] & 0xff);   gdb_arr_test[3] = gdb_struct1_test.arr[3] = (char) ((long) parm[4] & 0xff);   gdb_arr_test[4] = gdb_struct1_test.arr[4] = (char) ((long) parm[5] & 0xff);   gdb_arr_test[5] = gdb_struct1_test.arr[5] = (char) ((long) parm[6] & 0xff);   gdb_struct1_test.bfield = 144;   gdb_struct1_test.next = &gdb_struct2_test;   gdb_structp_test      = &gdb_struct1_test;   gdb_structpp_test     = &gdb_structp_test;   gdb_recursion_test (3, (long) parm[1], (long) parm[2], (long) parm[3],		       (long) parm[4], (long) parm[5], (long) parm[6]);   gdb_char_test = gdb_short_test = gdb_long_test = 0;   gdb_structp_test  = (void *) 0;   gdb_structpp_test = (void *) 0;   memset ((char *) &gdb_struct1_test, 0, sizeof (gdb_struct1_test));   memset ((char *) &gdb_struct2_test, 0, sizeof (gdb_struct2_test));   local_static_sizeof = 0;   local_static = 0;   return ( (ULONG) 0 );}