carbon-lang/executable_semantics/testdata/basic_syntax/star.carbon

// Part of the Carbon Language project, under the Apache License v2.0 with LLVM
// Exceptions. See /LICENSE for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
// RUN: %{executable_semantics} %s 2>&1 | \
// RUN:   %{FileCheck} --match-full-lines --allow-unused-prefixes=false %s
// RUN: %{executable_semantics} --parser_debug --trace_file=- %s 2>&1 | \
// RUN:   %{FileCheck} --match-full-lines --allow-unused-prefixes %s
// AUTOUPDATE: %{executable_semantics} %s
// CHECK: result: 0

package ExecutableSemanticsTest api;

// Never actually called, so this only tests typechecking and semantic analysis.
fn F(n: i32, p: i32*, q: i32***) -> i32* {
  var a: i32 = n * *p;
  var b: i32 = a*n;
  *p = b*(*p);
  **q = p;
  return **q;
}

fn Main() -> i32 {
  return 0;
}