변수이 작동하지 않는 PureScript

Question

를 찾을 수 없습니다

itAsync "subscribeEventedOn should receive any attached data" $ \done -> do  
    w <- getWindow 
    subscribeEventedOn "foo" (\event -> do 
    fprint event 
    expect (unwrapDetail event) `toDeepEqual` d' 
    itIs done 
) w 
    emitOn sampleEvent w 
    expect true `toEqual` true 

알 수없는 값을

'W'하지만이 작업을 수행합니다

w <- getWindow 
itAsync "subscribeEventedOn should receive any attached data" $ \done -> do  
    subscribeEventedOn "foo" (\event -> do 
    fprint event 
    expect (unwrapDetail event) `toDeepEqual` d' 
    itIs done 
) w 
    emitOn sampleEvent w 
    expect true `toEqual` true 

이유는 무엇입니까? 이것은 나에게 이해가되지 않는다. (Btw 내 단위 테스트에서 do 블록을 중첩했습니다.)

Answer 1

예제 코드에서 이름의 유형을 추측하여이를 재현 할 수 있었고 PureScript 렉서의 특성 때문인 것으로 보입니다. 위의 줄까지 닫기 괄호를 이동하여 문제를 해결할 수 있습니다.

itAsync "subscribeEventedOn should receive any attached data" $ \done -> do  
    w <- getWindow 
    subscribeEventedOn "foo" (\event -> do 
    fprint event 
    expect (unwrapDetail event) `toDeepEqual` d' 
    itIs done) w 
    emitOn sampleEvent w 
    expect true `toEqual` true