在自定义球拍语言中，如何定义递归宏？
在自定义球拍语言中，递归宏可以通过以下方式进行定义：
递归宏是一种宏定义，它在宏展开的过程中调用自身。通过递归宏，可以实现对某个表达式或代码块的重复调用，从而简化代码编写和提高代码的可读性。
在自定义球拍语言中，定义递归宏的一般步骤如下：
- 使用宏定义关键字（例如：#define）来定义宏，并给宏起一个合适的名称。
- 在宏定义中使用条件语句（例如：if语句）来判断递归的终止条件。当满足终止条件时，宏将不再调用自身，从而结束递归。
- 在宏定义中使用宏展开操作符（例如：##）来将宏参数与其他代码连接起来，形成完整的表达式或代码块。
- 在宏定义中使用宏调用操作符（例如：宏名(参数)）来调用自身，实现递归调用。
递归宏的定义可以根据具体需求进行灵活设计，以满足不同的编程需求。递归宏在自定义球拍语言中的应用场景包括但不限于：代码生成、数据结构操作、算法实现等。
以下是一个示例递归宏的定义：
#define RECURSIVE_MACRO(x) \
if (x > 0) { \
printf("%d\n", x); \
RECURSIVE_MACRO(x - 1); \
}上述示例定义了一个递归宏RECURSIVE_MACRO，它接受一个整数参数x，并在x大于0时输出x的值，并调用自身传入x-1作为参数。当x小于等于0时，递归终止。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云函数（云原生无服务器函数计算服务）：https://cloud.tencent.com/product/scf
- 腾讯云数据库（云原生数据库服务）：https://cloud.tencent.com/product/cdb
- 腾讯云CDN（内容分发网络服务）：https://cloud.tencent.com/product/cdn
- 腾讯云人工智能（AI服务）：https://cloud.tencent.com/product/ai
- 腾讯云物联网套件（物联网平台）：https://cloud.tencent.com/product/iot-suite
- 腾讯云移动开发（移动应用开发服务）：https://cloud.tencent.com/product/maap
- 腾讯云对象存储（云原生对象存储服务）：https://cloud.tencent.com/product/cos
- 腾讯云区块链服务（区块链应用开发平台）：https://cloud.tencent.com/product/tbaas
- 腾讯云虚拟专用网络（云原生网络服务）：https://cloud.tencent.com/product/vpc
- 腾讯云安全产品（云原生安全服务）：https://cloud.tencent.com/product/ssp
相关·内容
我正在学习球拍中的函数式编程，一个问题测试说： 在Java中，我们可以使用x += 10;递增变量 我们能在球拍(+= var amount)中定义一个和Java含义相同的函数吗？ 我不是很确定，但我认为不是，因为我不能用球拍中的函数修改变量。 像这样： (define myvar 10)
(+= myvar 1)
myvar 当我在drracket控制台中输入myvar时，我一直得到10
浏览 26提问于2019-06-09得票数 1
回答已采纳
我可以用中的代码在球拍中使用"while“循环
(define-syntax-rule (while-loop condition body ...)
(let loop ()
(when condition
body ...
(loop))))
但是，我想在无限循环中使用break，如下所示：
(define (testfn)
(define x 5)
(while-loop #t ; infinite while loop;
(println x)
(set! x (sub1 x))
(w
浏览 0提问于2016-07-31得票数 2
对于一个只熟悉C宏的有经验的命令式程序员来说，学习球拍宏系统的最佳途径是什么？不仅仅是它的机制(怎么做？)还包括在哪里和为什么使用它，以及说明这一点的示例。
是否应该先学习Scheme (或Lisp)宏？我听说"On Lisp“这本书对Lisp宏有很好的解释，并提供了很好的用法示例。这是否有用？
浏览 4提问于2011-11-03得票数 7
回答已采纳
据我所知--如果我错了，我会在这里得到纠正--好的方案实践就是做任何需要循环的事情，用递归重复，而且溢出不会成为一个问题，因为尾递归是内置的。然而，Lisp没有防止溢出的保护，因此，所有循环迭代宏(loop、while等)都会受到保护。因此，在实际的Lisp中，您通常不使用递归，而Scheme只想使用递归。
如果我的假设是正确的，那么是否有一种方法可以让Lisp变得“纯粹”，而不存在溢出风险？或者，在Lisp中使用递归是否有太多的逆流？我从小阴谋家那里回想起他们是如何用递归给你一个彻底的锻炼的。还有一个早期的版本叫做“小李斯特”。它在Lisp中给您提供了相同的递归训练吗？然后Lisp的Land
浏览 0提问于2018-02-27得票数 4
回答已采纳
2回答
#;.我想在我再次使用的每一种语言中看到它。它能通过它们的宏系统添加到其他Lisps吗？还是注释字符破坏了宏系统读取代码的能力？
一个足够的答案将显示一个宏正在构建的任何Lisp，而不是球拍，允许在评论系统的变化。你不需要实际实现球拍的#;，但我想如果你这样做。Lisps与球拍的相似性最小，例如Clojure或任何非方案都将是很好的特殊之处。
浏览 5提问于2021-01-09得票数 0
回答已采纳
1回答
我正在尝试匹配类型化球拍中的哈希表，但我一直收到以下错误。这段代码在非类型化的球拍中工作得很好，我试着对它进行了一些修改，但没有效果。这个错误看起来像是在match宏展开后的某个地方发生的，但我对球拍还不够熟悉，无法理解在哪里或如何调试这个问题。
可以在类型化的球拍中使用hash-table模式吗？
(match (make-hash '((a . 2) (b . 3) (c . 2)))
[(hash-table _ ...) #t])
Type Checker: Polymorphic function `hash-map' could not be applied
浏览 5提问于2020-12-26得票数 2
由于Clojure(脚本)是一种Lisp语言，因此它中的所有领域特定语言(Domain Specific Languages，DSL)示例都使用括号对表达式begin和end进行编码(就像Lisp一样)。但是，至少还有另一种Lisp方言( )有许多“无括号”的DSL (、、)。我可以使用一些特别的方法来转换：
if (a > 10) { print "Ok!" } ==> (if (> a 10) (print "Ok!"))
我想知道在Clojure中是否有一些最佳实践指南或库来完成这些转换。或者，也许有人已经将Clojure的C
浏览 3提问于2016-10-12得票数 3
5回答
球拍是Scheme的后代。球拍和R6RS有什么不同？它增加了什么，或者去掉了什么，或者只是不同了？
我知道球拍不仅仅是一种语言，它是一种语言的平台。但我指的是主要的球拍方言。
浏览 4提问于2010-07-27得票数 200
回答已采纳
4回答
在我大学的一门CS课程中，我们必须使用球拍。在大学之前，我大部分的编程时间都是用PHP和Java，还有JavaScript。我知道Racket是一种函数式编程语言，就像JavaScript一样(编辑:当然不是。但我觉得我在用它进行“函数式”编程，在看到答案之后，这是一种错误的感觉。)但我仍然不理解球拍的一些基本特征(方案)。
为什么没有“真实”变量？为什么在球拍/计划中所有的东西都是一个函数？为什么语言设计者不包括他们？，define-struct是什么？是一种功能吗？是上课吗？不知何故，由于我的PHP背景，我总是认为它是一个类，但这不可能真的是正确的。
我在这里的问题是，我想理解语言的概念。
浏览 0提问于2012-04-10得票数 6
回答已采纳
3回答
(define defun define)
它在球拍中引起误差define: not allowed in an expression context in: define。如何为define、let、lambda等基本构造创建别名
浏览 3提问于2013-11-14得票数 3
回答已采纳
我住在#lang球拍里。我试图弄清楚如何延迟函数参数的求值--我不能更改传入的参数。例如，假设我想通过这样的操作：
(define (a e) 6)
那么我想用这个论点来调用一个
(a (/ 1 0))
我怎样才能延迟对这个论点的评估呢？
我尝试这样做(在函数a中)：
(define (a e) (define E (lambda () e)) 6)
但是，这仍然是首先评估参数。有什么建议吗？
浏览 1提问于2017-11-21得票数 2
2回答
球拍中的While循环
、、、、
在球拍中编写一个过程，其行为类似于Java等语言中的"while循环“。while循环需要两段代码才能运行:一个条件和一个主体。它运行body，然后再次尝试该条件，如果为真，则再次运行body。这会一直持续下去，直到条件返回false。
这就是我如何开始的:然后我被卡住了。
(define (while condition body)
(when (true? condition)
(cons (proc body) (proc (rest body)))
浏览 10提问于2020-02-27得票数 1
1回答
我想用针织品生成一个Latex文档，但它不允许我将图形的标签更改为我的语言。守则：
```{r rstudio, echo = FALSE, fig.cap = "RStudio IDE", fig.margin = T}
绘图(压力)
这就产生了：
但是，我希望标题标签读Figura：(葡萄牙语)而不是图：。我添加了变量lang: pt-br，用于在使用\@ref(fig:rstudio)调用它时进行校正，但没有修复图形标签。
如何更改Rmarkdown中的标题标签？
浏览 3提问于2017-11-08得票数 7
回答已采纳
我被要求用球拍写一个程序，以便将算术运算符的行为从前缀更改为后缀。更准确地说:我希望这段代码：(a b +)的行为像：(+ a b) 我想使用define-syntax-rule来改变+运算符的行为，但我有一个问题，在使用define-syntax-rule时，我们首先写入宏的名称，然后再写参数。我的问题是:有没有办法在球拍函数中写出开头的参数和最后的名字？
浏览 52提问于2021-05-10得票数 1
回答已采纳
我一直在努力将我用Python编写的静态站点生成器转换为Racket。这主要是一个学习练习，以更好地了解球拍。我现在已经开始使用Racket版本了，但是有一件事我更喜欢它：pathlib.Path对象。生成器有很多路径处理，在Python代码中如下所示：
render_template(root / "templates" / "index.jinja")
然而，球拍代码看起来更像这样：
(render-template (build-path (root) "templates" "index.jinja"))
在Python代
浏览 2提问于2014-06-28得票数 3
回答已采纳
2回答
我一直试图使用for循环在递归函数中实现for循环。在球拍中使用已经实现的"for“是不允许的。是否有办法实施这种情况？
注:我使用的是中级学生语言。
浏览 1提问于2017-10-07得票数 2
回答已采纳
1回答
球拍两个相互引用的方法
、、、、
我在The Little Schemer上做练习，但我是用DrRacket在球拍上做的。 其中一个练习有两个相互引用的方法。这可以在球拍中完成吗?如果可以，如何完成？ 当我在DrRacket ide中尝试这样做时，我得到了一个错误，因为在文件的较高位置创建的文件不能引用后面的内容。我假设这是因为它被解释了，但我不确定。 有没有办法绕过这个问题？
浏览 30提问于2021-03-26得票数 0
回答已采纳
在中，我找到了以下解释：
对于#lang racket，语法是
#朗球拍装饰..。
它读起来与
(模块名叫球拍.)
但是，如何将#lang reader "path/to/reader.rkt"语法转换为(module ...)语法，同时不生成DrRacket中的错误？
浏览 4提问于2017-01-07得票数 3
回答已采纳
1回答
有没有一种方法可以在一个函数体中传递，而不是在球拍中传递名称本身？例如：
(define (foo x) (+ x 1))
(bar #'foo) ; I'd like to get #'(+ x 1) rather than #'foo
浏览 3提问于2018-11-29得票数 0
我在讲稿上看到了这个
> (+ 10 (-< 1 2 3))
11
> (next)
12
> (next)
13
> (next)
'done
但是当我自己在DrRacket上尝试的时候，它产生了一个错误
> (+ 10 (-< 1 2 3))
. . -<: undefined;
cannot reference an identifier before its definition
>
幻灯片没有指明任何要求。我也谷歌“球拍-<：未定义”，但似乎谷歌找不到任何与符号-<相关的结果。我怎么才能修好它？
浏览 0提问于2018-11-14得票数 2
回答已采纳
2回答
在评估一个条件后，我在球拍中设置变量时遇到了问题。如果我有一个函数定义，比如
(define foo
(lambda (x y z)
(cond
((> 3 2)
(what code here?)))))
假设我想要将变量z设置为值10，如果条件的计算结果为真，语法是什么？
浏览 2提问于2015-12-10得票数 0
1回答
我听说Clojure宏更容易编写，但不像Racket的卫生宏那么可靠。我的问题有两部分：
gensym和卫生宏有什么区别？
什么是球拍宏提供的Clojure不提供？(不管是安全的，可组合的，还是其他的)
浏览 0提问于2016-01-12得票数 12
2回答
我正在阅读“计划的三个实施模式”。我想一起工作，实现口译，但我得到错误信息。我认为作者是chez方案的幕后策划者，所以我尝试了除了DrRacket (R5RS模式)之外。有人知道将运行此示例代码的方案设置吗？这似乎是计划中常见的问题。我尝试的每个示例代码都有一些问题，或者是在不同的版本中创建的。这是到报纸的链接。谢谢。
浏览 2提问于2014-08-22得票数 3
回答已采纳
1回答
我想要获得调用shell命令并返回字符串的函数的结果。我正在使用球拍，这是我第一次尝试： (define (run-function)
(let*
([stdout (some-function)]
[output (process-string stdout)])
;; many more lines...
output)) 它似乎工作得很好，但假设我想要编写类似于 用于许多其他shell命令。 为了避免代码重复，我可以只定义一个更通用的函数，如下所示： (define (shell cmd)
(let*
([stdout (cmd)]
浏览 24提问于2021-02-26得票数 4
回答已采纳
1回答
如何在搜索后找到的每个匹配项上使用地图？
我已经创建了各种使用map调用的函数。
我想使用地图上的每一个搜索匹配发现。
如果我在文本中搜索日期，如何在找到的每个搜索匹配项上应用i/v/nmap？
像这样的东西？
%s/search-pattern/=\normal mode map/g
%s/search-pattern/=\insert mode map/g
还可以组合地图吗？
希望我说得够清楚了。
浏览 2提问于2012-05-12得票数 1
回答已采纳
3回答
我们的应用程序支持RTL语言，如阿拉伯语，波斯语。
在iOS 9之后，导航控制器和选项卡控制器的行为已经更改。我只找到了这个链接来解决这个问题。
我在我的appDelegate中编写了这段代码，它工作得很好，导航栏和选项卡条被设置为LTR。
if(SYSTEM_VERSION_GREATER_THAN_OR_EQUAL_TO(@"9.0")) {
[[UINavigationBar appearance] setSemanticContentAttribute:UISemanticContentAttributeForceLeftToRight];
[[UITa
浏览 13提问于2015-10-04得票数 4
3回答
我正在尝试在球拍中创建一个switch语句宏。我很难搞清楚该怎么做。我希望能够使用如下所示的函数。
(define x 99)
(switch x
[3 (displayln "x is 3")]
[4 (displayln "x is 4")]
[5 (displayln "x is 5")]
['default (displayln "none of the above")])
我尝试过使用带语法大小写的模式匹配，但我不确定这是不是正确的方法。
浏览 1提问于2015-09-26得票数 2
2回答
我想写一个函数，它接收一个表达式，然后用"+“替换所有的"-”，反之亦然，并在racket中给出一个新的表达式。
(define-struct anode (oper args))
(define (myapply f exl)
(cond
[(symbol? f)
("swap cond and recurse rest")]))
(define (myeval ex)
(cond [(number? ex) ex]
[else (myapply (anode-oper ex) (anode-args
浏览 6提问于2017-11-30得票数 0
回答已采纳
我有一个宏，它扩展了球拍语法，并在某个时候接受一系列bog标准球拍表达式。如下所示，相关的语法变量是body
(syntax-parse stx
[(_ some-id:id
body:expr ...+)
这个宏使用生成的方法生成一个racket类，如下所示：
#'(<class stuff>
(define/public (some-id some-formal-parameter)
body ...)
正如我说过的，body是普通的球拍代码，除了一个可以专门在身体中使用的表达式，例如：
(define-syntax-rule (twee
浏览 2提问于2016-02-09得票数 1
回答已采纳
最近，我参加了彼得·诺维格的Udacity课程“CS212:计算机程序设计”。不幸的是，课程都是用Python编写的，所以，为了便于学习，我在球拍中为该课程第三单元中给出的regex编译器编写了等效的代码。
你可以在这里看到我的代码：
现在，让我困扰的是Norvig先生用Python编写的原始代码比我的要短一些。:(但是好吧，我只是球拍的初学者，这是意料之中的。但我想知道是否一些球拍专家可以缩短我的代码，使球拍代码变得比原始Norvig的Python代码更短？
浏览 2提问于2012-05-04得票数 1
回答已采纳
1回答
我想更好地理解像球拍这样的功能语言的副作用。
球拍不是一种纯粹的功能语言，对吧？在书中，它将副作用定义为：
如果它以任何方式影响后续计算(并最终影响程序输出)，则返回一个值以供在周围的上下文中使用。
根据定义，我认为define、set!或displayln应该是副作用.那let呢？
什么是区分副作用的最简单的方法。
浏览 2提问于2015-04-09得票数 0
回答已采纳
1回答
我在球拍中制作了我自己的原型OO系统，它使用"this“作为方法。一切都很好，但不幸的是它阻止了球拍的原生类系统使用"this“。
这是我想要做的：
(require (only-in racket (this oldthis)))
(define-syntax this
(syntax-id-rules (set!)
((set! this ...) (void))
((this a ...) ((self) a ...))
(this (if (null? (self)) oldthis (self)))))
我尝试做的一件事是将上面的"
浏览 0提问于2016-06-04得票数 2
1回答
是否可以定义一个宏，其名称与racket中的函数相同，但不覆盖它。(因此该名称将有2种可能的用法，取决于传递的参数)
例如，函数圆。
1.使用(球拍函数)
( round 1.2 )
-> 1
2.使用(宏)
(round (someStruct arg))
-> resultStruct
浏览 1提问于2019-12-27得票数 0
回答已采纳
6回答
在Python中，我可以这样做：
t = (1, 2)
a, b = t
假设我在...and中有一个列表'(1 2)。有没有办法用let做类似的事情？如果有什么不同的话，我会用球拍。
浏览 2提问于2010-11-19得票数 21
回答已采纳
AND和OR是宏，因为宏不是方案/球拍中的第一类，所以它们不能作为参数传递给其他函数。部分解决方案是使用and-map或or-map。有没有可能编写一个接受任意宏的函数，并将其转换为一个函数，以便将其作为参数传递给另一个函数？有没有哪种语言有一流的宏？
浏览 1提问于2020-04-28得票数 2
我正试着用“通用Lisp:符号计算的温柔入门”一书来学习Common。此外，我正在使用SBCL，Emacs，和泥。
在第八章的高级部分，作者介绍了labels的特殊功能。实际上，他在顶层(主函数和辅助函数)上定义事物与在函数中使用label表达式之间形成了对比。
例如，这将是一个带有尾调用的reverse list函数，使用顶级方法：
(defun reverse-top-level-helper (xs-left accu)
(cond ((null xs-left) accu)
(t (reverse-top-level-helper (cdr xs-left)
浏览 2提问于2021-06-02得票数 4
回答已采纳
1回答
实际上，我有一段连续包含宏的代码。
我想知道的是它们是如何在代码上工作的，因为我想通过看到下面的结果来编写自己的预处理器，我真的很惊讶
#define int char //macro1
#define char float //macro2
#define float int //macro3
main()
{
int x;
char y;
float z;
}
我期望预处理后文件中的代码是所有三个变量x，y，z都是int，int，int
但令人惊讶的是(对我来说)类型是不变的，为什么呢？有没有人能详细解释一下在预处理过程中宏是如何发挥作用的
浏览 2提问于2012-07-03得票数 0
3回答
我有DrRacket版本5.0.2，我已经花了大约3个小时来寻找合适的库来使while、dolist和dotimes工作。我知道如何使用它们，但我就是找不到合适的库。例如，当我输入dotimes时，它会告诉我未知的标识符。
PS:你必须使用define-syntax来定义这些循环吗？我尝试过(require srfi/42)，但它不起作用。我使用的是#lang scheme。
浏览 2提问于2011-12-13得票数 5
回答已采纳
2回答
今天我遇到了一种意想不到的行为，这与我所知道的球拍中的易变性完全矛盾。
#lang racket
(define num 8)
;(define num 9)
取消注释第二行返回错误"module: duplicate definition for identifier in: num"，这是很好的和预期的。毕竟，define应该将已经定义的值视为不可变的。
然而，这对我来说毫无意义：
#lang racket
(define num 8)
num
(define define 1)
(+ define define)
它返回8和2，但是..。
define不是set
浏览 2提问于2019-10-31得票数 2
回答已采纳
我在自定义策略中声明了一组受支持的语言。但是发生的事情是，微软隐含地将一些文本和消息转换为其他语言，即使我还没有将该语言取消支持。
(例如)我的应用程序不支持克罗地亚语言，所以当我在查询参数中传递克罗地亚语言时，它应该指向自定义策略中引用的默认语言，因为克罗地亚语在我的不支持语言列表中。实际上，一些消息被转换为克罗地亚语并显示在UI中。
浏览 3提问于2019-07-01得票数 1
3回答
我在网上自学LISP，学习计算机程序的结构和解释，但它与我正在运行的学习LISP的球拍程序在小细节上有所不同。例如，SICP说任何列表的终止元素都是'nil'，但是Racket不支持'nil‘。我如何在球拍中创建一个空列表，以便测试我自己的过程？
浏览 1提问于2010-12-24得票数 5
测试代码：
(define-syntax (test-d stx)
#'(begin
(define (callme a)
(writeln a))))
(define-syntax (test-e stx)
(datum->syntax stx '(begin
(define (callme2 a)
(writeln a)))))
> (test-d)
> (callme 1)
. . callme: unde
浏览 3提问于2018-04-05得票数 8
回答已采纳
我目前正在阅读CAR Hoare的，并尝试使用Haskell实现它的早期示例。
这本书从定义进程代数开始-本质上，进程接受事件，并返回另一个进程或指示进程不参与此事件的符号(bleep)。STOP进程是为任何事件返回bleep的进程。
这本书建议你用LISP来做这件事，所以我使用了球拍。STOP的定义非常简单：
(define (STOP event) 'bleep)
as是一个‘自动售货机’进程，它只接受事件coin并返回STOP
(define (coin-to-stop event)
(case event
['coin STOP]
[else
浏览 2提问于2016-05-25得票数 3
1回答
我正在从事音乐项目，我想使用一些特殊的字符(从亚洲语言-泰卢固语)，这不能实现使用任何在此链接提供的独码：
我是否可以使用java中的某种方式创建自己的角色，并为其分配一些键盘快捷键？Java是否提供了这方面的功能？如果没有，任何人都可以提出实现它的最佳方法。如果没有办法做到这一点，我计划使用java提供的2DGraphics，并在我的applet窗口上绘制字符
浏览 1提问于2014-03-02得票数 2
2回答
如何重新定义计划/球拍基本形式？
、、、、
球拍已经内置了基本形式的2臂if，但是它没有else这个词，所以我想把else这个词加到里面。
此代码适用于：
(require syntax/parse/define)
(define-syntax-rule (myif Cond Form1 else Form2)
(if Cond Form1 Form2)
)
(myif #t (displayln 1) else (displayln 2))
但是，不希望使用myif作为关键字，将其更改为if会引发错误：
if: use does not match pattern: (if Cond Form1 else Form2)
in:
浏览 2提问于2020-02-12得票数 1
回答已采纳
除了Lisp方言之外，还有其他基于S表达式或波兰语前缀表示法的语言吗？
它不必是函数式编程语言，也不必以某种方式与Lisp相关。
当我说Lisp方言时，我指的是Arc、AutoLISP、Clojure、Common Lisp、Emacs Lisp、EuLisp、Franz Lisp、Interlisp、ISLISP、LeLisp、Maclisp、MDL、Newlisp、NIL、Picolisp、可移植标准Lisp、球拍、方案、SKILL、Spice Lisp、T、XLISP、Zetalisp (来自页面)。
有许多完全不同的语言使用类似C的语法或类似Python的语法，但是对于S表达式或波兰语
浏览 28提问于2013-06-17得票数 0
1回答
球拍中的管道
、、
是否有可能有管道在球拍与输出一个功能去下一个。例如，是否可以重写以下代码：
(define (safestr sentstr)
(list->string
(remove*
(list #\| #\; #\: #\/ #\\ #\' #\")
(string->list sentstr) )))
(define (safestr sentstr)
sentstr |
(string->list .) |
(remove* (list #\: #\;) .) |
(list->string .
浏览 2提问于2016-08-12得票数 3
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
实时音视频活动推荐
腾讯云开发者
