评估球拍反应变量/ xexpr

我想在球拍中制作一个简单的书签网页应用程序。评估球拍反应变量/ xexpr

它的意思是接收一个URL作为CGI参数，现在，我只是试图确认我收到它反映回来。

(define (start request) 
    (response/xexpr 
    (let* ([bindings (request-bindings request)] 
      [url (if (exists-binding? 'url bindings) 
        (extract-binding/single 'url bindings) 
        "NO URL")]) 
    `(html 
     (head (title "TITLE")) 
     (body (h2 "TITLE")    
      (p "URL = " url))  
      ))))

然而，也看不到什么，我希望看到..这是一个包含

URL = http://google.com

我看到

URL = &url;

这表明URL被引用的页面字面上在xexpr中（作为实体对待），而不是作为变量进行评估。

那么我做错了什么？我如何获得网址评估？

来源

2016-07-28 interstar

您需要使用quasiquote和unquote注入值成引述李毅华，更往往被视为他们的读者缩写等价，分别为`和,。当您使用unquote/,的quasiquote/`里面，它会计算表达式，并将其插入到周围的报价：

> (define url "http://google.com") 
> `(p "URL = " ,url) 
(p "URL = " "http://google.com")

你应该把,在url前面的模板来解除引用它。

有关报价和准分类的更详细说明，请参阅Appendix A of this answer。

来源

2016-07-28 21:16:52

好吧，我错过了，我认为在表达开始时的反作用力足以让变量评估为这样。谢谢。 – interstar

使用,url：

`(html 
     (head (title "TITLE")) 
     (body (h2 "TITLE")    
      (p "URL = " ,url))  
      ))))

查找文档中unquote：http://docs.racket-lang.org/reference/quasiquote.html?q=unquote#%28form.%28%28quote.~23~25kernel%29._unquote%29%29

来源

2016-07-28 21:16:32 soegaard

评估球拍反应变量/ xexpr

回答

相关问题