blob: 56ee90eba4529d0a779336e6b3aa2a93992b2290 [file] [log] [blame] [edit]
--
-- Copyright 2016, NICTA
--
-- This software may be distributed and modified according to the terms of
-- the GNU General Public License version 2. Note that NO WARRANTY is provided.
-- See "LICENSE_GPLv2.txt" for details.
--
-- @TAG(NICTA_GPL)
--
foo: (U16) -> (U32, U32)
foo v = (v, v)
bar: () -> ()
bar _ =
let (v, v') = foo (32)
in ()