Changeset e1e59a7 for perlglue.xs


Ignore:
Timestamp:
Oct 10, 2009, 9:24:18 PM (12 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
master, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
69c3878
Parents:
737b8f1 (diff), 1fdca1b (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.
Message:
Merge branch 'unicode-fixes'
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perlglue.xs

    r5791bf7 re1e59a7  
    99
    1010#define SV_IS_CODEREF(sv) (SvROK((sv)) && SvTYPE(SvRV((sv))) == SVt_PVCV)
     11
     12typedef char utf8;
    1113
    1214        /*************************************************************
     
    2931MODULE = BarnOwl                PACKAGE = BarnOwl
    3032
    31 const char *
     33const utf8 *
    3234command(cmd, ...)
    3335        const char *cmd
     
    7779                RETVAL
    7880
    79 const char *
     81const utf8 *
    8082zephyr_getrealm()
    8183        CODE:
     
    8486                RETVAL
    8587
    86 const char *
     88const utf8 *
    8789zephyr_getsender()
    8890        CODE:
     
    100102                i = owl_zwrite_create_and_send_from_line(cmd, msg);
    101103
    102 const char *
     104const utf8 *
    103105ztext_stylestrip(ztext)
    104106        const char *ztext
     
    113115                if (rv) owl_free(rv);
    114116
    115 const char *
     117const utf8 *
    116118zephyr_smartstrip_user(in)
    117119        const char *in
     
    128130                owl_free(rv);
    129131
    130 const char *
     132const utf8 *
    131133zephyr_getsubs()
    132134        PREINIT:
     
    314316        }
    315317
    316 const char *
     318const utf8 *
    317319wordwrap(in, cols)
    318320        const char *in
     
    326328                RETVAL
    327329        CLEANUP:
    328                 if (rv) owl_free(rv);
     330                if (rv)
     331                        owl_free(rv);
    329332
    330333void
     
    429432                RETVAL
    430433
    431 const char *
     434const utf8 *
    432435skiptokens(str, n)
    433436        const char *str;
     
    569572                RETVAL
    570573
    571 const char *
     574const utf8 *
    572575get_region()
    573576        PREINIT:
Note: See TracChangeset for help on using the changeset viewer.