mirror of
https://github.com/carbon-language/carbon-lang.git
synced 2026-09-24 22:02:23 +01:00
29 lines
742 B
Plaintext
29 lines
742 B
Plaintext
// 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 --trace %s 2>&1 | \
|
|
// RUN: FileCheck --match-full-lines --allow-unused-prefixes %s
|
|
// AUTOUPDATE: executable_semantics %s
|
|
// CHECK: result: -2
|
|
|
|
package ExecutableSemanticsTest api;
|
|
|
|
fn apply[T:! Type, U:! Type](f: fnty (T) -> U, x: T) -> U {
|
|
return f(x);
|
|
}
|
|
|
|
fn positive(x: Bool) -> i32 {
|
|
if (x) {
|
|
return 2;
|
|
} else {
|
|
return -2;
|
|
}
|
|
}
|
|
|
|
fn main() -> i32 {
|
|
return apply(positive, false);
|
|
}
|