public:
SCM mark_smob () const;
int print_smob (SCM, scm_print_state *) const;
- static const char type_p_name_[];
+ static const char * const type_p_name_;
virtual ~Context ();
private:
Scheme_hash_table *properties_dict () const;
Stream_event *infant_event_;
protected:
+ virtual void derived_mark () const;
Context *daddy_context_;
/* The used Context_def */
SCM definition_;