HCoop / bpt / guile.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: e437c50) | patch
Inline helpers into slot-ref, slot-set!, etc
authorAndy Wingo <wingo@pobox.com>
Sun, 18 Jan 2015 20:02:51 +0000 (21:02 +0100)
committerAndy Wingo <wingo@pobox.com>
Fri, 23 Jan 2015 15:16:03 +0000 (16:16 +0100)
commitc4974c57997dfd0a10628a6f5d215c02e6ec9548
tree7bc1ce9ce78f06d00018c798226a642a13d76743tree | snapshot (tar.gz zip)
parente437c50b88bc540b09763df52331c096f6ec8533commit | diff
Inline helpers into slot-ref, slot-set!, etc

* module/oop/goops.scm (%class-slot-definition): New helper.
  (class-slot-definition): Use the new helper.
  (get-slot-value-using-name, set-slot-value-using-name!)
  (test-slot-existence): Remove helpers.
  (slot-ref, slot-set!, slot-bound?, slot-exists?): Inline helpers for
  speed.
module/oop/goops.scm diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.