X-Git-Url: http://git.draconx.ca/gitweb/gob-dx.git/blobdiff_plain/4c9cb9b99991c36920bd17e366e2128d1b22eb6e..8cb6370effd9f2dacc6dc9b662a43ea19ee637ac:/src/tree.c diff --git a/src/tree.c b/src/tree.c index a68b974..ab06d4f 100644 --- a/src/tree.c +++ b/src/tree.c @@ -77,7 +77,7 @@ new_funcarg(Type *atype, char *name, GList *checks) } Node * -new_method(int scope, Type *mtype, char *otype, GList *gtktypes, char *id, GList *args, char *onerror, GString *cbuf, int line_no,int ccode_line) +new_method(int scope, Type *mtype, char *otype, GList *gtktypes, char *id, GList *args, char *onerror, GString *cbuf, int line_no,int ccode_line, int vararg) { Method *node = (Method *)g_new(Node,1); node->type = METHOD_NODE; @@ -91,11 +91,12 @@ new_method(int scope, Type *mtype, char *otype, GList *gtktypes, char *id, GList node->cbuf = cbuf; node->line_no = line_no; node->ccode_line = ccode_line; + node->vararg = vararg; return (Node *)node; } Node * -new_argument(char *gtktype, GList *flags, char *name, GString *get, int get_line, GString *set, int set_line) +new_argument(char *gtktype, GList *flags, char *name, GString *get, int get_line, GString *set, int set_line, int line_no) { Argument *node = (Argument *)g_new(Node,1); node->type = ARGUMENT_NODE; @@ -106,16 +107,18 @@ new_argument(char *gtktype, GList *flags, char *name, GString *get, int get_line node->get_line = get_line; node->set = set; node->set_line = set_line; + node->line_no = line_no; return (Node *)node; } Node * -new_variable(int scope, Type *vtype, char *id) +new_variable(int scope, Type *vtype, char *id, int line_no) { Variable *node = (Variable *)g_new(Node,1); node->type = VARIABLE_NODE; node->scope = scope; node->vtype = vtype; node->id = id; + node->line_no = line_no; return (Node *)node; }