Branch: Tag:

1997-04-23

1997-04-23 23:06:16 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

bugfix

Rev: src/mapping.c:1.18

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: mapping.c,v 1.17 1997/04/16 03:09:13 hubbe Exp $"); + RCSID("$Id: mapping.c,v 1.18 1997/04/23 23:06:16 hubbe Exp $");   #include "main.h"   #include "types.h"   #include "object.h"
763:    struct array *ind, *val;    node *n;    ind=mapping_indices(m); -  val=mapping_indices(m); +  val=mapping_values(m);    n=mkefuncallnode("mkmapping",    mknode(F_ARG_LIST,    make_node_from_array(ind),