[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] branch wip-elisp-rebased updated: remove uses of define-
From: |
Robin Templeton |
Subject: |
[Guile-commits] branch wip-elisp-rebased updated: remove uses of define-inlinable |
Date: |
Fri, 13 Dec 2024 22:55:51 -0500 |
This is an automated email from the git hooks/post-receive script.
bpt pushed a commit to branch wip-elisp-rebased
in repository guile.
The following commit(s) were added to refs/heads/wip-elisp-rebased by this push:
new ece0f4e78 remove uses of define-inlinable
ece0f4e78 is described below
commit ece0f4e7823f055a0a08a8b83e1ec4f078877723
Author: Robin Templeton <robin@terpri.org>
AuthorDate: Fri Dec 13 22:32:16 2024 -0500
remove uses of define-inlinable
* module/language/elisp/runtime.scm (ensure-present!, ensure-desc!)
(schemify): Remove use of `define-inlinable'.
---
module/language/elisp/runtime.scm | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/module/language/elisp/runtime.scm
b/module/language/elisp/runtime.scm
index bf5b36929..cf7524742 100644
--- a/module/language/elisp/runtime.scm
+++ b/module/language/elisp/runtime.scm
@@ -116,13 +116,13 @@
thunk
(lambda () (vector-set! x 4 old)))))
-(define-inlinable (ensure-present! module sym thunk)
+(define (ensure-present! module sym thunk)
(or (module-local-variable module sym)
(let ((variable (make-variable (thunk))))
(module-add! module sym variable)
variable)))
-(define-inlinable (ensure-desc! module sym)
+(define (ensure-desc! module sym)
(ensure-present! module
sym
(lambda ()
@@ -130,7 +130,7 @@
(vector-set! x 0 sym)
x))))
-(define-inlinable (schemify symbol)
+(define (schemify symbol)
(case symbol
((#nil) nil_)
((#t) t_)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Guile-commits] branch wip-elisp-rebased updated: remove uses of define-inlinable,
Robin Templeton <=