From: Florian Ragwitz Date: Tue, 10 Mar 2009 03:33:39 +0000 (+0100) Subject: Remove tabs from c code. X-Git-Tag: 0.78_01~71 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e3dcef7f581468b83fea67b9437c6e01ebf10543;hp=3ecaf6a072dbe632e5116216244922ec77bbd1a2;p=gitmo%2FClass-MOP.git Remove tabs from c code. --- diff --git a/mop.c b/mop.c index 425cd48..9945d18 100644 --- a/mop.c +++ b/mop.c @@ -3,10 +3,10 @@ void mop_call_xs (pTHX_ void (*subaddr) (pTHX_ CV *), CV *cv, SV **mark) { - dSP; - PUSHMARK(mark); - (*subaddr)(aTHX_ cv); - PUTBACK; + dSP; + PUSHMARK(mark); + (*subaddr)(aTHX_ cv); + PUTBACK; } #if PERL_VERSION >= 10 diff --git a/mop.h b/mop.h index 35a7292..7373ead 100644 --- a/mop.h +++ b/mop.h @@ -11,10 +11,10 @@ #include "ppport.h" #define MOP_CALL_BOOT(name) \ - { \ - EXTERN_C XS(name); \ - mop_call_xs(aTHX_ name, cv, mark); \ - } + { \ + EXTERN_C XS(name); \ + mop_call_xs(aTHX_ name, cv, mark); \ + } void mop_call_xs (pTHX_ void (*subaddr) (pTHX_ CV *), CV *cv, SV **mark); diff --git a/xs/MOP.xs b/xs/MOP.xs index 545933e..f0132e9 100644 --- a/xs/MOP.xs +++ b/xs/MOP.xs @@ -39,10 +39,10 @@ BOOT: wrap = newSVpvs("wrap"); associated_metaclass = newSVpvs("associated_metaclass"); - MOP_CALL_BOOT (boot_Class__MOP__Package); - MOP_CALL_BOOT (boot_Class__MOP__Class); - MOP_CALL_BOOT (boot_Class__MOP__Attribute); - MOP_CALL_BOOT (boot_Class__MOP__Method); + MOP_CALL_BOOT (boot_Class__MOP__Package); + MOP_CALL_BOOT (boot_Class__MOP__Class); + MOP_CALL_BOOT (boot_Class__MOP__Attribute); + MOP_CALL_BOOT (boot_Class__MOP__Method); # use prototype here to be compatible with get_code_info from Sub::Identify void