put ( self.imethods, classident(sc,superclassmethod) )
}
}
every public := (!ipublics) do {
if public.class == sc then
put (self.imethods, classident(sc,public.ident))
}
}
end
#
# globals declared within the class
#
record classident(class,ident)
record class__state(__state,__methods,supers,methods,text,imethods,ifields,glob,name,fields,tag)
record class__methods(read,has_initially,ispublic,foreachmethod,foreachsuper,foreachfield,isvarg,transitive_closure,writedecl,writespec,writemethods,write,resolve,String,name,declaration)