[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/racket-mode 0faa6d3528: Handle `portal` syntax (by ignorin
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/racket-mode 0faa6d3528: Handle `portal` syntax (by ignoring it) |
Date: |
Tue, 25 Apr 2023 13:02:06 -0400 (EDT) |
branch: elpa/racket-mode
commit 0faa6d3528f1c39b1734f24fb08beec3917c8ca5
Author: Sam Tobin-Hochstadt <samth0@gmail.com>
Commit: GitHub <noreply@github.com>
Handle `portal` syntax (by ignoring it)
---
racket/imports.rkt | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/racket/imports.rkt b/racket/imports.rkt
index 4bf3255155..6f55159728 100644
--- a/racket/imports.rkt
+++ b/racket/imports.rkt
@@ -65,7 +65,7 @@
(define (handle-raw-require-spec spec lang)
(let loop ([spec spec])
(syntax-case* spec
- (for-meta for-syntax for-template for-label just-meta for-space
just-space)
+ (for-meta for-syntax for-template for-label just-meta for-space
just-space portal)
symbolic-compare?
[(for-meta _phase specs ...)
(for ([spec (in-syntax #'(specs ...))])
@@ -88,6 +88,7 @@
[(just-space _space specs ...)
(for ([spec (in-syntax #'(specs ...))])
(loop spec))]
+ [(portal id content) (void)]
[raw-module-path
(handle-phaseless-spec #'raw-module-path lang)])))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/racket-mode 0faa6d3528: Handle `portal` syntax (by ignoring it),
ELPA Syncer <=