Idris2/tests/node/node026/Fix1795.idr

import Data.String.Parser

main : IO ()
main = do
    let res = parse (satisfy isDigit) "100"
    printLn res
Add `break` in each case alt in js backend (#1796) * Add `break` in each case alt in js backend Fixes #1795 * Remove some uneeded `break`s * linter * Follow @stefan-hoeck 's advice This is neater Note: I renamed breakAfterAssignment because it's too much work to type * [ test ] Test for #1795 * cleanup: remove unneeded vcat 2021-07-30 09:16:23 +03:00			`import Data.String.Parser`

			`main : IO ()`
			`main = do`
			`let res = parse (satisfy isDigit) "100"`
			`printLn res`