tuple_map.carbon 705 B

12345678910111213141516171819202122
  1. // Part of the Carbon Language project, under the Apache License v2.0 with LLVM
  2. // Exceptions. See /LICENSE for license information.
  3. // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
  4. //
  5. // RUN: %{explorer} %s 2>&1 | \
  6. // RUN: %{FileCheck} --match-full-lines --allow-unused-prefixes=false %s
  7. // RUN: %{explorer} --parser_debug --trace_file=- %s 2>&1 | \
  8. // RUN: %{FileCheck} --match-full-lines --allow-unused-prefixes %s
  9. // AUTOUPDATE: %{explorer} %s
  10. // CHECK: result: 1
  11. package ExplorerTest api;
  12. fn map[T:! Type](f: __Fn (T) -> T, tuple: (T, T)) -> (T, T) {
  13. return (f(tuple[0]), f(tuple[1]));
  14. }
  15. fn inc(x: i32) -> i32 { return x + 1; }
  16. fn Main() -> i32 {
  17. return map(inc, (0, 2))[0];
  18. }