我似乎无法找出方案

Question

我试图找到新的行字符的文件，并保持它的轨道与反到目前为止，我已经

SRCF换行符匹配字符是源文件

(if(equal? (peek-char srcf) (#\newline)) 

    (begin 

    (read-char srcf) 
    (Lines srcf (+ Line 1)) 
) 

    (begin 

    (read-char srcf) 
    (Lines srcf Line)      
) 
) 

但是我知道我的平等吗？ （偷看）（＃\换行符）不工作是否有我可以用于换行符的字符？

Answer 1

确切的字符取决于文件中使用的换行符，它可能是\n（这是Unix/Mac中的文件的标准）或\r\n（通常在Windows中可以找到）。对于初学者来说，尝试对#\newline比较，看看它是否适合你：

(equal? (peek-char srcf) #\newline) 

...注意#\newline是不用括号包围了！