[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 44/61: GOOPS class slot indices defined as inline values
From: |
Andy Wingo |
Subject: |
[Guile-commits] 44/61: GOOPS class slot indices defined as inline values |
Date: |
Thu, 22 Jan 2015 18:53:16 +0000 |
wingo pushed a commit to branch wip-goops-refactor
in repository guile.
commit f7dccd37428bdb272d18e160903a2122d90020dc
Author: Andy Wingo <address@hidden>
Date: Fri Jan 16 10:20:17 2015 +0100
GOOPS class slot indices defined as inline values
* module/oop/goops.scm (define-class-index): Define as inline values.
---
module/oop/goops.scm | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/module/oop/goops.scm b/module/oop/goops.scm
index 3c5b688..41b4226 100644
--- a/module/oop/goops.scm
+++ b/module/oop/goops.scm
@@ -211,8 +211,8 @@
(syntax-case x ()
((_ (name . _) tail)
#`(begin
- (define #,(id-append #'name #'class-index- #'name)
- #,(tail-length #'tail))
+ (define-syntax #,(id-append #'name #'class-index-
#'name)
+ (identifier-syntax #,(tail-length #'tail)))
tail))))))
(fold-class-slots macro-fold-left define-class-index (begin)))
- [Guile-commits] 33/61: GOOPS utils module cleanups, (continued)
- [Guile-commits] 33/61: GOOPS utils module cleanups, Andy Wingo, 2015/01/22
- [Guile-commits] 27/61: Reimplement inherit-applicable! in Scheme, Andy Wingo, 2015/01/22
- [Guile-commits] 12/61: goops: use computed class slot offsets; untabify and fix whitepace, Andy Wingo, 2015/01/22
- [Guile-commits] 37/61: Narrative reordering in goops.scm, Andy Wingo, 2015/01/22
- [Guile-commits] 36/61: scm_make cleanup, Andy Wingo, 2015/01/22
- [Guile-commits] 39/61: More GOOPS comments, Andy Wingo, 2015/01/22
- [Guile-commits] 42/61: Convert emit-linear-dispatch to use match, Andy Wingo, 2015/01/22
- [Guile-commits] 38/61: Commenting in goops.scm, Andy Wingo, 2015/01/22
- [Guile-commits] 43/61: `match' refactor in goops.scm, Andy Wingo, 2015/01/22
- [Guile-commits] 40/61: when and unless for one-armed ifs in goops.scm, Andy Wingo, 2015/01/22
- [Guile-commits] 44/61: GOOPS class slot indices defined as inline values,
Andy Wingo <=
- [Guile-commits] 47/61: change-object-class refactor, Andy Wingo, 2015/01/22
- [Guile-commits] 45/61: Manipulate GOOPS vtable flags from Scheme, for speed, Andy Wingo, 2015/01/22
- [Guile-commits] 41/61: More GOOPS cleanups, Andy Wingo, 2015/01/22
- [Guile-commits] 48/61: GOOPS: Deprecate "using-class" procs like slot-ref-using-class, Andy Wingo, 2015/01/22
- [Guile-commits] 46/61: slot-ref, slot-set! et al bypass "using-class" variants, Andy Wingo, 2015/01/22
- [Guile-commits] 50/61: Beginnings of <slot> slot definition class, Andy Wingo, 2015/01/22
- [Guile-commits] 52/61: Use a vtable bit to mark <slot> instances, Andy Wingo, 2015/01/22
- [Guile-commits] 56/61: Minor GOOPS cleanups, Andy Wingo, 2015/01/22
- [Guile-commits] 55/61: Optimize %initialize-object, Andy Wingo, 2015/01/22
- [Guile-commits] 49/61: The GOOPS "unbound" value is a unique pair, Andy Wingo, 2015/01/22