From 8ac853655d9b744749adcb9687c13d99cdd6e9fb Mon Sep 17 00:00:00 2001 From: Nick Ing-Simmons Date: Fri, 31 Oct 1997 01:43:49 +0000 Subject: Convert miniperl sources to ANSI C. Several passes of GNU C's 'protoize' plus a few hand edits. Will compile miniperl with gcc -x c++ (i.e. treat .c a C++ files) Does not link seems gcc's C++ does not define a symbol for const char foo[] = "...."; i.e. with empty []. p4raw-id: //depot/ansiperl@194 --- universal.c | 12 +++--------- 1 file changed, 3 insertions(+), 9 deletions(-) (limited to 'universal.c') diff --git a/universal.c b/universal.c index d6689f8acf..9a867631d0 100644 --- a/universal.c +++ b/universal.c @@ -8,11 +8,7 @@ */ static SV * -isa_lookup(stash, name, len, level) -HV *stash; -char *name; -int len; -int level; +isa_lookup(HV *stash, char *name, int len, int level) { AV* av; GV* gv; @@ -75,9 +71,7 @@ int level; } bool -sv_derived_from(sv, name) -SV * sv ; -char * name ; +sv_derived_from(SV *sv, char *name) { SV *rv; char *type; @@ -203,7 +197,7 @@ XS(XS_UNIVERSAL_VERSION) } void -boot_core_UNIVERSAL() +boot_core_UNIVERSAL(void) { char *file = __FILE__; -- cgit v1.2.1