[REBOL] Re: Finding all objects derived from a specific object.
From: wayne::knowngood::com at: 28-Oct-2006 16:46
I have been working on code to add or remove an value from a global
variable, but can't get the removal portion working. When I remove an
entry everything appears to be working fine in that no errors are
given, but the value remains in the list. The returned value is
'g-profiles' with no modification.
This is what my 'profile' object looks like:
g-profiles: to-list 
profile: make object! [
name: modified: desc: attribs: none
init: func [
"Returns a new profile and registers the profile"
p-name [string!] "Profile name"
p-desc [string!] "Profile description"
attribs: to-list 
g-profiles: append g-profiles name
unset: func [
"Unregister the profile and clear all values"
g-profiles: exclude g-profiles to-list name
name: desc: attribs: none
When I create a profile with:
t: make profile 
t/init "Name" "Desc"
is added to g-profiles successfully if the 'init' function is called.
When I type:
All of the variables except 'modified' are set to 'none', but "Name"
is not removed from g-profiles. At first I was thinking this might be
a name space issue, but adding the profile to g-profiles works with no
The same commands also work when typed into the console without using
an object with no problems.
I'm out of ideas on where to look next, does anyone have any
suggestions on what the problem might be or where I should look?
Thanks for any help,