Changeset f6b319c for perlglue.xs

Timestamp:

Apr 29, 2007, 6:27:30 PM (17 years ago)

Author:

Sam Hartman <hartmans@mit.edu>

Branches:

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

Children:

d791cdb

Parents:

03cf6b9

Message:

Implement hackish support for the wordwrap filter in the perl styles.
Note that while I think the user-visible parts of this are reasonably
OK the implementation needs cleanup.


* perlconfig.c: Add should_wordwrap attribute to message hashes.  This
   is a hack; a better solution is to expose an arbitrary interface for
   doing filter matches from perl.  That proved to be more than I had
   time for.
* perlglue.xs: expose owl_text_wordwrap
* perlwrap.pm: use in the default style

File:

• perlglue.xs (modified) (1 diff)

perlglue.xs

@@ -315 +315 @@
                 }
         }
+
+char *
+wordwrap(in, cols)
+        char *in
+        int cols
+        PREINIT:
+                char *rv = NULL;
+        CODE:
+rv = owl_text_wordwrap(in, cols);
+                RETVAL = rv;    
+        OUTPUT:
+                RETVAL
+        CLEANUP:
+                if (rv) owl_free(rv);