[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 69/88: GOOPS class slot indices defined as inline values
From: |
Andy Wingo |
Subject: |
[Guile-commits] 69/88: GOOPS class slot indices defined as inline values |
Date: |
Fri, 23 Jan 2015 15:25:55 +0000 |
wingo pushed a commit to branch master
in repository guile.
commit c2b61cf49ce56da2dce3d6da4c08c5a77c6a4cc5
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] 53/88: goops.c no longer knows about <class> slot allocation, (continued)
- [Guile-commits] 53/88: goops.c no longer knows about <class> slot allocation, Andy Wingo, 2015/01/23
- [Guile-commits] 61/88: scm_make cleanup, Andy Wingo, 2015/01/23
- [Guile-commits] 64/88: More GOOPS comments, Andy Wingo, 2015/01/23
- [Guile-commits] 59/88: Fold (oop goops util) into (oop goops), Andy Wingo, 2015/01/23
- [Guile-commits] 51/88: Reimplement %allocate-instance in Scheme, Andy Wingo, 2015/01/23
- [Guile-commits] 62/88: Narrative reordering in goops.scm, Andy Wingo, 2015/01/23
- [Guile-commits] 66/88: More GOOPS cleanups, Andy Wingo, 2015/01/23
- [Guile-commits] 67/88: Convert emit-linear-dispatch to use match, Andy Wingo, 2015/01/23
- [Guile-commits] 60/88: Add compute-cpl tests, Andy Wingo, 2015/01/23
- [Guile-commits] 72/88: change-object-class refactor, Andy Wingo, 2015/01/23
- [Guile-commits] 69/88: GOOPS class slot indices defined as inline values,
Andy Wingo <=
- [Guile-commits] 71/88: slot-ref, slot-set! et al bypass "using-class" variants, Andy Wingo, 2015/01/23
- [Guile-commits] 70/88: Manipulate GOOPS vtable flags from Scheme, for speed, Andy Wingo, 2015/01/23
- [Guile-commits] 73/88: GOOPS: Deprecate "using-class" procs like slot-ref-using-class, Andy Wingo, 2015/01/23
- [Guile-commits] 65/88: when and unless for one-armed ifs in goops.scm, Andy Wingo, 2015/01/23
- [Guile-commits] 75/88: Beginnings of <slot> slot definition class, Andy Wingo, 2015/01/23
- [Guile-commits] 68/88: `match' refactor in goops.scm, Andy Wingo, 2015/01/23
- [Guile-commits] 78/88: Inline helpers into slot-ref, slot-set!, etc, Andy Wingo, 2015/01/23
- [Guile-commits] 63/88: Commenting in goops.scm, Andy Wingo, 2015/01/23
- [Guile-commits] 82/88: Fix foreign objects for removal of getters-n-setters, Andy Wingo, 2015/01/23
- [Guile-commits] 81/88: Minor GOOPS cleanups, Andy Wingo, 2015/01/23