diff --git a/src/las.c b/src/las.c index 042bcb6f703ea5899e454e8345db85c8674943b1..062eecfcd888785ffb1f586f34b8d424291cdd13 100644 --- a/src/las.c +++ b/src/las.c @@ -5,7 +5,7 @@ \*/ /**/ #include "global.h" -RCSID("$Id: las.c,v 1.186 2000/07/12 12:38:40 grubba Exp $"); +RCSID("$Id: las.c,v 1.187 2000/07/12 21:57:42 mast Exp $"); #include "language.h" #include "interpret.h" @@ -935,6 +935,8 @@ node *debug_mkexternalnode(struct program *parent_prog, int i) node *res = mkemptynode(); struct identifier *id; res->token = F_EXTERNAL; + + id = ID_FROM_INT(parent_prog, i); #ifdef PIKE_DEBUG if(d_flag) { @@ -943,8 +945,6 @@ node *debug_mkexternalnode(struct program *parent_prog, int i) } #endif - id = ID_FROM_INT(parent_prog, i); - copy_shared_string(res->type, id->type); /* FIXME */