Idris2/tests/idris2/basic028/input

:l "Do.idr"
mPatBind (Just (S Z)) (Just (S (S Z)))
mPatBind (Just (S Z)) Nothing
mLetBind (Just (S Z)) (Just (S (S Z)))
mLetBind (Just (S Z)) Nothing
:q
[ fix ] All the REPL commands should be in CommandTable (#1036) Co-authored-by: Ohad Kammar <ohad.kammar@ed.ac.uk> 2021-02-08 20:25:49 +03:00			`:l "Do.idr"`
Add test script They don't all pass yet, for minor reasons. Coming shortly... Unfortunately the startup overhead for chez is really noticeable here! 2020-05-19 20:25:18 +03:00			`mPatBind (Just (S Z)) (Just (S (S Z)))`
			`mPatBind (Just (S Z)) Nothing`
			`mLetBind (Just (S Z)) (Just (S (S Z)))`
			`mLetBind (Just (S Z)) Nothing`
			`:q`