purs docs breaks when using Applicative do notation #3414

I'm not sure why but here is a minimal test case:

module Main where
  
map f x = f x

test = 
  ado x <- 1
   in x

purs compile Main.purs works fine (with warnings) but purs docs Main.purs fails.