E
Erik Wanta
Guest
See the ;*** comments below. It seems to me the lines are equivalent.
The following works.
gndList->myGnd=cons(inst~>name gndList->myGnd)
Is it that get returns the data and not a pointer to the data? If so,
is there a function similar to get that will return the pointer?
printf("nep()\n")
procedure(nep()
prog(()
cv=geGetWindowCellView()
gndList=list(nil)
foreach(inst cv~>instances
when(gndName=dbGetPropByName(inst "vss")~>value
when(!member(concat(gndName) gndList)
putprop(gndList list(nil) concat(gndName))
) ; when
when(gndName
;***
;This works!
putprop(gndList cons(inst~>name get(gndList
concat(gndName))) concat(gndName))
;***
;This fails!
;get(gndList concat(gndName))=cons(inst~>name get(gndList
concat(gndName)))
) ; when
) ; when
) ; foreach
return(t)
) ; prog
) ; procedure
The following works.
gndList->myGnd=cons(inst~>name gndList->myGnd)
Is it that get returns the data and not a pointer to the data? If so,
is there a function similar to get that will return the pointer?
printf("nep()\n")
procedure(nep()
prog(()
cv=geGetWindowCellView()
gndList=list(nil)
foreach(inst cv~>instances
when(gndName=dbGetPropByName(inst "vss")~>value
when(!member(concat(gndName) gndList)
putprop(gndList list(nil) concat(gndName))
) ; when
when(gndName
;***
;This works!
putprop(gndList cons(inst~>name get(gndList
concat(gndName))) concat(gndName))
;***
;This fails!
;get(gndList concat(gndName))=cons(inst~>name get(gndList
concat(gndName)))
) ; when
) ; when
) ; foreach
return(t)
) ; prog
) ; procedure