git.iko.soy/rowtype-yoga/purescript-backend-optimizer
on main help sign in
rowtype-yoga/purescript-backend-optimizer/backend-es/test-snapshots/src/Snapshot.UnpackArray01.purs
15 lines 345 B history raw
1module Snapshot.UnpackArray01 where
3import Data.Array as Array
4import Partial.Unsafe (unsafePartial)
6test :: (String -> String -> String) -> ({} -> String) -> String
7test fn1 fn2 = unsafePartial do
8 let
9 array =
10 [ "foo"
11 , "bar"
12 , "baz"
13 , fn2 {}
14 ]
15 fn1 (Array.unsafeIndex array 0) (Array.unsafeIndex array 2)