[ViewVC] Diff of: cvs/deliantra/server/server/cfperl.xs

Comparing deliantra/server/server/cfperl.xs (file contents):
Revision 1.178 by root, Wed Mar 14 01:19:09 2007 UTC vs.
Revision 1.179 by root, Sun Mar 18 03:05:40 2007 UTC

   perl = perl_alloc ();
   perl_construct (perl);
   PL_exit_flags |= PERL_EXIT_DESTRUCT_END;
-  char *argv[] = {
+  const char *argv[] = {
     "",
     "-e"
     "use Event; use Coro;" // required for bootstrap
     "cf->bootstrap;"       // required for datadir :*>
     "unshift @INC, cf::datadir ();"
     "require cf;"
   };
-  if (perl_parse (perl, xs_init, 2, argv, (char **)NULL) || perl_run (perl))
+  if (perl_parse (perl, xs_init, 2, (char **)argv, (char **)NULL)
+      || perl_run (perl))
     {
       printf ("unable to initialize perl-interpreter, aborting.\n");
       exit (EXIT_FAILURE);
     }
 void
 sub_generation_inc ()
 	CODE:
         PL_sub_generation++;
-char *
+const char *
 mapdir ()
 	PROTOTYPE:
 	ALIAS:
         mapdir    = 0
         uniquedir = 1

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines