| 1 | #!/opt/bin/perl | 1 | #!/opt/bin/perl |
|---|---|---|---|
| 2 | |||
| 3 | if ($ENV{DELIANTRA_CORO_DEBUG}) { | ||
| 4 | eval ' | ||
| 5 | use Coro; | ||
| 6 | use Coro::EV; | ||
| 7 | use Coro::Debug; | ||
| 8 | our $debug = new_unix_server Coro::Debug "/tmp/dc"; | ||
| 9 | '; | ||
| 10 | } | ||
| 2 | 11 | ||
| 3 | # do splash-screen thingy on win32 | 12 | # do splash-screen thingy on win32 |
| 4 | my $startup_done = sub { }; | 13 | my $startup_done = sub { }; |
| 5 | BEGIN { | 14 | BEGIN { |
| 6 | if (%PAR::LibCache && $^O eq "MSWin32") { | 15 | if (%PAR::LibCache && $^O eq "MSWin32") { |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |