Files
carbon-lang/executable_semantics/interpreter/exec_program.cpp
T
Jon Meow b87747306f Add the ability to pipe trace output to a file. (#1183)
Breaks `--trace` into two flags:

- `--parser_debug`, which sets the parser debug level (which I haven't dug into piping with `--trace`, but seemed likely to be troublesome)
- `--trace_file`, which now the type checker and interpreter will use for trace information (note compile errors should use a different channel)

Most of the file edits are just mechanical testdata flag updates: `sed -i 's/--trace/--parser_debug --trace_file=-/' testdata/**/*.carbon`

To explain the output paths:

- parse/compile errors: stderr
- print() calls: stdout
- parser tracing: `--parser_debug` option, stdout (formerly stdout if `--trace`)
- type check/compile tracing: `--trace_file=<file>`, giving `-` uses stdout (formerly stdout if `--trace`)
- return code of executed Carbon code: `--trace_file` if set, stdout if not (formerly stdout always)
2022-04-14 11:20:56 -07:00

59 lines
2.1 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/interpreter/exec_program.h"
#include <variant>
#include "common/check.h"
#include "common/ostream.h"
#include "executable_semantics/common/arena.h"
#include "executable_semantics/interpreter/interpreter.h"
#include "executable_semantics/interpreter/resolve_control_flow.h"
#include "executable_semantics/interpreter/resolve_names.h"
#include "executable_semantics/interpreter/type_checker.h"
#include "llvm/Support/Error.h"
namespace Carbon {
auto ExecProgram(Nonnull<Arena*> arena, AST ast,
std::optional<Nonnull<llvm::raw_ostream*>> trace_stream)
-> ErrorOr<int> {
if (trace_stream) {
**trace_stream << "********** source program **********\n";
for (const auto decl : ast.declarations) {
**trace_stream << *decl;
}
}
SourceLocation source_loc("<Main()>", 0);
ast.main_call = arena->New<CallExpression>(
source_loc, arena->New<IdentifierExpression>(source_loc, "Main"),
arena->New<TupleLiteral>(source_loc));
// Although name resolution is currently done once, generic programming
// (particularly templates) may require more passes.
if (trace_stream) {
**trace_stream << "********** resolving names **********\n";
}
RETURN_IF_ERROR(ResolveNames(ast));
if (trace_stream) {
**trace_stream << "********** resolving control flow **********\n";
}
RETURN_IF_ERROR(ResolveControlFlow(ast));
if (trace_stream) {
**trace_stream << "********** type checking **********\n";
}
RETURN_IF_ERROR(TypeChecker(arena, trace_stream).TypeCheck(ast));
if (trace_stream) {
**trace_stream << "\n";
**trace_stream << "********** type checking complete **********\n";
for (const auto decl : ast.declarations) {
**trace_stream << *decl;
}
**trace_stream << "********** starting execution **********\n";
}
return InterpProgram(ast, arena, trace_stream);
}
} // namespace Carbon