Changeset 4d86e06 for perlconfig.c

Timestamp:

Jul 23, 2009, 12:53:57 AM (15 years ago)

Author:

Anders Kaseorg <andersk@mit.edu>

Branches:

master, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

ba6c8bd

Parents:

029a8b5

Message:

Get rid of a whole bunch of useless casts.

Signed-off-by: Anders Kaseorg <andersk@mit.edu>

File:

• perlconfig.c (modified) (3 diffs)

perlconfig.c

@@ -307 +307 @@
   PERL_SYS_INIT3(Pargc, Pargv, Penv);
   p=perl_alloc();
-  owl_global_set_perlinterp(&g, (void*)p);
+  owl_global_set_perlinterp(&g, p);
   perl_construct(p);
 
@@ -497 +497 @@
 void owl_perlconfig_dispatch_free(owl_dispatch *d)
 {
-  SvREFCNT_dec((SV*)d->data);
+  SvREFCNT_dec(d->data);
   owl_free(d);
 }
@@ -503 +503 @@
 void owl_perlconfig_edit_callback(owl_editwin *e)
 {
-  SV *cb = (SV*)owl_editwin_get_cbdata(e);
+  SV *cb = owl_editwin_get_cbdata(e);
   SV *text;
   dSP;