mirror of
https://github.com/carbon-language/carbon-lang.git
synced 2026-09-25 12:40:09 +01:00
Jon Meow
fd89bcb4aa
Sorry about the big change, this is hard to split. ParenContents is used by both, templated, and expects the same pointer type. While I could duplicate ParenContents with some ExpressionParenContents or PatternParenContents, that seems a little kludgy versus a single large change handling both. The worst of it is that Expression is already pretty sweeping, Pattern is really just incrementally adding. That said, I believe this includes a couple fixes I found with incorrect use of dyn_cast in typecheck.cpp (checked nullptr at the wrong step in 2 code locations). There's also a missing `*` in member.cpp this caught. I adjust passing of expressions for Return due to nullness (I felt adding another constructor was the best solution). I add a `.Release()` to BisonWrap due to things like `$3.first` needing some way to work through BIsonWrap. I felt this was better than `operator->`, but feel free to comment if you prefer the other path (`.Release()` conveniently lets me do pair unwrapping, so it felt a better solution). I do add a TODO to think about better Ptr-to-Ptr cast<> support too, though, as that doesn't work cleanly with LLVM's infra. But so far it seems to only come up in one spot, so I'm not prioritizing it.
70 lines
2.6 KiB
C++
70 lines
2.6 KiB
C++
// 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
|
|
|
|
#include "executable_semantics/syntax/syntax_helpers.h"
|
|
|
|
#include "common/check.h"
|
|
#include "common/ostream.h"
|
|
#include "executable_semantics/common/arena.h"
|
|
#include "executable_semantics/common/tracing_flag.h"
|
|
#include "executable_semantics/interpreter/interpreter.h"
|
|
#include "executable_semantics/interpreter/typecheck.h"
|
|
|
|
namespace Carbon {
|
|
|
|
// Adds builtins, currently only Print(). Note Print() is experimental, not
|
|
// standardized, but is made available for printing state in tests.
|
|
static void AddIntrinsics(std::list<Ptr<const Declaration>>* fs) {
|
|
SourceLocation loc("<intrinsic>", 0);
|
|
std::vector<TuplePattern::Field> print_fields = {TuplePattern::Field(
|
|
"0", global_arena->New<BindingPattern>(
|
|
loc, "format_str",
|
|
global_arena->New<ExpressionPattern>(
|
|
global_arena->New<StringTypeLiteral>(loc))))};
|
|
auto* print_return = global_arena->RawNew<Return>(
|
|
loc,
|
|
global_arena->New<IntrinsicExpression>(
|
|
IntrinsicExpression::IntrinsicKind::Print),
|
|
false);
|
|
auto print = global_arena->New<FunctionDeclaration>(
|
|
global_arena->New<FunctionDefinition>(
|
|
loc, "Print", std::vector<GenericBinding>(),
|
|
global_arena->New<TuplePattern>(loc, print_fields),
|
|
global_arena->New<ExpressionPattern>(
|
|
global_arena->New<TupleLiteral>(loc)),
|
|
/*is_omitted_return_type=*/false, print_return));
|
|
fs->insert(fs->begin(), print);
|
|
}
|
|
|
|
void ExecProgram(std::list<Ptr<const Declaration>> fs) {
|
|
AddIntrinsics(&fs);
|
|
if (tracing_output) {
|
|
llvm::outs() << "********** source program **********\n";
|
|
for (const auto decl : fs) {
|
|
llvm::outs() << *decl;
|
|
}
|
|
llvm::outs() << "********** type checking **********\n";
|
|
}
|
|
state = global_arena->RawNew<State>(); // Compile-time state.
|
|
TypeCheckContext p = TopLevel(fs);
|
|
TypeEnv top = p.types;
|
|
Env ct_top = p.values;
|
|
std::list<Ptr<const Declaration>> new_decls;
|
|
for (const auto decl : fs) {
|
|
new_decls.push_back(MakeTypeChecked(decl, top, ct_top));
|
|
}
|
|
if (tracing_output) {
|
|
llvm::outs() << "\n";
|
|
llvm::outs() << "********** type checking complete **********\n";
|
|
for (const auto decl : new_decls) {
|
|
llvm::outs() << *decl;
|
|
}
|
|
llvm::outs() << "********** starting execution **********\n";
|
|
}
|
|
int result = InterpProgram(new_decls);
|
|
llvm::outs() << "result: " << result << "\n";
|
|
}
|
|
|
|
} // namespace Carbon
|