Changeset 77f605d for perlglue.xs


Ignore:
Timestamp:
Jul 11, 2009, 1:14:35 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:
2fc8397
Parents:
3e36085
git-author:
Karl Ramm <kcr@1ts.org> (06/15/09 11:56:08)
git-committer:
Nelson Elhage <nelhage@mit.edu> (07/11/09 13:14:35)
Message:
Slightly more rope that you require for completion.

New owl_editwin_text_{before,after}_point, exported to perl.  Also,
export owl_editwin_replace and owl_editwin_point_move.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perlglue.xs

    rfd8dfe7 r77f605d  
    429429                owl_function_debugmsg("Freeing timer %p", t);
    430430                                owl_select_remove_timer(t);
     431
     432char *
     433text_before_point()
     434        PREINIT:
     435                char *p;
     436        CODE:
     437                p = owl_editwin_text_before_point(owl_global_get_typwin(&g));
     438                RETVAL = p;
     439        OUTPUT:
     440                RETVAL
     441        CLEANUP:
     442                if (p)
     443                        owl_free(p);
     444
     445char *
     446text_after_point()
     447        PREINIT:
     448                char *p;
     449        CODE:
     450                p = owl_editwin_text_after_point(owl_global_get_typwin(&g));
     451                RETVAL = p;
     452        OUTPUT:
     453                RETVAL
     454        CLEANUP:
     455                if (p)
     456                        owl_free(p);
     457
     458int
     459replace(count, string)
     460        int count;
     461        char *string;
     462        CODE:
     463                RETVAL = owl_editwin_replace(owl_global_get_typwin(&g), count, string);
     464        OUTPUT:
     465                RETVAL
     466
     467int
     468point_move(delta)
     469        int delta;
     470        CODE:
     471                RETVAL = owl_editwin_point_move(owl_global_get_typwin(&g), delta);
     472        OUTPUT:
     473                RETVAL
Note: See TracChangeset for help on using the changeset viewer.