Avoid unpacking symbols in GOOPS
authorMichael Gran <spk121@yahoo.com>
Sun, 23 Aug 2009 17:40:44 +0000 (10:40 -0700)
committerMichael Gran <spk121@yahoo.com>
Sun, 23 Aug 2009 17:40:44 +0000 (10:40 -0700)
commit9db8cf1634ca9a91cb88b2532f7b87f2502b4abd
tree05556b5d44cb544591247c949e0a0fded318d4bf
parent587a33556fdef90025c1b7d4d172af649c8ebba8
Avoid unpacking symbols in GOOPS

* libguile/goops.c (scm_make_extended_class_from_symbol): new function
  (scm_class_of): don't unpack symbol chars
  (wrap_init): don't unpack symbol chars
  (make_class_from_symbol): new function
  (make_struct_class): don't unpack symbol chars
libguile/goops.c