Revision 6f5dc6bec58bf0a6305113166bfdcfeb80af3c5f authored by Steven Johnson on 07 December 2020, 19:27:17 UTC, committed by Steven Johnson on 07 December 2020, 19:27:17 UTC
Currently, it can contain garbage after parsing
1 parent 4f554a7
Simplify_Stmts.cpp
#include "Simplify_Internal.h"
#include "IRMutator.h"
#include "Substitute.h"
namespace Halide {
namespace Internal {
using std::pair;
using std::string;
using std::vector;
Stmt Simplify::visit(const IfThenElse *op) {
Expr condition = mutate(op->condition, nullptr);
// If (likely(true)) ...
const Call *call = condition.as<Call>();
Expr unwrapped_condition = condition;
if (call &&
(call->is_intrinsic(Call::likely) ||
call->is_intrinsic(Call::likely_if_innermost))) {
unwrapped_condition = call->args[0];
}
// If (true) ...
if (is_const_one(unwrapped_condition)) {
return mutate(op->then_case);
}
// If (false) ...
if (is_const_zero(unwrapped_condition)) {
if (op->else_case.defined()) {
return mutate(op->else_case);
} else {
return Evaluate::make(0);
}
}
Stmt then_case, else_case;
{
auto f = scoped_truth(unwrapped_condition);
// Also substitute the entire condition
then_case = substitute(op->condition, const_true(condition.type().lanes()), op->then_case);
then_case = mutate(then_case);
}
{
auto f = scoped_falsehood(unwrapped_condition);
else_case = substitute(op->condition, const_false(condition.type().lanes()), op->else_case);
else_case = mutate(else_case);
}
// If both sides are no-ops, bail out.
if (is_no_op(then_case) && is_no_op(else_case)) {
return then_case;
}
// Pull out common nodes
if (equal(then_case, else_case)) {
return then_case;
}
const Acquire *then_acquire = then_case.as<Acquire>();
const Acquire *else_acquire = else_case.as<Acquire>();
const ProducerConsumer *then_pc = then_case.as<ProducerConsumer>();
const ProducerConsumer *else_pc = else_case.as<ProducerConsumer>();
const Block *then_block = then_case.as<Block>();
const Block *else_block = else_case.as<Block>();
const For *then_for = then_case.as<For>();
if (then_acquire &&
else_acquire &&
equal(then_acquire->semaphore, else_acquire->semaphore) &&
equal(then_acquire->count, else_acquire->count)) {
return Acquire::make(then_acquire->semaphore, then_acquire->count,
mutate(IfThenElse::make(condition, then_acquire->body, else_acquire->body)));
} else if (then_pc &&
else_pc &&
then_pc->name == else_pc->name &&
then_pc->is_producer == else_pc->is_producer) {
return ProducerConsumer::make(then_pc->name, then_pc->is_producer,
mutate(IfThenElse::make(condition, then_pc->body, else_pc->body)));
} else if (then_block &&
else_block &&
equal(then_block->first, else_block->first)) {
return Block::make(then_block->first,
mutate(IfThenElse::make(condition, then_block->rest, else_block->rest)));
} else if (then_block &&
else_block &&
equal(then_block->rest, else_block->rest)) {
return Block::make(mutate(IfThenElse::make(condition, then_block->first, else_block->first)),
then_block->rest);
} else if (then_block && equal(then_block->first, else_case)) {
return Block::make(else_case,
mutate(IfThenElse::make(condition, then_block->rest)));
} else if (then_block && equal(then_block->rest, else_case)) {
return Block::make(mutate(IfThenElse::make(condition, then_block->first)),
else_case);
} else if (else_block && equal(then_case, else_block->first)) {
return Block::make(then_case,
mutate(IfThenElse::make(condition, Evaluate::make(0), else_block->rest)));
} else if (else_block && equal(then_case, else_block->rest)) {
return Block::make(mutate(IfThenElse::make(condition, Evaluate::make(0), else_block->first)),
then_case);
} else if (then_for &&
!else_case.defined() &&
equal(unwrapped_condition, 0 < then_for->extent)) {
// This guard is redundant
return then_case;
} else if (condition.same_as(op->condition) &&
then_case.same_as(op->then_case) &&
else_case.same_as(op->else_case)) {
return op;
} else {
return IfThenElse::make(condition, then_case, else_case);
}
}
Stmt Simplify::visit(const AssertStmt *op) {
Expr cond = mutate(op->condition, nullptr);
// The message is only evaluated when the condition is false
Expr message;
{
auto f = scoped_falsehood(cond);
message = mutate(op->message, nullptr);
}
if (is_const_zero(cond)) {
// Usually, assert(const-false) should generate a warning;
// in at least one case (specialize_fail()), we want to suppress
// the warning, because the assertion is generated internally
// by Halide and is expected to always fail.
const Call *call = message.as<Call>();
const bool const_false_conditions_expected =
call && call->name == "halide_error_specialize_fail";
if (!const_false_conditions_expected) {
user_warning << "This pipeline is guaranteed to fail an assertion at runtime: \n"
<< message << "\n";
}
} else if (is_const_one(cond)) {
return Evaluate::make(0);
}
if (cond.same_as(op->condition) && message.same_as(op->message)) {
return op;
} else {
return AssertStmt::make(cond, message);
}
}
Stmt Simplify::visit(const For *op) {
ExprInfo min_bounds, extent_bounds;
Expr new_min = mutate(op->min, &min_bounds);
Expr new_extent = mutate(op->extent, &extent_bounds);
ScopedValue<bool> old_in_vector_loop(in_vector_loop,
(in_vector_loop ||
op->for_type == ForType::Vectorized));
bool bounds_tracked = false;
if (min_bounds.min_defined || (min_bounds.max_defined && extent_bounds.max_defined)) {
min_bounds.max += extent_bounds.max - 1;
min_bounds.max_defined &= extent_bounds.max_defined;
min_bounds.alignment = ModulusRemainder{};
bounds_tracked = true;
bounds_and_alignment_info.push(op->name, min_bounds);
}
Stmt new_body = mutate(op->body);
if (bounds_tracked) {
bounds_and_alignment_info.pop(op->name);
}
if (is_no_op(new_body)) {
return new_body;
} else if (extent_bounds.max_defined &&
extent_bounds.max <= 0) {
return Evaluate::make(0);
} else if (is_const_one(new_extent) &&
op->device_api == DeviceAPI::None) {
Stmt s = LetStmt::make(op->name, new_min, new_body);
return mutate(s);
} else if (extent_bounds.max_defined &&
extent_bounds.max == 1 &&
!in_vector_loop &&
op->device_api == DeviceAPI::None) {
// If we're inside a vector loop we don't want to rewrite a
// for loop of extent at most one into an if, because the
// vectorization pass deals with those differently to an
// if. If the extent depends on the vectorized variable, the
// for loop gets an all-true vectorized case, but an if
// statement just gets scalarized.
Stmt s = LetStmt::make(op->name, new_min, new_body);
return mutate(IfThenElse::make(0 < new_extent, s));
} else if (op->min.same_as(new_min) &&
op->extent.same_as(new_extent) &&
op->body.same_as(new_body)) {
return op;
} else {
return For::make(op->name, new_min, new_extent, op->for_type, op->device_api, new_body);
}
}
Stmt Simplify::visit(const Provide *op) {
found_buffer_reference(op->name, op->args.size());
vector<Expr> new_args(op->args.size());
vector<Expr> new_values(op->values.size());
bool changed = false;
// Mutate the args
for (size_t i = 0; i < op->args.size(); i++) {
const Expr &old_arg = op->args[i];
Expr new_arg = mutate(old_arg, nullptr);
if (!new_arg.same_as(old_arg)) {
changed = true;
}
new_args[i] = new_arg;
}
for (size_t i = 0; i < op->values.size(); i++) {
const Expr &old_value = op->values[i];
Expr new_value = mutate(old_value, nullptr);
if (!new_value.same_as(old_value)) {
changed = true;
}
new_values[i] = new_value;
}
if (!changed) {
return op;
} else {
return Provide::make(op->name, new_values, new_args);
}
}
Stmt Simplify::visit(const Store *op) {
found_buffer_reference(op->name);
Expr predicate = mutate(op->predicate, nullptr);
Expr value = mutate(op->value, nullptr);
ExprInfo index_info;
Expr index = mutate(op->index, &index_info);
ExprInfo base_info;
if (const Ramp *r = index.as<Ramp>()) {
mutate(r->base, &base_info);
}
base_info.alignment = ModulusRemainder::intersect(base_info.alignment, index_info.alignment);
const Load *load = value.as<Load>();
const Broadcast *scalar_pred = predicate.as<Broadcast>();
ModulusRemainder align = ModulusRemainder::intersect(op->alignment, base_info.alignment);
if (is_const_zero(predicate)) {
// Predicate is always false
return Evaluate::make(0);
} else if (scalar_pred && !is_const_one(scalar_pred->value)) {
return IfThenElse::make(scalar_pred->value,
Store::make(op->name, value, index, op->param, const_true(value.type().lanes()), align));
} else if (is_undef(value) || (load && load->name == op->name && equal(load->index, index))) {
// foo[x] = foo[x] or foo[x] = undef is a no-op
return Evaluate::make(0);
} else if (predicate.same_as(op->predicate) && value.same_as(op->value) && index.same_as(op->index) && align == op->alignment) {
return op;
} else {
return Store::make(op->name, value, index, op->param, predicate, align);
}
}
Stmt Simplify::visit(const Allocate *op) {
std::vector<Expr> new_extents;
bool all_extents_unmodified = true;
for (size_t i = 0; i < op->extents.size(); i++) {
new_extents.push_back(mutate(op->extents[i], nullptr));
all_extents_unmodified &= new_extents[i].same_as(op->extents[i]);
}
Stmt body = mutate(op->body);
Expr condition = mutate(op->condition, nullptr);
Expr new_expr;
if (op->new_expr.defined()) {
new_expr = mutate(op->new_expr, nullptr);
}
const IfThenElse *body_if = body.as<IfThenElse>();
if (body_if &&
op->condition.defined() &&
equal(op->condition, body_if->condition)) {
// We can move the allocation into the if body case. The
// else case must not use it.
Stmt stmt = Allocate::make(op->name, op->type, op->memory_type,
new_extents, condition, body_if->then_case,
new_expr, op->free_function);
return IfThenElse::make(body_if->condition, stmt, body_if->else_case);
} else if (all_extents_unmodified &&
body.same_as(op->body) &&
condition.same_as(op->condition) &&
new_expr.same_as(op->new_expr)) {
return op;
} else {
return Allocate::make(op->name, op->type, op->memory_type,
new_extents, condition, body,
new_expr, op->free_function);
}
}
Stmt Simplify::visit(const Evaluate *op) {
Expr value = mutate(op->value, nullptr);
// Rewrite Lets inside an evaluate as LetStmts outside the Evaluate.
vector<pair<string, Expr>> lets;
while (const Let *let = value.as<Let>()) {
lets.emplace_back(let->name, let->value);
value = let->body;
}
if (value.same_as(op->value)) {
internal_assert(lets.empty());
return op;
} else {
// Rewrap the lets outside the evaluate node
Stmt stmt = Evaluate::make(value);
for (size_t i = lets.size(); i > 0; i--) {
stmt = LetStmt::make(lets[i - 1].first, lets[i - 1].second, stmt);
}
return stmt;
}
}
Stmt Simplify::visit(const ProducerConsumer *op) {
Stmt body = mutate(op->body);
if (is_no_op(body)) {
return Evaluate::make(0);
} else if (body.same_as(op->body)) {
return op;
} else {
return ProducerConsumer::make(op->name, op->is_producer, body);
}
}
Stmt Simplify::visit(const Block *op) {
Stmt first = mutate(op->first);
Stmt rest = op->rest;
if (const AssertStmt *first_assert = first.as<AssertStmt>()) {
// Handle an entire sequence of asserts here to avoid a deeply
// nested stack. We won't be popping any knowledge until
// after the end of this chain of asserts, so we can use a
// single ScopedFact and progressively add knowledge to it.
ScopedFact knowledge(this);
vector<Stmt> result;
result.push_back(first);
knowledge.learn_true(first_assert->condition);
// Loop invariants: 'first' has already been mutated and is in
// the result list. 'first' was an AssertStmt before it was
// mutated, and its condition has been captured in
// 'knowledge'. 'rest' has not been mutated and is not in the
// result list.
const Block *rest_block;
while ((rest_block = rest.as<Block>()) &&
(first_assert = rest_block->first.as<AssertStmt>())) {
first = mutate(first_assert);
rest = rest_block->rest;
result.push_back(first);
if ((first_assert = first.as<AssertStmt>())) {
// If it didn't fold away to trivially true or false,
// learn the condition.
knowledge.learn_true(first_assert->condition);
}
}
result.push_back(mutate(rest));
return Block::make(result);
} else {
rest = mutate(op->rest);
}
// Check if both halves start with a let statement.
const LetStmt *let_first = first.as<LetStmt>();
const LetStmt *let_rest = rest.as<LetStmt>();
const Block *block_rest = rest.as<Block>();
const IfThenElse *if_first = first.as<IfThenElse>();
const IfThenElse *if_next =
rest.as<IfThenElse>() ? rest.as<IfThenElse>() : (block_rest ? block_rest->first.as<IfThenElse>() : nullptr);
Stmt if_rest = block_rest ? block_rest->rest : Stmt();
if (is_no_op(first) &&
is_no_op(rest)) {
return Evaluate::make(0);
} else if (is_no_op(first)) {
return rest;
} else if (is_no_op(rest)) {
return first;
} else if (let_first &&
let_rest &&
equal(let_first->value, let_rest->value) &&
is_pure(let_first->value)) {
// Do both first and rest start with the same let statement (occurs when unrolling).
Stmt new_block = mutate(Block::make(let_first->body, let_rest->body));
// We need to make a new name since we're pulling it out to a
// different scope.
string var_name = unique_name('t');
Expr new_var = Variable::make(let_first->value.type(), var_name);
new_block = substitute(let_first->name, new_var, new_block);
new_block = substitute(let_rest->name, new_var, new_block);
return LetStmt::make(var_name, let_first->value, new_block);
} else if (if_first &&
if_next &&
equal(if_first->condition, if_next->condition) &&
is_pure(if_first->condition)) {
// Two ifs with matching conditions
Stmt then_case = mutate(Block::make(if_first->then_case, if_next->then_case));
Stmt else_case;
if (if_first->else_case.defined() && if_next->else_case.defined()) {
else_case = mutate(Block::make(if_first->else_case, if_next->else_case));
} else if (if_first->else_case.defined()) {
// We already simplified the body of the ifs.
else_case = if_first->else_case;
} else {
else_case = if_next->else_case;
}
Stmt result = IfThenElse::make(if_first->condition, then_case, else_case);
if (if_rest.defined()) {
result = Block::make(result, if_rest);
}
return result;
} else if (if_first &&
if_next &&
!if_next->else_case.defined() &&
is_pure(if_first->condition) &&
is_pure(if_next->condition) &&
is_const_one(mutate((if_first->condition && if_next->condition) == if_next->condition, nullptr))) {
// Two ifs where the second condition is tighter than
// the first condition. The second if can be nested
// inside the first one, because if it's true the
// first one must also be true.
Stmt then_case = mutate(Block::make(if_first->then_case, if_next));
Stmt else_case = mutate(if_first->else_case);
Stmt result = IfThenElse::make(if_first->condition, then_case, else_case);
if (if_rest.defined()) {
result = Block::make(result, if_rest);
}
return result;
} else if (op->first.same_as(first) &&
op->rest.same_as(rest)) {
return op;
} else {
return Block::make(first, rest);
}
}
Stmt Simplify::visit(const Realize *op) {
Region new_bounds;
bool bounds_changed;
// Mutate the bounds
std::tie(new_bounds, bounds_changed) = mutate_region(this, op->bounds, nullptr);
Stmt body = mutate(op->body);
Expr condition = mutate(op->condition, nullptr);
if (!bounds_changed &&
body.same_as(op->body) &&
condition.same_as(op->condition)) {
return op;
}
return Realize::make(op->name, op->types, op->memory_type, new_bounds,
std::move(condition), std::move(body));
}
Stmt Simplify::visit(const Prefetch *op) {
Stmt body = mutate(op->body);
Expr condition = mutate(op->condition, nullptr);
if (is_const_zero(op->condition)) {
// Predicate is always false
return body;
}
Region new_bounds;
bool bounds_changed;
// Mutate the bounds
std::tie(new_bounds, bounds_changed) = mutate_region(this, op->bounds, nullptr);
if (!bounds_changed &&
body.same_as(op->body) &&
condition.same_as(op->condition)) {
return op;
} else {
return Prefetch::make(op->name, op->types, new_bounds, op->prefetch, std::move(condition), std::move(body));
}
}
Stmt Simplify::visit(const Free *op) {
return op;
}
Stmt Simplify::visit(const Acquire *op) {
Expr sema = mutate(op->semaphore, nullptr);
Expr count = mutate(op->count, nullptr);
Stmt body = mutate(op->body);
if (sema.same_as(op->semaphore) &&
body.same_as(op->body) &&
count.same_as(op->count)) {
return op;
} else {
return Acquire::make(std::move(sema), std::move(count), std::move(body));
}
}
Stmt Simplify::visit(const Fork *op) {
Stmt first = mutate(op->first);
Stmt rest = mutate(op->rest);
if (is_no_op(first)) {
return rest;
} else if (is_no_op(rest)) {
return first;
} else if (op->first.same_as(first) &&
op->rest.same_as(rest)) {
return op;
} else {
return Fork::make(first, rest);
}
}
Stmt Simplify::visit(const Atomic *op) {
Stmt body = mutate(op->body);
if (is_no_op(body)) {
return Evaluate::make(0);
} else if (body.same_as(op->body)) {
return op;
} else {
return Atomic::make(op->producer_name,
op->mutex_name,
std::move(body));
}
}
} // namespace Internal
} // namespace Halide
![swh spinner](/static/img/swh-spinner.gif)
Computing file changes ...