【发布时间】:2013-08-26 17:53:43
【问题描述】:
考虑以下工作,Alex 源文件:
{
module Main (main) where
}
%wrapper "basic"
tokens :-
$white ;
. { rule "!"}
{
type Token = String
rule tok = \s -> tok
main = do
s <- getContents
mapM_ print (alexScanTokens s)
}
我希望我的帮助代码更靠近文件顶部,在所有规则之前。我试过这样做:
{
module Main (main) where
}
%wrapper "basic"
{
type Token = String
rule tok = \s -> tok
}
tokens :-
$white ;
. { rule "!"}
{
main = do
s <- getContents
mapM_ print (alexScanTokens s)
}
但出现以下错误:
test.x:11:2: parse error
(第 11 行是我的帮助代码后的右大括号)
有没有办法让我的帮助代码更靠近文件顶部?
我还尝试将帮助程序代码与“module Main”声明一起放在第一个块中,但这不起作用,因为“%wrapper”位会生成一些需要作为第一件事出现的导入语句生成的文件。
【问题讨论】: