~kalebral-deactivatedaccount/drizzle/remove-unused-error-messages-2

« back to all changes in this revision

Viewing changes to tests/test-run.pl

  • Committer: lbieber
  • Date: 2010-08-25 20:54:20 UTC
  • mfrom: (1730.2.1 staging)
  • Revision ID: lbieber@orisndriz03-20100825205420-nbjf0o6po6b8vc6k
 Merge Patrick - add extra lines to gdbinit on OSX

Show diffs side-by-side

added added

removed removed

Lines of Context:
3366
3366
  my $args= shift;
3367
3367
  my $exe=  shift;
3368
3368
  my $type= shift;
 
3369
  # We add needed, extra lines to gdbinit on OS X
 
3370
  my $extra_gdb_init = '' ;
 
3371
  if ($^O eq 'darwin')
 
3372
  {
 
3373
    $extra_gdb_init= "set env DYLD_INSERT_LIBRARIES /usr/lib/libgmalloc.dylib\n".
 
3374
                 "set env MallocStackLogging 1\n".
 
3375
                 "set env MallocScribble 1\n".
 
3376
                 "set env MallocPreScribble 1\n".
 
3377
                 "set env MallocStackLogging 1\n".
 
3378
                 "set env MallocStackLoggingNoCompact 1\n".
 
3379
                 "set env MallocGuardEdges 1\n" ;
 
3380
  }
3369
3381
 
3370
3382
  # Write $args to gdb init file
3371
3383
  my $str= join(" ", @$$args);
3379
3391
    # write init file for client
3380
3392
    mtr_tofile($gdb_init_file,
3381
3393
               "set args $str\n" .
 
3394
               "$extra_gdb_init" .
3382
3395
               "break main\n");
3383
3396
  }
3384
3397
  else
3386
3399
    # write init file for mysqld
3387
3400
    mtr_tofile($gdb_init_file,
3388
3401
               "set args $str\n" .
 
3402
               "$extra_gdb_init" .
3389
3403
               "set breakpoint pending on\n" .
3390
3404
               "break drizzled::mysql_parse\n" .
3391
3405
               "commands 1\n" .