Changeset b54b06a for perlglue.xs

Timestamp:

Sep 30, 2011, 8:14:49 AM (13 years ago)

Author:

Jason Gross <jgross@mit.edu>

Children:

cce9369

Parents:

c0e728a

git-author:

Jason Gross <jgross@mit.edu> (05/23/11 22:03:45)

git-committer:

Jason Gross <jgross@mit.edu> (09/30/11 08:14:49)

Message:

Added functionality for creating enum variables from perl

File:

• perlglue.xs (modified) (1 diff)

perlglue.xs

@@ -444 +444 @@
 
 void
+new_variable_enum(name, ival, summ, desc, validset)
+        const char * name
+        int ival
+        const char * summ
+        const char * desc
+        const char * validset
+        CODE:
+        owl_variable_dict_newvar_enum(owl_global_get_vardict(&g),
+                                      name,
+                                      summ,
+                                      desc,
+                                      ival,
+                                      validset);
+
+void
 start_edit(edit_type, line, callback)
         const char *edit_type