[seed] More detail on introspection of functions

[Alan Knowles <alank src gnome org>]

commit 6b260de005921f125b45b62ccb4b8f5860b3befd
Author: alan <alan alanfast akbkhome com>
Date:   Wed Feb 24 13:42:16 2010 +0800

    More detail on introspection of functions
    
    Adds name, direction and allow_none

 libseed/seed-builtins.c |   24 ++++++++++++++++++++----
 1 files changed, 20 insertions(+), 4 deletions(-)
---
diff --git a/libseed/seed-builtins.c b/libseed/seed-builtins.c
index 58b1159..41e1d5a 100644
--- a/libseed/seed-builtins.c
+++ b/libseed/seed-builtins.c
@@ -327,15 +327,31 @@ seed_introspect (JSContextRef ctx,
   for (i = 0; i < nargs; ++i)
     {
       argument = JSObjectMake (ctx, NULL, NULL);
+      GIArgInfo* arg_info = g_callable_info_get_arg (info, i);
+      const gchar *arg_type =	seed_g_type_name_to_string (
+			g_arg_info_get_type(arg_info));
+      const gchar *arg_name =	g_base_info_get_name((GIBaseInfo*) arg_info);
+      GIDirection dir = g_arg_info_get_direction (arg_info);
 
-      const gchar *arg_name =
-	seed_g_type_name_to_string (g_arg_info_get_type
-				    (g_callable_info_get_arg (info, i)));
-
+     
       seed_object_set_property (ctx, argument, "type",
 				seed_value_from_string (ctx,
+							arg_type, exception));
+      seed_object_set_property (ctx, argument, "name",
+				seed_value_from_string (ctx,
 							arg_name, exception));
 
+      seed_object_set_property (ctx, argument, "allow_none",
+			seed_value_from_boolean (ctx,
+				g_arg_info_may_be_null (arg_info) ? 1 : 0, exception));
+
+
+      seed_object_set_property (ctx, argument, "direction",
+				seed_value_from_string (ctx,
+					dir == GI_DIRECTION_OUT ? "out" :
+						(dir == GI_DIRECTION_IN ? "in" : "inout")
+					, exception));
+
       JSObjectSetPropertyAtIndex (ctx, args_obj, i, argument, NULL);
     }