个人中心
文章发布
退出
作者热门文章
- android - 多次调用 OnPrimaryClipChangedListener
- android - 无法更新 RecyclerView 中的 TextView 字段
- android.database.CursorIndexOutOfBoundsException : Index 0 requested, 光标大小为 0
- android - 使用 AppCompat 时，我们是否需要明确指定其 UI 组件(Spinner、EditText)颜色
24
4
我几天前才发现 Racket，我正试图通过编写一个小脚本来更熟悉它，该脚本使用 #lang slideshow 生成图像来表示源代码。
我知道在函数范式中编程时，使用 let 创建几乎所有变量是一种很好的做法，但我发现它引入了太多级别的嵌套，而且 Racket 的 let 有一个过于复杂的 API这需要多余的括号。我确信这是为了消除以更强大的方式使用 let 时的歧义，但就我的目的而言，这只是一个烦恼。因此，我正在使用 define 创建所有变量，并在需要时使用 begin 编写 block (例如在 if 的主体中) > 声明)。
问题是我一再收到似乎非常神秘的错误。我确信我只是犯了一些愚蠢的初学者错误，因为我是这门语言的新手，但我似乎真的找不到提示的根源。
这是有问题的代码:
(define sub-code (foldr ht-append (rectangle 0 0) (map internal-style (rest code))))
尽管我们定义的sub-code 似乎无关紧要。如果我将它替换为
(define sub-code '())
我收到同样的错误。 DrRacket 表示 define 正在表达式上下文中使用。我理解这个错误通常意味着什么 - IE，当你编写像 (print (define x 10)) 这样的代码时它会引发，但我在这里看不到什么会触发它。
如果有帮助，这个 define 位于 begin block 的开头，在 if 语句中
(if (list? code)
(begin
(define sub-code '())
; a few more define statements and finally an expression ))
DrRacket 正在打印的具体错误信息是
define: not allowed in an expression context in: (define sub-code (quote ()))
我想也许 define 不允许出现在 begin block 中，但我检查了 the docs begin 的示例之一是
(begin
(define x 10)
x)
所以我真的不知道该怎么办。提前致谢!
最佳答案
在“正文”上下文中允许定义，例如 lambda和 let除其他外。 if 的后续和替代条款不是 body 环境；它们是表达式上下文，因此不允许定义。
begin很特别- begin在正文上下文中允许定义，但是 begin在表达式上下文中禁止定义。你的情况属于后者。
例如:
(define (foo . args) #| body context #|)
(define foo (lambda args #| body context |#))
(define (foo . args)
(let (...)
#| body context |#))
需要表达式的语法关键字:if, cond, case, and, or, when, unless, do, begin .检查任何 Scheme 报告中的正式语法 (r{4,5,6,7}rs)；寻找 <body> , <sequence> , <command> , 和 <expression> .
此外，如果您需要在表达式中使用正文上下文，只需将 let 包裹起来句法形式，例如:
(if test
(let ()
(define foo 'foo)
(list foo foo))
alternate)
关于functional-programming - 在 Racket 中定义错误，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/16221336/
24
4
0
我已经使用 vue-cli 两个星期了，直到今天一切正常。我在本地建立这个项目。 https://drive.google.com/open?id=0BwGw1zyyKjW7S3RYWXRaX24tQ
您好，我正在尝试使用 python 库 pytesseract 从图像中提取文本。请找到代码: from PIL import Image from pytesseract import image_
我的错误 /usr/bin/ld: errno: TLS definition in /lib/libc.so.6 section .tbss mismatches non-TLS reference
我已经训练了一个模型，我正在尝试使用 predict函数但它返回以下错误。 Error in contrasts<-(*tmp*, value = contr.funs[1 + isOF[nn]])
根据Microsoft DataConnectors的信息我想通过 this ODBC driver 创建一个从 PowerBi 到 PostgreSQL 的连接器使用直接查询。我重用了 Micros
我已经为 SoundManagement 创建了一个包，其中有一个扩展 MediaPlayer 的类。我希望全局控制这个变量。这是我的代码: package soundmanagement; impo
我在Heroku上部署了一个应用程序。我正在使用免费服务。 我经常收到以下错误消息。 PG::Error: ERROR: out of memory 如果刷新浏览器，就可以了。但是随后，它又随机发生
我正在运行 LAMP 服务器，这个 .htaccess 给我一个 500 错误。其作用是过滤关键字并重定向到相应的域名。 Options +FollowSymLinks RewriteEngine
我有两个驱动器 A 和 B。使用 python 脚本，我在“A”驱动器中创建一些文件，并运行 powerscript，该脚本以 1 秒的间隔将驱动器 A 中的所有文件复制到驱动器 B。 我在 powe
下面的函数一直返回这个错误信息。我认为可能是 double_precision 字段类型导致了这种情况，我尝试使用 CAST，但要么不是这样，要么我没有做对...帮助？ 这是错误: ERROR: i
这个问题已经有答案了: Syntax error due to using a reserved word as a table or column name in MySQL (1 个回答) 已关闭
我的数据库有这个小问题。 我创建了一个表“articoli”，其中包含商品的品牌、型号和价格。 每篇文章都由一个 id (ID_ARTICOLO)` 定义，它是一个自动递增字段。 好吧，现在当我尝试插
我是新来的。我目前正在 DeVry 在线学习中级 C++ 编程。我们正在使用 C++ Primer Plus 这本书，到目前为止我一直做得很好。我的老师最近向我们扔了一个曲线球。我目前的任务是这样的:
这个问题在这里已经有了答案: What is an undefined reference/unresolved external symbol error and how do I fix it?
我的网站中有一段代码有问题；此错误仅发生在 Internet Explorer 7 中。 我没有在这里发布我所有的 HTML/CSS 标记，而是发布了网站的一个版本 here . 如您所见，我在列中有
如果尝试在 USB 设备上构建 node.js 应用程序时在我的树莓派上使用 npm 时遇到一些问题。 package.json 看起来像这样: { "name" : "node-todo",
在 Python 中，您有 None单例，在某些情况下表现得很奇怪: >>> a = None >>> type(a) >>> isinstance(a,None) Traceback (most
这是我的 build.gradle (Module:app) 文件: apply plugin: 'com.android.application' android { compileSdkV
我是 android 的新手，我的项目刚才编译和运行正常，但在我尝试实现抽屉导航后，它给了我这个错误 FAILURE: Build failed with an exception. What wen
谁能解释一下？我想我正在做一些非常愚蠢的事情，并且急切地等待着启蒙。 我得到这个输出: phpversion() == 7.2.25-1+0~20191128.32+debian8~1.gbp108
我是一名优秀的程序员,十分优秀！