| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319 |
- // 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 "toolchain/check/eval.h"
- #include <algorithm>
- #include <array>
- #include <optional>
- #include <utility>
- #include "common/raw_string_ostream.h"
- #include "llvm/Support/ConvertUTF.h"
- #include "toolchain/base/canonical_value_store.h"
- #include "toolchain/base/kind_switch.h"
- #include "toolchain/check/action.h"
- #include "toolchain/check/diagnostic_helpers.h"
- #include "toolchain/check/eval_inst.h"
- #include "toolchain/check/facet_type.h"
- #include "toolchain/check/generic.h"
- #include "toolchain/check/import_ref.h"
- #include "toolchain/check/name_lookup.h"
- #include "toolchain/check/type.h"
- #include "toolchain/check/type_completion.h"
- #include "toolchain/diagnostics/diagnostic.h"
- #include "toolchain/diagnostics/diagnostic_emitter.h"
- #include "toolchain/diagnostics/format_providers.h"
- #include "toolchain/sem_ir/builtin_function_kind.h"
- #include "toolchain/sem_ir/constant.h"
- #include "toolchain/sem_ir/facet_type_info.h"
- #include "toolchain/sem_ir/function.h"
- #include "toolchain/sem_ir/generic.h"
- #include "toolchain/sem_ir/id_kind.h"
- #include "toolchain/sem_ir/ids.h"
- #include "toolchain/sem_ir/impl.h"
- #include "toolchain/sem_ir/inst_categories.h"
- #include "toolchain/sem_ir/inst_kind.h"
- #include "toolchain/sem_ir/typed_insts.h"
- namespace Carbon::Check {
- namespace {
- // Information about an eval block of a specific that we are currently building.
- struct SpecificEvalInfo {
- // The region within the specific whose eval block we are building.
- SemIR::GenericInstIndex::Region region;
- // The work-in-progress contents of the eval block.
- llvm::ArrayRef<SemIR::InstId> values;
- };
- // Information about the context within which we are performing evaluation.
- // `context` must not be null.
- class EvalContext {
- public:
- explicit EvalContext(
- Context* context, SemIR::LocId fallback_loc_id,
- SemIR::SpecificId specific_id = SemIR::SpecificId::None,
- std::optional<SpecificEvalInfo> specific_eval_info = std::nullopt)
- : context_(context),
- fallback_loc_id_(fallback_loc_id),
- specific_id_(specific_id),
- specific_eval_info_(specific_eval_info) {}
- // Gets the location to use for diagnostics if a better location is
- // unavailable.
- // TODO: This is also sometimes unavailable.
- auto fallback_loc_id() const -> SemIR::LocId { return fallback_loc_id_; }
- // Returns a location to use to point at an instruction in a diagnostic, given
- // a list of instructions that might have an attached location. This is the
- // location of the first instruction in the list that has a location if there
- // is one, and otherwise the fallback location.
- auto GetDiagnosticLoc(llvm::ArrayRef<SemIR::InstId> inst_ids)
- -> SemIR::LocId {
- for (auto inst_id : inst_ids) {
- if (inst_id.has_value()) {
- auto loc_id = context_->insts().GetCanonicalLocId(inst_id);
- if (loc_id.has_value()) {
- return loc_id;
- }
- }
- }
- return fallback_loc_id_;
- }
- // Gets the value of the specified compile-time binding in this context.
- // Returns `None` if the value is not fixed in this context.
- auto GetCompileTimeBindValue(SemIR::CompileTimeBindIndex bind_index)
- -> SemIR::ConstantId {
- if (!bind_index.has_value() || !specific_id_.has_value()) {
- return SemIR::ConstantId::None;
- }
- const auto& specific = specifics().Get(specific_id_);
- auto args = inst_blocks().Get(specific.args_id);
- // Bindings past the ones with known arguments can appear as local
- // bindings of entities declared within this generic.
- if (static_cast<size_t>(bind_index.index) >= args.size()) {
- return SemIR::ConstantId::None;
- }
- return constant_values().Get(args[bind_index.index]);
- }
- // Given information about a symbolic constant, determine its value in the
- // currently-being-evaluated eval block, if it refers to that eval block. If
- // we can't find a value in this way, returns `None`.
- auto GetInEvaluatedSpecific(const SemIR::SymbolicConstant& symbolic_info)
- -> SemIR::ConstantId {
- if (!specific_eval_info_ || !symbolic_info.index.has_value()) {
- return SemIR::ConstantId::None;
- }
- CARBON_CHECK(
- symbolic_info.generic_id == specifics().Get(specific_id_).generic_id,
- "Instruction has constant operand in wrong generic");
- if (symbolic_info.index.region() != specific_eval_info_->region) {
- return SemIR::ConstantId::None;
- }
- auto inst_id = specific_eval_info_->values[symbolic_info.index.index()];
- CARBON_CHECK(inst_id.has_value(),
- "Forward reference in eval block: index {0} referenced "
- "before evaluation",
- symbolic_info.index.index());
- return constant_values().Get(inst_id);
- }
- // Gets the constant value of the specified instruction in this context.
- auto GetConstantValue(SemIR::InstId inst_id) -> SemIR::ConstantId {
- auto const_id = constant_values().GetAttached(inst_id);
- if (!const_id.is_symbolic()) {
- return const_id;
- }
- // While resolving a specific, map from previous instructions in the eval
- // block into their evaluated values. These values won't be present on the
- // specific itself yet, so `GetConstantValueInSpecific` won't be able to
- // find them.
- const auto& symbolic_info = constant_values().GetSymbolicConstant(const_id);
- if (auto eval_block_const_id = GetInEvaluatedSpecific(symbolic_info);
- eval_block_const_id.has_value()) {
- return eval_block_const_id;
- }
- return GetConstantValueInSpecific(sem_ir(), specific_id_, inst_id);
- }
- // Gets the type of the specified instruction in this context.
- auto GetTypeOfInst(SemIR::InstId inst_id) -> SemIR::TypeId {
- auto type_id = insts().GetAttachedType(inst_id);
- if (!type_id.is_symbolic()) {
- return type_id;
- }
- // While resolving a specific, map from previous instructions in the eval
- // block into their evaluated values. These values won't be present on the
- // specific itself yet, so `GetTypeOfInstInSpecific` won't be able to
- // find them.
- const auto& symbolic_info =
- constant_values().GetSymbolicConstant(types().GetConstantId(type_id));
- if (auto eval_block_const_id = GetInEvaluatedSpecific(symbolic_info);
- eval_block_const_id.has_value()) {
- return types().GetTypeIdForTypeConstantId(eval_block_const_id);
- }
- return GetTypeOfInstInSpecific(sem_ir(), specific_id_, inst_id);
- }
- auto ints() -> SharedValueStores::IntStore& { return sem_ir().ints(); }
- auto floats() -> SharedValueStores::FloatStore& { return sem_ir().floats(); }
- auto entity_names() -> SemIR::EntityNameStore& {
- return sem_ir().entity_names();
- }
- auto functions() -> const SemIR::FunctionStore& {
- return sem_ir().functions();
- }
- auto classes() -> const SemIR::ClassStore& { return sem_ir().classes(); }
- auto interfaces() -> const SemIR::InterfaceStore& {
- return sem_ir().interfaces();
- }
- auto specific_interfaces() -> SemIR::SpecificInterfaceStore& {
- return sem_ir().specific_interfaces();
- }
- auto facet_types() -> SemIR::FacetTypeInfoStore& {
- return sem_ir().facet_types();
- }
- auto generics() -> const SemIR::GenericStore& { return sem_ir().generics(); }
- auto specifics() -> const SemIR::SpecificStore& {
- return sem_ir().specifics();
- }
- auto insts() -> const SemIR::InstStore& { return sem_ir().insts(); }
- auto inst_blocks() -> SemIR::InstBlockStore& {
- return sem_ir().inst_blocks();
- }
- // Gets the constant value store. Note that this does not provide the constant
- // values that should be used from this evaluation context, and so should be
- // used with caution.
- auto constant_values() -> const SemIR::ConstantValueStore& {
- return sem_ir().constant_values();
- }
- // Gets the types store. Note that this does not provide the type values that
- // should be used from this evaluation context, and so should be used with
- // caution.
- auto types() -> const SemIR::TypeStore& { return sem_ir().types(); }
- auto context() -> Context& { return *context_; }
- auto sem_ir() -> SemIR::File& { return context().sem_ir(); }
- auto emitter() -> DiagnosticEmitterBase& { return context().emitter(); }
- private:
- // The type-checking context in which we're performing evaluation.
- Context* context_;
- // The location to use for diagnostics when a better location isn't available.
- SemIR::LocId fallback_loc_id_;
- // The specific that we are evaluating within.
- SemIR::SpecificId specific_id_;
- // If we are currently evaluating an eval block for `specific_id_`,
- // information about that evaluation.
- std::optional<SpecificEvalInfo> specific_eval_info_;
- };
- } // namespace
- namespace {
- // The evaluation phase for an expression, computed by evaluation. These are
- // ordered so that the phase of an expression is the numerically highest phase
- // of its constituent evaluations. Note that an expression with any runtime
- // component is known to have Runtime phase even if it involves an evaluation
- // with UnknownDueToError phase.
- enum class Phase : uint8_t {
- // Value could be entirely and concretely computed.
- Concrete,
- // Evaluation phase is symbolic because the expression involves specifically a
- // reference to `.Self`.
- PeriodSelfSymbolic,
- // Evaluation phase is symbolic because the expression involves a reference to
- // a non-template symbolic binding other than `.Self`.
- CheckedSymbolic,
- // Evaluation phase is symbolic because the expression involves a reference to
- // a template parameter, or otherwise depends on something template dependent.
- // The expression might also reference non-template symbolic bindings.
- TemplateSymbolic,
- // The evaluation phase is unknown because evaluation encountered an
- // already-diagnosed semantic or syntax error. This is treated as being
- // potentially constant, but with an unknown phase.
- UnknownDueToError,
- // The expression has runtime phase because of a non-constant subexpression.
- Runtime,
- };
- } // namespace
- static auto IsConstantOrError(Phase phase) -> bool {
- return phase != Phase::Runtime;
- }
- // Gets the phase in which the value of a constant will become available.
- static auto GetPhase(const SemIR::ConstantValueStore& constant_values,
- SemIR::ConstantId constant_id) -> Phase {
- if (!constant_id.is_constant()) {
- return Phase::Runtime;
- } else if (constant_id == SemIR::ErrorInst::ConstantId) {
- return Phase::UnknownDueToError;
- }
- switch (constant_values.GetDependence(constant_id)) {
- case SemIR::ConstantDependence::None:
- return Phase::Concrete;
- case SemIR::ConstantDependence::PeriodSelf:
- return Phase::PeriodSelfSymbolic;
- case SemIR::ConstantDependence::Checked:
- return Phase::CheckedSymbolic;
- case SemIR::ConstantDependence::Template:
- return Phase::TemplateSymbolic;
- }
- }
- // Returns the later of two phases.
- static auto LatestPhase(Phase a, Phase b) -> Phase {
- return static_cast<Phase>(
- std::max(static_cast<uint8_t>(a), static_cast<uint8_t>(b)));
- }
- // Forms a `constant_id` describing a given evaluation result.
- static auto MakeConstantResult(Context& context, SemIR::Inst inst, Phase phase)
- -> SemIR::ConstantId {
- switch (phase) {
- case Phase::Concrete:
- return context.constants().GetOrAdd(inst,
- SemIR::ConstantDependence::None);
- case Phase::PeriodSelfSymbolic:
- return context.constants().GetOrAdd(
- inst, SemIR::ConstantDependence::PeriodSelf);
- case Phase::CheckedSymbolic:
- return context.constants().GetOrAdd(inst,
- SemIR::ConstantDependence::Checked);
- case Phase::TemplateSymbolic:
- return context.constants().GetOrAdd(inst,
- SemIR::ConstantDependence::Template);
- case Phase::UnknownDueToError:
- return SemIR::ErrorInst::ConstantId;
- case Phase::Runtime:
- return SemIR::ConstantId::NotConstant;
- }
- }
- // Forms a `constant_id` describing why an evaluation was not constant.
- static auto MakeNonConstantResult(Phase phase) -> SemIR::ConstantId {
- return phase == Phase::UnknownDueToError ? SemIR::ErrorInst::ConstantId
- : SemIR::ConstantId::NotConstant;
- }
- // Converts a bool value into a ConstantId.
- static auto MakeBoolResult(Context& context, SemIR::TypeId bool_type_id,
- bool result) -> SemIR::ConstantId {
- return MakeConstantResult(
- context,
- SemIR::BoolLiteral{.type_id = bool_type_id,
- .value = SemIR::BoolValue::From(result)},
- Phase::Concrete);
- }
- // Converts an APInt value into a ConstantId.
- static auto MakeIntResult(Context& context, SemIR::TypeId type_id,
- bool is_signed, llvm::APInt value)
- -> SemIR::ConstantId {
- CARBON_CHECK(is_signed == context.types().IsSignedInt(type_id));
- auto result = is_signed ? context.ints().AddSigned(std::move(value))
- : context.ints().AddUnsigned(std::move(value));
- return MakeConstantResult(
- context, SemIR::IntValue{.type_id = type_id, .int_id = result},
- Phase::Concrete);
- }
- // Converts an APFloat value into a ConstantId.
- static auto MakeFloatResult(Context& context, SemIR::TypeId type_id,
- llvm::APFloat value) -> SemIR::ConstantId {
- auto result = context.floats().Add(std::move(value));
- return MakeConstantResult(
- context, SemIR::FloatValue{.type_id = type_id, .float_id = result},
- Phase::Concrete);
- }
- // Creates a FacetType constant.
- static auto MakeFacetTypeResult(Context& context,
- const SemIR::FacetTypeInfo& info, Phase phase)
- -> SemIR::ConstantId {
- SemIR::FacetTypeId facet_type_id = context.facet_types().Add(info);
- return MakeConstantResult(context,
- SemIR::FacetType{.type_id = SemIR::TypeType::TypeId,
- .facet_type_id = facet_type_id},
- phase);
- }
- // `GetConstantValue` checks to see whether the provided ID describes a value
- // with constant phase, and if so, returns the corresponding constant value.
- // Overloads are provided for different kinds of ID. `RequireConstantValue` does
- // the same, but produces an error diagnostic if the input is not constant.
- // AbsoluteInstId can not have its values substituted, so this overload is
- // deleted. This prevents conversion to InstId.
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::AbsoluteInstId inst_id, Phase* phase)
- -> SemIR::InstId = delete;
- // If the given instruction is constant, returns its constant value.
- static auto GetConstantValue(EvalContext& eval_context, SemIR::InstId inst_id,
- Phase* phase) -> SemIR::InstId {
- if (!inst_id.has_value()) {
- return SemIR::InstId::None;
- }
- auto const_id = eval_context.GetConstantValue(inst_id);
- *phase =
- LatestPhase(*phase, GetPhase(eval_context.constant_values(), const_id));
- return eval_context.constant_values().GetInstId(const_id);
- }
- // Gets a constant value for an `inst_id`, diagnosing when the input is not a
- // constant value.
- static auto RequireConstantValue(EvalContext& eval_context,
- SemIR::InstId inst_id, Phase* phase)
- -> SemIR::InstId {
- if (!inst_id.has_value()) {
- return SemIR::InstId::None;
- }
- auto const_id = eval_context.GetConstantValue(inst_id);
- *phase =
- LatestPhase(*phase, GetPhase(eval_context.constant_values(), const_id));
- if (const_id.is_constant()) {
- return eval_context.constant_values().GetInstId(const_id);
- }
- if (inst_id != SemIR::ErrorInst::InstId) {
- CARBON_DIAGNOSTIC(EvalRequiresConstantValue, Error,
- "expression is runtime; expected constant");
- eval_context.emitter().Emit(eval_context.GetDiagnosticLoc({inst_id}),
- EvalRequiresConstantValue);
- }
- *phase = Phase::UnknownDueToError;
- return SemIR::ErrorInst::InstId;
- }
- // If the given instruction is constant, returns its constant value. Otherwise,
- // produces an error diagnostic. When determining the phase of the result,
- // ignore any dependence on `.Self`.
- //
- // This is used when evaluating facet types, for which `where` expressions using
- // `.Self` should not be considered symbolic
- // - `Interface where .Self impls I and .A = bool` -> concrete
- // - `T:! type` ... `Interface where .A = T` -> symbolic, since uses `T` which
- // is symbolic and not due to `.Self`.
- static auto RequireConstantValueIgnoringPeriodSelf(EvalContext& eval_context,
- SemIR::InstId inst_id,
- Phase* phase)
- -> SemIR::InstId {
- if (!inst_id.has_value()) {
- return SemIR::InstId::None;
- }
- Phase constant_phase = *phase;
- auto const_inst_id =
- RequireConstantValue(eval_context, inst_id, &constant_phase);
- // Since LatestPhase(x, Phase::Concrete) == x, this is equivalent to replacing
- // Phase::PeriodSelfSymbolic with Phase::Concrete.
- if (constant_phase != Phase::PeriodSelfSymbolic) {
- *phase = LatestPhase(*phase, constant_phase);
- }
- return const_inst_id;
- }
- // Find the instruction that the given instruction instantiates to, and return
- // that.
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::MetaInstId inst_id, Phase* phase)
- -> SemIR::MetaInstId {
- Phase inner_phase = Phase::Concrete;
- if (auto const_inst_id =
- GetConstantValue(eval_context, SemIR::InstId(inst_id), &inner_phase);
- const_inst_id.has_value()) {
- // The instruction has a constant value. Use that as the operand of the
- // action.
- *phase = LatestPhase(*phase, inner_phase);
- return const_inst_id;
- }
- // If this instruction is splicing in an action result, that action result is
- // our operand.
- if (auto splice = eval_context.insts().TryGetAs<SemIR::SpliceInst>(inst_id)) {
- if (auto spliced_inst_id =
- GetConstantValue(eval_context, splice->inst_id, phase);
- spliced_inst_id.has_value()) {
- if (auto inst_value_id = eval_context.insts().TryGetAs<SemIR::InstValue>(
- spliced_inst_id)) {
- return inst_value_id->inst_id;
- }
- }
- }
- // Otherwise, this is a normal instruction.
- if (OperandIsDependent(eval_context.context(), inst_id)) {
- *phase = LatestPhase(*phase, Phase::TemplateSymbolic);
- }
- return inst_id;
- }
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::TypeInstId inst_id, Phase* phase)
- -> SemIR::TypeInstId {
- // The input instruction is a TypeInstId, and eval does not change concrete
- // types (like TypeType which TypeInstId implies), so the result is also a
- // valid TypeInstId.
- return SemIR::TypeInstId::UnsafeMake(GetConstantValue(
- eval_context, static_cast<SemIR::InstId>(inst_id), phase));
- }
- // Explicitly discard a `DestInstId`, because we should not be using the
- // destination as part of evaluation.
- static auto GetConstantValue(EvalContext& /*eval_context*/,
- SemIR::DestInstId /*inst_id*/, Phase* /*phase*/)
- -> SemIR::DestInstId {
- return SemIR::InstId::None;
- }
- // Given an instruction whose type may refer to a generic parameter, returns the
- // corresponding type in the evaluation context.
- //
- // If the `InstId` is not provided, the instruction is assumed to be new and
- // therefore unattached, and the type of the given instruction is returned
- // unchanged, but the phase is still updated.
- static auto GetTypeOfInst(EvalContext& eval_context, SemIR::InstId inst_id,
- SemIR::Inst inst, Phase* phase) -> SemIR::TypeId {
- auto type_id = inst_id.has_value() ? eval_context.GetTypeOfInst(inst_id)
- : inst.type_id();
- *phase = LatestPhase(*phase,
- GetPhase(eval_context.constant_values(),
- eval_context.types().GetConstantId(type_id)));
- return type_id;
- }
- // AbsoluteInstBlockId can not have its values substituted, so this overload is
- // deleted. This prevents conversion to InstBlockId.
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::AbsoluteInstBlockId inst_block_id,
- Phase* phase) -> SemIR::InstBlockId = delete;
- // If the given instruction block contains only constants, returns a
- // corresponding block of those values.
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::InstBlockId inst_block_id, Phase* phase)
- -> SemIR::InstBlockId {
- if (!inst_block_id.has_value()) {
- return SemIR::InstBlockId::None;
- }
- auto insts = eval_context.inst_blocks().Get(inst_block_id);
- llvm::SmallVector<SemIR::InstId> const_insts;
- for (auto inst_id : insts) {
- auto const_inst_id = GetConstantValue(eval_context, inst_id, phase);
- if (!const_inst_id.has_value()) {
- return SemIR::InstBlockId::None;
- }
- // Once we leave the small buffer, we know the first few elements are all
- // constant, so it's likely that the entire block is constant. Resize to the
- // target size given that we're going to allocate memory now anyway.
- if (const_insts.size() == const_insts.capacity()) {
- const_insts.reserve(insts.size());
- }
- const_insts.push_back(const_inst_id);
- }
- // TODO: If the new block is identical to the original block, and we know the
- // old ID was canonical, return the original ID.
- return eval_context.inst_blocks().AddCanonical(const_insts);
- }
- // Compute the constant value of a type block. This may be different from the
- // input type block if we have known generic arguments.
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::StructTypeFieldsId fields_id, Phase* phase)
- -> SemIR::StructTypeFieldsId {
- if (!fields_id.has_value()) {
- return SemIR::StructTypeFieldsId::None;
- }
- auto fields = eval_context.context().struct_type_fields().Get(fields_id);
- llvm::SmallVector<SemIR::StructTypeField> new_fields;
- for (auto field : fields) {
- auto new_type_inst_id =
- GetConstantValue(eval_context, field.type_inst_id, phase);
- if (!new_type_inst_id.has_value()) {
- return SemIR::StructTypeFieldsId::None;
- }
- // Once we leave the small buffer, we know the first few elements are all
- // constant, so it's likely that the entire block is constant. Resize to the
- // target size given that we're going to allocate memory now anyway.
- if (new_fields.size() == new_fields.capacity()) {
- new_fields.reserve(fields.size());
- }
- new_fields.push_back(
- {.name_id = field.name_id, .type_inst_id = new_type_inst_id});
- }
- // TODO: If the new block is identical to the original block, and we know the
- // old ID was canonical, return the original ID.
- return eval_context.context().struct_type_fields().AddCanonical(new_fields);
- }
- // The constant value of a specific is the specific with the corresponding
- // constant values for its arguments.
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::SpecificId specific_id, Phase* phase)
- -> SemIR::SpecificId {
- if (!specific_id.has_value()) {
- return SemIR::SpecificId::None;
- }
- const auto& specific = eval_context.specifics().Get(specific_id);
- auto args_id = GetConstantValue(eval_context, specific.args_id, phase);
- if (!args_id.has_value()) {
- return SemIR::SpecificId::None;
- }
- // Generally, when making a new specific, it's done through MakeSpecific(),
- // which will ensure the declaration is resolved.
- //
- // However, the SpecificId returned here is intentionally left without its
- // declaration resolved. Imported instructions with SpecificIds should not
- // have the specific's declaration resolved, but other instructions which
- // include a new SpecificId should.
- //
- // The resolving of the specific's declaration will be ensured later when
- // evaluating the instruction containing the SpecificId.
- if (args_id == specific.args_id) {
- return specific_id;
- }
- return eval_context.context().specifics().GetOrAdd(specific.generic_id,
- args_id);
- }
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::SpecificInterfaceId specific_interface_id,
- Phase* phase) -> SemIR::SpecificInterfaceId {
- const auto& interface =
- eval_context.specific_interfaces().Get(specific_interface_id);
- if (!interface.specific_id.has_value()) {
- return specific_interface_id;
- }
- return eval_context.specific_interfaces().Add(
- {.interface_id = interface.interface_id,
- .specific_id =
- GetConstantValue(eval_context, interface.specific_id, phase)});
- }
- // Like `GetConstantValue` but for a `FacetTypeInfo`.
- static auto GetConstantFacetTypeInfo(EvalContext& eval_context,
- SemIR::LocId loc_id,
- const SemIR::FacetTypeInfo& orig,
- Phase* phase) -> SemIR::FacetTypeInfo {
- SemIR::FacetTypeInfo info;
- info.extend_constraints.reserve(orig.extend_constraints.size());
- for (const auto& interface : orig.extend_constraints) {
- info.extend_constraints.push_back(
- {.interface_id = interface.interface_id,
- .specific_id =
- GetConstantValue(eval_context, interface.specific_id, phase)});
- }
- info.self_impls_constraints.reserve(orig.self_impls_constraints.size());
- for (const auto& interface : orig.self_impls_constraints) {
- info.self_impls_constraints.push_back(
- {.interface_id = interface.interface_id,
- .specific_id =
- GetConstantValue(eval_context, interface.specific_id, phase)});
- }
- // Rewrite constraints are resolved first before replacing them with their
- // canonical instruction, so that in a `WhereExpr` we can work with the
- // `ImplWitnessAccess` references to `.Self` on the LHS of the constraints
- // rather than the value of the associated constant they reference.
- //
- // This also implies that we may find `ImplWitnessAccessSubstituted`
- // instructions in the LHS and RHS of these constraints, which are preserved
- // to maintain them as an unresolved reference to an associated constant, but
- // which must be handled gracefully during resolution. They will be replaced
- // with the constant value of the `ImplWitnessAccess` below when they are
- // substituted with a constant value.
- info.rewrite_constraints = orig.rewrite_constraints;
- if (!ResolveFacetTypeRewriteConstraints(eval_context.context(), loc_id,
- info.rewrite_constraints)) {
- *phase = Phase::UnknownDueToError;
- }
- for (auto& rewrite : info.rewrite_constraints) {
- // `where` requirements using `.Self` should not be considered symbolic.
- auto lhs_id = RequireConstantValueIgnoringPeriodSelf(eval_context,
- rewrite.lhs_id, phase);
- auto rhs_id = RequireConstantValueIgnoringPeriodSelf(eval_context,
- rewrite.rhs_id, phase);
- rewrite = {.lhs_id = lhs_id, .rhs_id = rhs_id};
- }
- // TODO: Process other requirements.
- info.other_requirements = orig.other_requirements;
- info.Canonicalize();
- return info;
- }
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::FacetTypeId facet_type_id, Phase* phase)
- -> SemIR::FacetTypeId {
- SemIR::FacetTypeInfo info = GetConstantFacetTypeInfo(
- eval_context, SemIR::LocId::None,
- eval_context.facet_types().Get(facet_type_id), phase);
- // TODO: Return `facet_type_id` if we can detect nothing has changed.
- return eval_context.facet_types().Add(info);
- }
- static auto GetConstantValue(EvalContext& eval_context,
- SemIR::EntityNameId entity_name_id, Phase* phase)
- -> SemIR::EntityNameId {
- const auto& bind_name = eval_context.entity_names().Get(entity_name_id);
- Phase name_phase;
- if (bind_name.name_id == SemIR::NameId::PeriodSelf) {
- name_phase = Phase::PeriodSelfSymbolic;
- } else if (!bind_name.bind_index().has_value()) {
- name_phase = Phase::Concrete;
- } else if (bind_name.is_template) {
- name_phase = Phase::TemplateSymbolic;
- } else {
- name_phase = Phase::CheckedSymbolic;
- }
- *phase = LatestPhase(*phase, name_phase);
- return eval_context.entity_names().MakeCanonical(entity_name_id);
- }
- // Replaces the specified field of the given typed instruction with its constant
- // value, if it has constant phase. Returns true on success, false if the value
- // has runtime phase.
- template <typename InstT, typename FieldIdT>
- static auto ReplaceFieldWithConstantValue(EvalContext& eval_context,
- InstT* inst, FieldIdT InstT::* field,
- Phase* phase) -> bool {
- auto unwrapped = GetConstantValue(eval_context, inst->*field, phase);
- if (!unwrapped.has_value() && (inst->*field).has_value()) {
- return false;
- }
- inst->*field = unwrapped;
- return IsConstantOrError(*phase);
- }
- // Function template that can be called with an argument of type `T`. Used below
- // to detect which overloads of `GetConstantValue` exist.
- template <typename T>
- static void Accept(T /*arg*/) {}
- // Determines whether a `GetConstantValue` overload exists for a given ID type.
- // Note that we do not check whether `GetConstantValue` is *callable* with a
- // given ID type, because that would use the `InstId` overload for
- // `AbsoluteInstId` and similar wrapper types, which should be left alone.
- template <typename IdT>
- static constexpr bool HasGetConstantValueOverload = requires {
- Accept<auto (*)(EvalContext&, IdT, Phase*)->IdT>(GetConstantValue);
- };
- using ArgHandlerFnT = auto(EvalContext& context, int32_t arg, Phase* phase)
- -> int32_t;
- // Returns the arg handler for an `IdKind`.
- template <typename... Types>
- static auto GetArgHandlerFn(TypeEnum<Types...> id_kind) -> ArgHandlerFnT* {
- static constexpr std::array<ArgHandlerFnT*, SemIR::IdKind::NumValues> Table =
- {
- [](EvalContext& eval_context, int32_t arg, Phase* phase) -> int32_t {
- auto id = SemIR::Inst::FromRaw<Types>(arg);
- if constexpr (HasGetConstantValueOverload<Types>) {
- // If we have a custom `GetConstantValue` overload, call it.
- return SemIR::Inst::ToRaw(
- GetConstantValue(eval_context, id, phase));
- } else {
- // Otherwise, we assume the value is already constant.
- return arg;
- }
- }...,
- // Invalid and None handling (ordering-sensitive).
- [](auto...) -> int32_t { CARBON_FATAL("Unexpected invalid IdKind"); },
- [](EvalContext& /*context*/, int32_t arg,
- Phase* /*phase*/) -> int32_t { return arg; },
- };
- return Table[id_kind.ToIndex()];
- }
- // Given the stored value `arg` of an instruction field and its corresponding
- // kind `kind`, returns the constant value to use for that field, if it has a
- // constant phase. `*phase` is updated to include the new constant value. If
- // the resulting phase is not constant, the returned value is not useful and
- // will typically be `NoneIndex`.
- static auto GetConstantValueForArg(EvalContext& eval_context,
- SemIR::Inst::ArgAndKind arg_and_kind,
- Phase* phase) -> int32_t {
- return GetArgHandlerFn(arg_and_kind.kind())(eval_context,
- arg_and_kind.value(), phase);
- }
- // Given an instruction, replaces its operands with their constant values from
- // the specified evaluation context. `*phase` is updated to describe the
- // constant phase of the result. Returns whether `*phase` is a constant phase;
- // if not, `inst` may not be fully updated and should not be used.
- static auto ReplaceAllFieldsWithConstantValues(EvalContext& eval_context,
- SemIR::Inst* inst, Phase* phase)
- -> bool {
- auto arg0 =
- GetConstantValueForArg(eval_context, inst->arg0_and_kind(), phase);
- if (!IsConstantOrError(*phase)) {
- return false;
- }
- auto arg1 =
- GetConstantValueForArg(eval_context, inst->arg1_and_kind(), phase);
- if (!IsConstantOrError(*phase)) {
- return false;
- }
- inst->SetArgs(arg0, arg1);
- return true;
- }
- // Given an instruction and its ID, replaces its type with the corresponding
- // value in this evaluation context. Updates `*phase` to describe the phase of
- // the result, and returns whether `*phase` is a constant phase.
- static auto ReplaceTypeWithConstantValue(EvalContext& eval_context,
- SemIR::InstId inst_id,
- SemIR::Inst* inst, Phase* phase)
- -> bool {
- inst->SetType(GetTypeOfInst(eval_context, inst_id, *inst, phase));
- return IsConstantOrError(*phase);
- }
- template <typename InstT>
- static auto ReplaceTypeWithConstantValue(EvalContext& eval_context,
- SemIR::InstId inst_id, InstT* inst,
- Phase* phase) -> bool {
- inst->type_id = GetTypeOfInst(eval_context, inst_id, *inst, phase);
- return IsConstantOrError(*phase);
- }
- template <typename... Types>
- static auto KindHasGetConstantValueOverload(TypeEnum<Types...> e) -> bool {
- static constexpr std::array<bool, SemIR::IdKind::NumTypes> Values = {
- (HasGetConstantValueOverload<Types>)...};
- return Values[e.ToIndex()];
- }
- static auto ResolveSpecificDeclForSpecificId(EvalContext& eval_context,
- SemIR::SpecificId specific_id)
- -> void {
- if (!specific_id.has_value()) {
- return;
- }
- const auto& specific = eval_context.specifics().Get(specific_id);
- const auto& generic = eval_context.generics().Get(specific.generic_id);
- if (specific_id == generic.self_specific_id) {
- // Impl witness table construction happens before its generic decl is
- // finish, in order to make the table's instructions dependent
- // instructions of the Impl's generic. But those instructions can refer to
- // the generic's self specific. We can not resolve the specific
- // declaration for the self specific until the generic is finished, but it
- // is explicitly resolved at that time in `FinishGenericDecl()`.
- return;
- }
- ResolveSpecificDecl(eval_context.context(), eval_context.fallback_loc_id(),
- specific_id);
- }
- // Resolves the specific declarations for a specific id in any field of the
- // `inst` instruction.
- static auto ResolveSpecificDeclForInst(EvalContext& eval_context,
- const SemIR::Inst& inst) -> void {
- for (auto arg_and_kind : {inst.arg0_and_kind(), inst.arg1_and_kind()}) {
- // This switch must handle any field type that has a GetConstantValue()
- // overload which canonicalizes a specific (and thus potentially forms a new
- // specific) as part of forming its constant value.
- CARBON_KIND_SWITCH(arg_and_kind) {
- case CARBON_KIND(SemIR::FacetTypeId facet_type_id): {
- const auto& info =
- eval_context.context().facet_types().Get(facet_type_id);
- for (const auto& interface : info.extend_constraints) {
- ResolveSpecificDeclForSpecificId(eval_context, interface.specific_id);
- }
- for (const auto& interface : info.self_impls_constraints) {
- ResolveSpecificDeclForSpecificId(eval_context, interface.specific_id);
- }
- break;
- }
- case CARBON_KIND(SemIR::SpecificId specific_id): {
- ResolveSpecificDeclForSpecificId(eval_context, specific_id);
- break;
- }
- case CARBON_KIND(SemIR::SpecificInterfaceId specific_interface_id): {
- ResolveSpecificDeclForSpecificId(eval_context,
- eval_context.specific_interfaces()
- .Get(specific_interface_id)
- .specific_id);
- break;
- }
- // These id types have a GetConstantValue() overload but that overload
- // does not canonicalize any SpecificId in the value type.
- case SemIR::IdKind::For<SemIR::DestInstId>:
- case SemIR::IdKind::For<SemIR::EntityNameId>:
- case SemIR::IdKind::For<SemIR::InstBlockId>:
- case SemIR::IdKind::For<SemIR::InstId>:
- case SemIR::IdKind::For<SemIR::MetaInstId>:
- case SemIR::IdKind::For<SemIR::StructTypeFieldsId>:
- case SemIR::IdKind::For<SemIR::TypeInstId>:
- break;
- case SemIR::IdKind::None:
- // No arg.
- break;
- default:
- CARBON_CHECK(
- !KindHasGetConstantValueOverload(arg_and_kind.kind()),
- "Missing case for {0} which has a GetConstantValue() overload",
- arg_and_kind.kind());
- break;
- }
- }
- }
- auto AddImportedConstant(Context& context, SemIR::Inst inst)
- -> SemIR::ConstantId {
- EvalContext eval_context(&context, SemIR::LocId::None);
- CARBON_CHECK(inst.kind().has_type(), "Can't import untyped instructions: {0}",
- inst.kind());
- Phase phase = GetPhase(context.constant_values(),
- context.types().GetConstantId(inst.type_id()));
- // We ignore the return value of ReplaceAllFieldsWithConstantValues and just
- // propagate runtime and error constant values into the resulting ConstantId.
- ReplaceAllFieldsWithConstantValues(eval_context, &inst, &phase);
- return MakeConstantResult(context, inst, phase);
- }
- // Performs an index into a homogeneous aggregate, retrieving the specified
- // element.
- static auto PerformArrayIndex(EvalContext& eval_context, SemIR::ArrayIndex inst)
- -> SemIR::ConstantId {
- Phase phase = Phase::Concrete;
- auto index_id = GetConstantValue(eval_context, inst.index_id, &phase);
- if (!index_id.has_value()) {
- return MakeNonConstantResult(phase);
- }
- auto index = eval_context.insts().TryGetAs<SemIR::IntValue>(index_id);
- if (!index) {
- CARBON_CHECK(phase != Phase::Concrete,
- "Concrete constant integer should be a literal");
- return MakeNonConstantResult(phase);
- }
- // Array indexing is invalid if the index is constant and out of range,
- // regardless of whether the array itself is constant.
- const auto& index_val = eval_context.ints().Get(index->int_id);
- auto aggregate_type_id = eval_context.GetTypeOfInst(inst.array_id);
- if (auto array_type =
- eval_context.types().TryGetAs<SemIR::ArrayType>(aggregate_type_id)) {
- if (auto bound = eval_context.insts().TryGetAs<SemIR::IntValue>(
- array_type->bound_id)) {
- // This awkward call to `getZExtValue` is a workaround for APInt not
- // supporting comparisons between integers of different bit widths.
- if (index_val.getActiveBits() > 64 ||
- eval_context.ints()
- .Get(bound->int_id)
- .ule(index_val.getZExtValue())) {
- CARBON_DIAGNOSTIC(ArrayIndexOutOfBounds, Error,
- "array index `{0}` is past the end of type {1}",
- TypedInt, SemIR::TypeId);
- eval_context.emitter().Emit(
- eval_context.GetDiagnosticLoc(inst.index_id), ArrayIndexOutOfBounds,
- {.type = index->type_id, .value = index_val}, aggregate_type_id);
- return SemIR::ErrorInst::ConstantId;
- }
- }
- }
- auto aggregate_id = GetConstantValue(eval_context, inst.array_id, &phase);
- if (!aggregate_id.has_value()) {
- return MakeNonConstantResult(phase);
- }
- auto aggregate =
- eval_context.insts().TryGetAs<SemIR::AnyAggregateValue>(aggregate_id);
- if (!aggregate) {
- // TODO: Consider forming a symbolic constant or reference constant array
- // index in this case.
- return MakeNonConstantResult(phase);
- }
- auto elements = eval_context.inst_blocks().Get(aggregate->elements_id);
- return eval_context.GetConstantValue(elements[index_val.getZExtValue()]);
- }
- // Performs a conversion between character types, diagnosing if the value
- // doesn't fit in the destination type.
- static auto PerformCheckedCharConvert(Context& context, SemIR::LocId loc_id,
- SemIR::InstId arg_id,
- SemIR::TypeId dest_type_id)
- -> SemIR::ConstantId {
- auto arg = context.insts().GetAs<SemIR::CharLiteralValue>(arg_id);
- // Values over 0x80 require multiple code units in UTF-8.
- if (arg.value.index >= 0x80) {
- CARBON_DIAGNOSTIC(CharTooLargeForType, Error,
- "character value {0} too large for type {1}",
- SemIR::CharId, SemIR::TypeId);
- context.emitter().Emit(loc_id, CharTooLargeForType, arg.value,
- dest_type_id);
- return SemIR::ErrorInst::ConstantId;
- }
- llvm::APInt int_val(8, arg.value.index, /*isSigned=*/false);
- return MakeIntResult(context, dest_type_id, /*is_signed=*/false, int_val);
- }
- // Forms a constant int type as an evaluation result. Requires that width_id is
- // constant.
- static auto MakeIntTypeResult(Context& context, SemIR::LocId loc_id,
- SemIR::IntKind int_kind, SemIR::InstId width_id,
- Phase phase) -> SemIR::ConstantId {
- auto result = SemIR::IntType{
- .type_id = GetSingletonType(context, SemIR::TypeType::TypeInstId),
- .int_kind = int_kind,
- .bit_width_id = width_id};
- if (!ValidateIntType(context, loc_id, result)) {
- return SemIR::ErrorInst::ConstantId;
- }
- return MakeConstantResult(context, result, phase);
- }
- // Forms a constant float type as an evaluation result. Requires that width_id
- // is constant.
- static auto MakeFloatTypeResult(Context& context, SemIR::LocId loc_id,
- SemIR::InstId width_id, Phase phase)
- -> SemIR::ConstantId {
- auto result = SemIR::FloatType{
- .type_id = GetSingletonType(context, SemIR::TypeType::TypeInstId),
- .bit_width_id = width_id,
- .float_kind = SemIR::FloatKind::None};
- if (!ValidateFloatTypeAndSetKind(context, loc_id, result)) {
- return SemIR::ErrorInst::ConstantId;
- }
- return MakeConstantResult(context, result, phase);
- }
- // Performs a conversion between integer types, truncating if the value doesn't
- // fit in the destination type.
- static auto PerformIntConvert(Context& context, SemIR::InstId arg_id,
- SemIR::TypeId dest_type_id) -> SemIR::ConstantId {
- auto arg_val =
- context.ints().Get(context.insts().GetAs<SemIR::IntValue>(arg_id).int_id);
- auto [dest_is_signed, bit_width_id] =
- context.sem_ir().types().GetIntTypeInfo(dest_type_id);
- if (bit_width_id.has_value()) {
- // TODO: If the value fits in the destination type, reuse the existing
- // int_id rather than recomputing it. This is probably the most common case.
- bool src_is_signed = context.sem_ir().types().IsSignedInt(
- context.insts().Get(arg_id).type_id());
- unsigned width = context.ints().Get(bit_width_id).getZExtValue();
- arg_val =
- src_is_signed ? arg_val.sextOrTrunc(width) : arg_val.zextOrTrunc(width);
- }
- return MakeIntResult(context, dest_type_id, dest_is_signed, arg_val);
- }
- // Performs a conversion between integer types, diagnosing if the value doesn't
- // fit in the destination type.
- static auto PerformCheckedIntConvert(Context& context, SemIR::LocId loc_id,
- SemIR::InstId arg_id,
- SemIR::TypeId dest_type_id)
- -> SemIR::ConstantId {
- auto arg = context.insts().GetAs<SemIR::IntValue>(arg_id);
- auto arg_val = context.ints().Get(arg.int_id);
- auto [is_signed, bit_width_id] =
- context.sem_ir().types().GetIntTypeInfo(dest_type_id);
- auto width = bit_width_id.has_value()
- ? context.ints().Get(bit_width_id).getZExtValue()
- : arg_val.getBitWidth();
- if (!is_signed && arg_val.isNegative()) {
- CARBON_DIAGNOSTIC(
- NegativeIntInUnsignedType, Error,
- "negative integer value {0} converted to unsigned type {1}", TypedInt,
- SemIR::TypeId);
- context.emitter().Emit(loc_id, NegativeIntInUnsignedType,
- {.type = arg.type_id, .value = arg_val},
- dest_type_id);
- }
- unsigned arg_non_sign_bits = arg_val.getSignificantBits() - 1;
- if (arg_non_sign_bits + is_signed > width) {
- CARBON_DIAGNOSTIC(IntTooLargeForType, Error,
- "integer value {0} too large for type {1}", TypedInt,
- SemIR::TypeId);
- context.emitter().Emit(loc_id, IntTooLargeForType,
- {.type = arg.type_id, .value = arg_val},
- dest_type_id);
- }
- return MakeConstantResult(
- context, SemIR::IntValue{.type_id = dest_type_id, .int_id = arg.int_id},
- Phase::Concrete);
- }
- // Performs a conversion between floating-point types, diagnosing if the value
- // doesn't fit in the destination type.
- static auto PerformCheckedFloatConvert(Context& context, SemIR::LocId loc_id,
- SemIR::InstId arg_id,
- SemIR::TypeId dest_type_id)
- -> SemIR::ConstantId {
- auto dest_type_object_rep_id = context.types().GetObjectRepr(dest_type_id);
- CARBON_CHECK(dest_type_object_rep_id.has_value(),
- "Conversion to incomplete type");
- auto dest_float_type =
- context.types().TryGetAs<SemIR::FloatType>(dest_type_object_rep_id);
- CARBON_CHECK(dest_float_type || context.types().Is<SemIR::FloatLiteralType>(
- dest_type_object_rep_id));
- if (auto literal =
- context.insts().TryGetAs<SemIR::FloatLiteralValue>(arg_id)) {
- if (!dest_float_type) {
- return MakeConstantResult(
- context,
- SemIR::FloatLiteralValue{.type_id = dest_type_id,
- .real_id = literal->real_id},
- Phase::Concrete);
- }
- // Convert the real literal to an llvm::APFloat and add it to the floats
- // ValueStore. In the future this would use an arbitrary precision Rational
- // type.
- //
- // TODO: Implement Carbon's actual implicit conversion rules for
- // floating-point constants, as per the design
- // docs/design/expressions/implicit_conversions.md
- auto real_value = context.sem_ir().reals().Get(literal->real_id);
- // Convert the real value to a string.
- llvm::SmallString<64> str;
- real_value.mantissa.toString(str, real_value.is_decimal ? 10 : 16,
- /*signed=*/false, /*formatAsCLiteral=*/true);
- str += real_value.is_decimal ? "e" : "p";
- real_value.exponent.toStringSigned(str);
- // Convert the string to an APFloat.
- llvm::APFloat result(dest_float_type->float_kind.Semantics());
- // TODO: The implementation of this conversion effectively converts back to
- // APInts, but unfortunately the conversion from integer mantissa and
- // exponent in IEEEFloat::roundSignificandWithExponent is not part of the
- // public API.
- auto status =
- result.convertFromString(str, llvm::APFloat::rmNearestTiesToEven);
- if (auto error = status.takeError()) {
- // The literal we create should always successfully parse.
- CARBON_FATAL("Float literal parsing failed: {0}",
- toString(std::move(error)));
- }
- if (status.get() & llvm::APFloat::opOverflow) {
- CARBON_DIAGNOSTIC(FloatLiteralTooLargeForType, Error,
- "value {0} too large for floating-point type {1}",
- RealId, SemIR::TypeId);
- context.emitter().Emit(loc_id, FloatLiteralTooLargeForType,
- literal->real_id, dest_type_id);
- return SemIR::ErrorInst::ConstantId;
- }
- return MakeFloatResult(context, dest_type_id, std::move(result));
- }
- if (!dest_float_type) {
- context.TODO(loc_id, "conversion from float to float literal");
- return SemIR::ErrorInst::ConstantId;
- }
- // Convert to the destination float semantics.
- auto arg = context.insts().GetAs<SemIR::FloatValue>(arg_id);
- llvm::APFloat result = context.floats().Get(arg.float_id);
- bool loses_info;
- auto status = result.convert(dest_float_type->float_kind.Semantics(),
- llvm::APFloat::rmNearestTiesToEven, &loses_info);
- if (status & llvm::APFloat::opOverflow) {
- CARBON_DIAGNOSTIC(FloatTooLargeForType, Error,
- "value {0} too large for floating-point type {1}",
- llvm::APFloat, SemIR::TypeId);
- context.emitter().Emit(loc_id, FloatTooLargeForType,
- context.floats().Get(arg.float_id), dest_type_id);
- return SemIR::ErrorInst::ConstantId;
- }
- return MakeFloatResult(context, dest_type_id, std::move(result));
- }
- // Issues a diagnostic for a compile-time division by zero.
- static auto DiagnoseDivisionByZero(Context& context, SemIR::LocId loc_id)
- -> void {
- CARBON_DIAGNOSTIC(CompileTimeDivisionByZero, Error, "division by zero");
- context.emitter().Emit(loc_id, CompileTimeDivisionByZero);
- }
- // Get an integer at a suitable bit-width: either `bit_width_id` if it has a
- // value, or the canonical width from the value store if not.
- static auto GetIntAtSuitableWidth(Context& context, IntId int_id,
- IntId bit_width_id) -> llvm::APInt {
- return bit_width_id.has_value()
- ? context.ints().GetAtWidth(int_id, bit_width_id)
- : context.ints().Get(int_id);
- }
- // Performs a builtin unary integer -> integer operation.
- static auto PerformBuiltinUnaryIntOp(Context& context, SemIR::LocId loc_id,
- SemIR::BuiltinFunctionKind builtin_kind,
- SemIR::InstId arg_id)
- -> SemIR::ConstantId {
- auto op = context.insts().GetAs<SemIR::IntValue>(arg_id);
- auto [is_signed, bit_width_id] =
- context.sem_ir().types().GetIntTypeInfo(op.type_id);
- llvm::APInt op_val = GetIntAtSuitableWidth(context, op.int_id, bit_width_id);
- switch (builtin_kind) {
- case SemIR::BuiltinFunctionKind::IntSNegate:
- if (op_val.isMinSignedValue()) {
- if (bit_width_id.has_value()) {
- CARBON_DIAGNOSTIC(CompileTimeIntegerNegateOverflow, Error,
- "integer overflow in negation of {0}", TypedInt);
- context.emitter().Emit(loc_id, CompileTimeIntegerNegateOverflow,
- {.type = op.type_id, .value = op_val});
- } else {
- // Widen the integer so we don't overflow into the sign bit.
- op_val = op_val.sext(op_val.getBitWidth() +
- llvm::APInt::APINT_BITS_PER_WORD);
- }
- }
- op_val.negate();
- break;
- case SemIR::BuiltinFunctionKind::IntUNegate:
- CARBON_CHECK(bit_width_id.has_value(), "Unsigned negate on unsized int");
- op_val.negate();
- break;
- case SemIR::BuiltinFunctionKind::IntComplement:
- // TODO: Should we have separate builtins for signed and unsigned
- // complement? Like with signed/unsigned negate, these operations do
- // different things to the integer value, even though they do the same
- // thing to the bits. We treat IntLiteral complement as signed complement,
- // given that the result of unsigned complement depends on the bit width.
- op_val.flipAllBits();
- break;
- default:
- CARBON_FATAL("Unexpected builtin kind");
- }
- return MakeIntResult(context, op.type_id, is_signed, std::move(op_val));
- }
- namespace {
- // A pair of APInts that are the operands of a binary operator. We use an
- // aggregate rather than `std::pair` to allow RVO of the individual ints.
- struct APIntBinaryOperands {
- llvm::APInt lhs;
- llvm::APInt rhs;
- };
- } // namespace
- // Get a pair of integers at the same suitable bit-width: either their actual
- // width if they have a fixed width, or the smallest canonical width in which
- // they both fit otherwise.
- static auto GetIntsAtSuitableWidth(Context& context, IntId lhs_id, IntId rhs_id,
- IntId bit_width_id) -> APIntBinaryOperands {
- // Unsized operands: take the wider of the bit widths.
- if (!bit_width_id.has_value()) {
- APIntBinaryOperands result = {.lhs = context.ints().Get(lhs_id),
- .rhs = context.ints().Get(rhs_id)};
- if (result.lhs.getBitWidth() != result.rhs.getBitWidth()) {
- if (result.lhs.getBitWidth() > result.rhs.getBitWidth()) {
- result.rhs = result.rhs.sext(result.lhs.getBitWidth());
- } else {
- result.lhs = result.lhs.sext(result.rhs.getBitWidth());
- }
- }
- return result;
- }
- return {.lhs = context.ints().GetAtWidth(lhs_id, bit_width_id),
- .rhs = context.ints().GetAtWidth(rhs_id, bit_width_id)};
- }
- namespace {
- // The result of performing a binary int operation.
- struct BinaryIntOpResult {
- llvm::APInt result_val;
- bool overflow;
- Lex::TokenKind op_token;
- };
- } // namespace
- // Computes the result of a homogeneous binary (int, int) -> int operation.
- static auto ComputeBinaryIntOpResult(SemIR::BuiltinFunctionKind builtin_kind,
- const llvm::APInt& lhs_val,
- const llvm::APInt& rhs_val)
- -> BinaryIntOpResult {
- llvm::APInt result_val;
- bool overflow = false;
- Lex::TokenKind op_token = Lex::TokenKind::Not;
- switch (builtin_kind) {
- // Arithmetic.
- case SemIR::BuiltinFunctionKind::IntSAdd:
- result_val = lhs_val.sadd_ov(rhs_val, overflow);
- op_token = Lex::TokenKind::Plus;
- break;
- case SemIR::BuiltinFunctionKind::IntSSub:
- result_val = lhs_val.ssub_ov(rhs_val, overflow);
- op_token = Lex::TokenKind::Minus;
- break;
- case SemIR::BuiltinFunctionKind::IntSMul:
- result_val = lhs_val.smul_ov(rhs_val, overflow);
- op_token = Lex::TokenKind::Star;
- break;
- case SemIR::BuiltinFunctionKind::IntSDiv:
- result_val = lhs_val.sdiv_ov(rhs_val, overflow);
- op_token = Lex::TokenKind::Slash;
- break;
- case SemIR::BuiltinFunctionKind::IntSMod:
- result_val = lhs_val.srem(rhs_val);
- // LLVM weirdly lacks `srem_ov`, so we work it out for ourselves:
- // <signed min> % -1 overflows because <signed min> / -1 overflows.
- overflow = lhs_val.isMinSignedValue() && rhs_val.isAllOnes();
- op_token = Lex::TokenKind::Percent;
- break;
- case SemIR::BuiltinFunctionKind::IntUAdd:
- result_val = lhs_val + rhs_val;
- op_token = Lex::TokenKind::Plus;
- break;
- case SemIR::BuiltinFunctionKind::IntUSub:
- result_val = lhs_val - rhs_val;
- op_token = Lex::TokenKind::Minus;
- break;
- case SemIR::BuiltinFunctionKind::IntUMul:
- result_val = lhs_val * rhs_val;
- op_token = Lex::TokenKind::Star;
- break;
- case SemIR::BuiltinFunctionKind::IntUDiv:
- result_val = lhs_val.udiv(rhs_val);
- op_token = Lex::TokenKind::Slash;
- break;
- case SemIR::BuiltinFunctionKind::IntUMod:
- result_val = lhs_val.urem(rhs_val);
- op_token = Lex::TokenKind::Percent;
- break;
- // Bitwise.
- case SemIR::BuiltinFunctionKind::IntAnd:
- result_val = lhs_val & rhs_val;
- op_token = Lex::TokenKind::And;
- break;
- case SemIR::BuiltinFunctionKind::IntOr:
- result_val = lhs_val | rhs_val;
- op_token = Lex::TokenKind::Pipe;
- break;
- case SemIR::BuiltinFunctionKind::IntXor:
- result_val = lhs_val ^ rhs_val;
- op_token = Lex::TokenKind::Caret;
- break;
- case SemIR::BuiltinFunctionKind::IntLeftShift:
- case SemIR::BuiltinFunctionKind::IntRightShift:
- CARBON_FATAL("Non-homogeneous operation handled separately.");
- default:
- CARBON_FATAL("Unexpected operation kind.");
- }
- return {.result_val = std::move(result_val),
- .overflow = overflow,
- .op_token = op_token};
- }
- // Performs a builtin integer bit shift operation.
- static auto PerformBuiltinIntShiftOp(Context& context, SemIR::LocId loc_id,
- SemIR::BuiltinFunctionKind builtin_kind,
- SemIR::InstId lhs_id, SemIR::InstId rhs_id)
- -> SemIR::ConstantId {
- auto lhs = context.insts().GetAs<SemIR::IntValue>(lhs_id);
- auto rhs = context.insts().GetAs<SemIR::IntValue>(rhs_id);
- auto [lhs_is_signed, lhs_bit_width_id] =
- context.sem_ir().types().GetIntTypeInfo(lhs.type_id);
- llvm::APInt lhs_val =
- GetIntAtSuitableWidth(context, lhs.int_id, lhs_bit_width_id);
- const auto& rhs_orig_val = context.ints().Get(rhs.int_id);
- if (lhs_bit_width_id.has_value() && rhs_orig_val.uge(lhs_val.getBitWidth())) {
- CARBON_DIAGNOSTIC(
- CompileTimeShiftOutOfRange, Error,
- "shift distance >= type width of {0} in `{1} {2:<<|>>} {3}`", unsigned,
- TypedInt, Diagnostics::BoolAsSelect, TypedInt);
- context.emitter().Emit(
- loc_id, CompileTimeShiftOutOfRange, lhs_val.getBitWidth(),
- {.type = lhs.type_id, .value = lhs_val},
- builtin_kind == SemIR::BuiltinFunctionKind::IntLeftShift,
- {.type = rhs.type_id, .value = rhs_orig_val});
- // TODO: Is it useful to recover by returning 0 or -1?
- return SemIR::ErrorInst::ConstantId;
- }
- if (rhs_orig_val.isNegative() &&
- context.sem_ir().types().IsSignedInt(rhs.type_id)) {
- CARBON_DIAGNOSTIC(CompileTimeShiftNegative, Error,
- "shift distance negative in `{0} {1:<<|>>} {2}`",
- TypedInt, Diagnostics::BoolAsSelect, TypedInt);
- context.emitter().Emit(
- loc_id, CompileTimeShiftNegative,
- {.type = lhs.type_id, .value = lhs_val},
- builtin_kind == SemIR::BuiltinFunctionKind::IntLeftShift,
- {.type = rhs.type_id, .value = rhs_orig_val});
- // TODO: Is it useful to recover by returning 0 or -1?
- return SemIR::ErrorInst::ConstantId;
- }
- llvm::APInt result_val;
- if (builtin_kind == SemIR::BuiltinFunctionKind::IntLeftShift) {
- if (!lhs_bit_width_id.has_value() && !lhs_val.isZero()) {
- // Ensure we don't generate a ridiculously large integer through a bit
- // shift.
- auto width = rhs_orig_val.trySExtValue();
- if (!width ||
- *width > IntStore::MaxIntWidth - lhs_val.getSignificantBits()) {
- CARBON_DIAGNOSTIC(CompileTimeUnsizedShiftOutOfRange, Error,
- "shift distance of {0} would result in an "
- "integer whose width is greater than the "
- "maximum supported width of {1}",
- TypedInt, int);
- context.emitter().Emit(loc_id, CompileTimeUnsizedShiftOutOfRange,
- {.type = rhs.type_id, .value = rhs_orig_val},
- IntStore::MaxIntWidth);
- return SemIR::ErrorInst::ConstantId;
- }
- lhs_val = lhs_val.sext(
- IntStore::CanonicalBitWidth(lhs_val.getSignificantBits() + *width));
- }
- result_val =
- lhs_val.shl(rhs_orig_val.getLimitedValue(lhs_val.getBitWidth()));
- } else if (lhs_is_signed) {
- result_val =
- lhs_val.ashr(rhs_orig_val.getLimitedValue(lhs_val.getBitWidth()));
- } else {
- CARBON_CHECK(lhs_bit_width_id.has_value(), "Logical shift on unsized int");
- result_val =
- lhs_val.lshr(rhs_orig_val.getLimitedValue(lhs_val.getBitWidth()));
- }
- return MakeIntResult(context, lhs.type_id, lhs_is_signed,
- std::move(result_val));
- }
- // Performs a homogeneous builtin binary integer -> integer operation.
- static auto PerformBuiltinBinaryIntOp(Context& context, SemIR::LocId loc_id,
- SemIR::BuiltinFunctionKind builtin_kind,
- SemIR::InstId lhs_id,
- SemIR::InstId rhs_id)
- -> SemIR::ConstantId {
- auto lhs = context.insts().GetAs<SemIR::IntValue>(lhs_id);
- auto rhs = context.insts().GetAs<SemIR::IntValue>(rhs_id);
- CARBON_CHECK(rhs.type_id == lhs.type_id, "Heterogeneous builtin integer op!");
- auto type_id = lhs.type_id;
- auto [is_signed, bit_width_id] =
- context.sem_ir().types().GetIntTypeInfo(type_id);
- auto [lhs_val, rhs_val] =
- GetIntsAtSuitableWidth(context, lhs.int_id, rhs.int_id, bit_width_id);
- // Check for division by zero.
- switch (builtin_kind) {
- case SemIR::BuiltinFunctionKind::IntSDiv:
- case SemIR::BuiltinFunctionKind::IntSMod:
- case SemIR::BuiltinFunctionKind::IntUDiv:
- case SemIR::BuiltinFunctionKind::IntUMod:
- if (rhs_val.isZero()) {
- DiagnoseDivisionByZero(context, loc_id);
- return SemIR::ErrorInst::ConstantId;
- }
- break;
- default:
- break;
- }
- BinaryIntOpResult result =
- ComputeBinaryIntOpResult(builtin_kind, lhs_val, rhs_val);
- if (result.overflow && !bit_width_id.has_value()) {
- // Retry with a larger bit width. Most operations can only overflow by one
- // bit, but signed n-bit multiplication can overflow to 2n-1 bits. We don't
- // need to handle unsigned multiplication here because it's not permitted
- // for unsized integers.
- //
- // Note that we speculatively first perform the calculation in the width of
- // the wider operand: smaller operations are faster and overflow to a wider
- // integer is unlikely to be needed, especially given that the width will
- // have been rounded up to a multiple of 64 bits by the int store.
- CARBON_CHECK(builtin_kind != SemIR::BuiltinFunctionKind::IntUMul,
- "Unsigned arithmetic requires a fixed bitwidth");
- int new_width =
- builtin_kind == SemIR::BuiltinFunctionKind::IntSMul
- ? lhs_val.getBitWidth() * 2
- : IntStore::CanonicalBitWidth(lhs_val.getBitWidth() + 1);
- new_width = std::min(new_width, IntStore::MaxIntWidth);
- lhs_val = context.ints().GetAtWidth(lhs.int_id, new_width);
- rhs_val = context.ints().GetAtWidth(rhs.int_id, new_width);
- // Note that this can in theory still overflow if we limited `new_width` to
- // `MaxIntWidth`. In that case we fall through to the signed overflow
- // diagnostic below.
- result = ComputeBinaryIntOpResult(builtin_kind, lhs_val, rhs_val);
- CARBON_CHECK(!result.overflow || new_width == IntStore::MaxIntWidth);
- }
- if (result.overflow) {
- CARBON_DIAGNOSTIC(CompileTimeIntegerOverflow, Error,
- "integer overflow in calculation `{0} {1} {2}`", TypedInt,
- Lex::TokenKind, TypedInt);
- context.emitter().Emit(loc_id, CompileTimeIntegerOverflow,
- {.type = type_id, .value = lhs_val}, result.op_token,
- {.type = type_id, .value = rhs_val});
- }
- return MakeIntResult(context, type_id, is_signed,
- std::move(result.result_val));
- }
- // Performs a builtin integer comparison.
- static auto PerformBuiltinIntComparison(Context& context,
- SemIR::BuiltinFunctionKind builtin_kind,
- SemIR::InstId lhs_id,
- SemIR::InstId rhs_id,
- SemIR::TypeId bool_type_id)
- -> SemIR::ConstantId {
- auto lhs = context.insts().GetAs<SemIR::IntValue>(lhs_id);
- auto rhs = context.insts().GetAs<SemIR::IntValue>(rhs_id);
- llvm::APInt lhs_val = context.ints().Get(lhs.int_id);
- llvm::APInt rhs_val = context.ints().Get(rhs.int_id);
- bool result;
- switch (builtin_kind) {
- case SemIR::BuiltinFunctionKind::IntEq:
- result = (lhs_val == rhs_val);
- break;
- case SemIR::BuiltinFunctionKind::IntNeq:
- result = (lhs_val != rhs_val);
- break;
- case SemIR::BuiltinFunctionKind::IntLess:
- result = lhs_val.slt(rhs_val);
- break;
- case SemIR::BuiltinFunctionKind::IntLessEq:
- result = lhs_val.sle(rhs_val);
- break;
- case SemIR::BuiltinFunctionKind::IntGreater:
- result = lhs_val.sgt(rhs_val);
- break;
- case SemIR::BuiltinFunctionKind::IntGreaterEq:
- result = lhs_val.sge(rhs_val);
- break;
- default:
- CARBON_FATAL("Unexpected operation kind.");
- }
- return MakeBoolResult(context, bool_type_id, result);
- }
- // Performs a builtin unary float -> float operation.
- static auto PerformBuiltinUnaryFloatOp(Context& context,
- SemIR::BuiltinFunctionKind builtin_kind,
- SemIR::InstId arg_id)
- -> SemIR::ConstantId {
- auto op = context.insts().GetAs<SemIR::FloatValue>(arg_id);
- auto op_val = context.floats().Get(op.float_id);
- switch (builtin_kind) {
- case SemIR::BuiltinFunctionKind::FloatNegate:
- op_val.changeSign();
- break;
- default:
- CARBON_FATAL("Unexpected builtin kind");
- }
- return MakeFloatResult(context, op.type_id, std::move(op_val));
- }
- // Performs a builtin binary float -> float operation.
- static auto PerformBuiltinBinaryFloatOp(Context& context,
- SemIR::BuiltinFunctionKind builtin_kind,
- SemIR::InstId lhs_id,
- SemIR::InstId rhs_id)
- -> SemIR::ConstantId {
- auto lhs = context.insts().GetAs<SemIR::FloatValue>(lhs_id);
- auto rhs = context.insts().GetAs<SemIR::FloatValue>(rhs_id);
- auto lhs_val = context.floats().Get(lhs.float_id);
- auto rhs_val = context.floats().Get(rhs.float_id);
- llvm::APFloat result_val(lhs_val.getSemantics());
- switch (builtin_kind) {
- case SemIR::BuiltinFunctionKind::FloatAdd:
- result_val = lhs_val + rhs_val;
- break;
- case SemIR::BuiltinFunctionKind::FloatSub:
- result_val = lhs_val - rhs_val;
- break;
- case SemIR::BuiltinFunctionKind::FloatMul:
- result_val = lhs_val * rhs_val;
- break;
- case SemIR::BuiltinFunctionKind::FloatDiv:
- result_val = lhs_val / rhs_val;
- break;
- default:
- CARBON_FATAL("Unexpected operation kind.");
- }
- return MakeFloatResult(context, lhs.type_id, std::move(result_val));
- }
- // Performs a builtin float comparison.
- static auto PerformBuiltinFloatComparison(
- Context& context, SemIR::BuiltinFunctionKind builtin_kind,
- SemIR::InstId lhs_id, SemIR::InstId rhs_id, SemIR::TypeId bool_type_id)
- -> SemIR::ConstantId {
- auto lhs = context.insts().GetAs<SemIR::FloatValue>(lhs_id);
- auto rhs = context.insts().GetAs<SemIR::FloatValue>(rhs_id);
- const auto& lhs_val = context.floats().Get(lhs.float_id);
- const auto& rhs_val = context.floats().Get(rhs.float_id);
- bool result;
- switch (builtin_kind) {
- case SemIR::BuiltinFunctionKind::FloatEq:
- result = (lhs_val == rhs_val);
- break;
- case SemIR::BuiltinFunctionKind::FloatNeq:
- result = (lhs_val != rhs_val);
- break;
- case SemIR::BuiltinFunctionKind::FloatLess:
- result = lhs_val < rhs_val;
- break;
- case SemIR::BuiltinFunctionKind::FloatLessEq:
- result = lhs_val <= rhs_val;
- break;
- case SemIR::BuiltinFunctionKind::FloatGreater:
- result = lhs_val > rhs_val;
- break;
- case SemIR::BuiltinFunctionKind::FloatGreaterEq:
- result = lhs_val >= rhs_val;
- break;
- default:
- CARBON_FATAL("Unexpected operation kind.");
- }
- return MakeBoolResult(context, bool_type_id, result);
- }
- // Performs a builtin boolean comparison.
- static auto PerformBuiltinBoolComparison(
- Context& context, SemIR::BuiltinFunctionKind builtin_kind,
- SemIR::InstId lhs_id, SemIR::InstId rhs_id, SemIR::TypeId bool_type_id) {
- bool lhs = context.insts().GetAs<SemIR::BoolLiteral>(lhs_id).value.ToBool();
- bool rhs = context.insts().GetAs<SemIR::BoolLiteral>(rhs_id).value.ToBool();
- return MakeBoolResult(context, bool_type_id,
- builtin_kind == SemIR::BuiltinFunctionKind::BoolEq
- ? lhs == rhs
- : lhs != rhs);
- }
- // Returns a constant for a call to a builtin function.
- static auto MakeConstantForBuiltinCall(EvalContext& eval_context,
- SemIR::LocId loc_id, SemIR::Call call,
- SemIR::BuiltinFunctionKind builtin_kind,
- llvm::ArrayRef<SemIR::InstId> arg_ids,
- Phase phase) -> SemIR::ConstantId {
- auto& context = eval_context.context();
- switch (builtin_kind) {
- case SemIR::BuiltinFunctionKind::None:
- CARBON_FATAL("Not a builtin function.");
- case SemIR::BuiltinFunctionKind::NoOp: {
- // Return an empty tuple value.
- auto type_id = GetTupleType(eval_context.context(), {});
- return MakeConstantResult(
- eval_context.context(),
- SemIR::TupleValue{.type_id = type_id,
- .elements_id = SemIR::InstBlockId::Empty},
- phase);
- }
- case SemIR::BuiltinFunctionKind::PrimitiveCopy: {
- return context.constant_values().Get(arg_ids[0]);
- }
- case SemIR::BuiltinFunctionKind::PrintChar:
- case SemIR::BuiltinFunctionKind::PrintInt:
- case SemIR::BuiltinFunctionKind::ReadChar:
- case SemIR::BuiltinFunctionKind::FloatAddAssign:
- case SemIR::BuiltinFunctionKind::FloatSubAssign:
- case SemIR::BuiltinFunctionKind::FloatMulAssign:
- case SemIR::BuiltinFunctionKind::FloatDivAssign:
- case SemIR::BuiltinFunctionKind::IntSAddAssign:
- case SemIR::BuiltinFunctionKind::IntSSubAssign:
- case SemIR::BuiltinFunctionKind::IntSMulAssign:
- case SemIR::BuiltinFunctionKind::IntSDivAssign:
- case SemIR::BuiltinFunctionKind::IntSModAssign:
- case SemIR::BuiltinFunctionKind::IntUAddAssign:
- case SemIR::BuiltinFunctionKind::IntUSubAssign:
- case SemIR::BuiltinFunctionKind::IntUMulAssign:
- case SemIR::BuiltinFunctionKind::IntUDivAssign:
- case SemIR::BuiltinFunctionKind::IntUModAssign:
- case SemIR::BuiltinFunctionKind::IntAndAssign:
- case SemIR::BuiltinFunctionKind::IntOrAssign:
- case SemIR::BuiltinFunctionKind::IntXorAssign:
- case SemIR::BuiltinFunctionKind::IntLeftShiftAssign:
- case SemIR::BuiltinFunctionKind::IntRightShiftAssign: {
- // These are runtime-only builtins.
- // TODO: Consider tracking this on the `BuiltinFunctionKind`.
- return SemIR::ConstantId::NotConstant;
- }
- case SemIR::BuiltinFunctionKind::TypeAnd: {
- CARBON_CHECK(arg_ids.size() == 2);
- auto lhs_facet_type_id = SemIR::FacetTypeId::None;
- auto rhs_facet_type_id = SemIR::FacetTypeId::None;
- for (auto [facet_type_id, type_arg_id] :
- llvm::zip(std::to_array({&lhs_facet_type_id, &rhs_facet_type_id}),
- context.types().GetBlockAsTypeInstIds(arg_ids))) {
- if (auto facet_type =
- context.insts().TryGetAs<SemIR::FacetType>(type_arg_id)) {
- *facet_type_id = facet_type->facet_type_id;
- } else {
- CARBON_DIAGNOSTIC(FacetTypeRequiredForTypeAndOperator, Error,
- "non-facet type {0} combined with `&` operator",
- SemIR::TypeId);
- // TODO: Find a location for the lhs or rhs specifically, instead of
- // the whole thing. If that's not possible we can change the text to
- // say if it's referring to the left or the right side for the error.
- // The `arg_id` instruction has no location in it for some reason.
- context.emitter().Emit(
- loc_id, FacetTypeRequiredForTypeAndOperator,
- context.types().GetTypeIdForTypeInstId(type_arg_id));
- }
- }
- // Allow errors to be diagnosed for both sides of the operator before
- // returning here if any error occurred on either side.
- if (!lhs_facet_type_id.has_value() || !rhs_facet_type_id.has_value()) {
- return SemIR::ErrorInst::ConstantId;
- }
- // Reuse one of the argument instructions if nothing has changed.
- if (lhs_facet_type_id == rhs_facet_type_id) {
- return context.types().GetConstantId(
- context.types().GetTypeIdForTypeInstId(arg_ids[0]));
- }
- auto combined_info = SemIR::FacetTypeInfo::Combine(
- context.facet_types().Get(lhs_facet_type_id),
- context.facet_types().Get(rhs_facet_type_id));
- if (!ResolveFacetTypeRewriteConstraints(
- eval_context.context(), loc_id,
- combined_info.rewrite_constraints)) {
- phase = Phase::UnknownDueToError;
- }
- combined_info.Canonicalize();
- return MakeFacetTypeResult(eval_context.context(), combined_info, phase);
- }
- case SemIR::BuiltinFunctionKind::CharLiteralMakeType: {
- return context.constant_values().Get(SemIR::CharLiteralType::TypeInstId);
- }
- case SemIR::BuiltinFunctionKind::FloatLiteralMakeType: {
- return context.constant_values().Get(SemIR::FloatLiteralType::TypeInstId);
- }
- case SemIR::BuiltinFunctionKind::IntLiteralMakeType: {
- return context.constant_values().Get(SemIR::IntLiteralType::TypeInstId);
- }
- case SemIR::BuiltinFunctionKind::IntMakeTypeSigned: {
- return MakeIntTypeResult(context, loc_id, SemIR::IntKind::Signed,
- arg_ids[0], phase);
- }
- case SemIR::BuiltinFunctionKind::IntMakeTypeUnsigned: {
- return MakeIntTypeResult(context, loc_id, SemIR::IntKind::Unsigned,
- arg_ids[0], phase);
- }
- case SemIR::BuiltinFunctionKind::FloatMakeType: {
- return MakeFloatTypeResult(context, loc_id, arg_ids[0], phase);
- }
- case SemIR::BuiltinFunctionKind::BoolMakeType: {
- return context.constant_values().Get(SemIR::BoolType::TypeInstId);
- }
- case SemIR::BuiltinFunctionKind::MaybeUnformedMakeType: {
- return MakeConstantResult(
- context,
- SemIR::MaybeUnformedType{
- .type_id = SemIR::TypeType::TypeId,
- .inner_id = context.types().GetAsTypeInstId(arg_ids[0])},
- phase);
- }
- // Character conversions.
- case SemIR::BuiltinFunctionKind::CharConvertChecked: {
- if (phase != Phase::Concrete) {
- return MakeConstantResult(context, call, phase);
- }
- return PerformCheckedCharConvert(context, loc_id, arg_ids[0],
- call.type_id);
- }
- // Integer conversions.
- case SemIR::BuiltinFunctionKind::IntConvert: {
- if (phase != Phase::Concrete) {
- return MakeConstantResult(context, call, phase);
- }
- return PerformIntConvert(context, arg_ids[0], call.type_id);
- }
- case SemIR::BuiltinFunctionKind::IntConvertChecked: {
- if (phase != Phase::Concrete) {
- return MakeConstantResult(context, call, phase);
- }
- return PerformCheckedIntConvert(context, loc_id, arg_ids[0],
- call.type_id);
- }
- // Unary integer -> integer operations.
- case SemIR::BuiltinFunctionKind::IntSNegate:
- case SemIR::BuiltinFunctionKind::IntUNegate:
- case SemIR::BuiltinFunctionKind::IntComplement: {
- if (phase != Phase::Concrete) {
- break;
- }
- return PerformBuiltinUnaryIntOp(context, loc_id, builtin_kind,
- arg_ids[0]);
- }
- // Homogeneous binary integer -> integer operations.
- case SemIR::BuiltinFunctionKind::IntSAdd:
- case SemIR::BuiltinFunctionKind::IntSSub:
- case SemIR::BuiltinFunctionKind::IntSMul:
- case SemIR::BuiltinFunctionKind::IntSDiv:
- case SemIR::BuiltinFunctionKind::IntSMod:
- case SemIR::BuiltinFunctionKind::IntUAdd:
- case SemIR::BuiltinFunctionKind::IntUSub:
- case SemIR::BuiltinFunctionKind::IntUMul:
- case SemIR::BuiltinFunctionKind::IntUDiv:
- case SemIR::BuiltinFunctionKind::IntUMod:
- case SemIR::BuiltinFunctionKind::IntAnd:
- case SemIR::BuiltinFunctionKind::IntOr:
- case SemIR::BuiltinFunctionKind::IntXor: {
- if (phase != Phase::Concrete) {
- break;
- }
- return PerformBuiltinBinaryIntOp(context, loc_id, builtin_kind,
- arg_ids[0], arg_ids[1]);
- }
- // Bit shift operations.
- case SemIR::BuiltinFunctionKind::IntLeftShift:
- case SemIR::BuiltinFunctionKind::IntRightShift: {
- if (phase != Phase::Concrete) {
- break;
- }
- return PerformBuiltinIntShiftOp(context, loc_id, builtin_kind, arg_ids[0],
- arg_ids[1]);
- }
- // Integer comparisons.
- case SemIR::BuiltinFunctionKind::IntEq:
- case SemIR::BuiltinFunctionKind::IntNeq:
- case SemIR::BuiltinFunctionKind::IntLess:
- case SemIR::BuiltinFunctionKind::IntLessEq:
- case SemIR::BuiltinFunctionKind::IntGreater:
- case SemIR::BuiltinFunctionKind::IntGreaterEq: {
- if (phase != Phase::Concrete) {
- break;
- }
- return PerformBuiltinIntComparison(context, builtin_kind, arg_ids[0],
- arg_ids[1], call.type_id);
- }
- // Floating-point conversions.
- case SemIR::BuiltinFunctionKind::FloatConvertChecked: {
- if (phase != Phase::Concrete) {
- return MakeConstantResult(context, call, phase);
- }
- return PerformCheckedFloatConvert(context, loc_id, arg_ids[0],
- call.type_id);
- }
- // Unary float -> float operations.
- case SemIR::BuiltinFunctionKind::FloatNegate: {
- if (phase != Phase::Concrete) {
- break;
- }
- return PerformBuiltinUnaryFloatOp(context, builtin_kind, arg_ids[0]);
- }
- // Binary float -> float operations.
- case SemIR::BuiltinFunctionKind::FloatAdd:
- case SemIR::BuiltinFunctionKind::FloatSub:
- case SemIR::BuiltinFunctionKind::FloatMul:
- case SemIR::BuiltinFunctionKind::FloatDiv: {
- if (phase != Phase::Concrete) {
- break;
- }
- return PerformBuiltinBinaryFloatOp(context, builtin_kind, arg_ids[0],
- arg_ids[1]);
- }
- // Float comparisons.
- case SemIR::BuiltinFunctionKind::FloatEq:
- case SemIR::BuiltinFunctionKind::FloatNeq:
- case SemIR::BuiltinFunctionKind::FloatLess:
- case SemIR::BuiltinFunctionKind::FloatLessEq:
- case SemIR::BuiltinFunctionKind::FloatGreater:
- case SemIR::BuiltinFunctionKind::FloatGreaterEq: {
- if (phase != Phase::Concrete) {
- break;
- }
- return PerformBuiltinFloatComparison(context, builtin_kind, arg_ids[0],
- arg_ids[1], call.type_id);
- }
- // Bool comparisons.
- case SemIR::BuiltinFunctionKind::BoolEq:
- case SemIR::BuiltinFunctionKind::BoolNeq: {
- if (phase != Phase::Concrete) {
- break;
- }
- return PerformBuiltinBoolComparison(context, builtin_kind, arg_ids[0],
- arg_ids[1], call.type_id);
- }
- }
- return SemIR::ConstantId::NotConstant;
- }
- // Makes a constant for a call instruction.
- static auto MakeConstantForCall(EvalContext& eval_context,
- SemIR::InstId inst_id, SemIR::Call call)
- -> SemIR::ConstantId {
- Phase phase = Phase::Concrete;
- // A call with an invalid argument list is used to represent an erroneous
- // call.
- //
- // TODO: Use a better representation for this.
- if (call.args_id == SemIR::InstBlockId::None) {
- return SemIR::ErrorInst::ConstantId;
- }
- // Find the constant value of the callee.
- bool has_constant_callee = ReplaceFieldWithConstantValue(
- eval_context, &call, &SemIR::Call::callee_id, &phase);
- auto callee_function =
- SemIR::GetCalleeFunction(eval_context.sem_ir(), call.callee_id);
- auto builtin_kind = SemIR::BuiltinFunctionKind::None;
- if (callee_function.function_id.has_value()) {
- // Calls to builtins might be constant.
- builtin_kind = eval_context.functions()
- .Get(callee_function.function_id)
- .builtin_function_kind();
- if (builtin_kind == SemIR::BuiltinFunctionKind::None) {
- // TODO: Eventually we'll want to treat some kinds of non-builtin
- // functions as producing constants.
- return SemIR::ConstantId::NotConstant;
- }
- } else {
- // Calls to non-functions, such as calls to generic entity names, might be
- // constant.
- }
- // Find the argument values and the return type.
- bool has_constant_operands =
- has_constant_callee &&
- ReplaceTypeWithConstantValue(eval_context, inst_id, &call, &phase) &&
- ReplaceFieldWithConstantValue(eval_context, &call, &SemIR::Call::args_id,
- &phase);
- if (phase == Phase::UnknownDueToError) {
- return SemIR::ErrorInst::ConstantId;
- }
- // If any operand of the call is non-constant, the call is non-constant.
- // TODO: Some builtin calls might allow some operands to be non-constant.
- if (!has_constant_operands) {
- if (builtin_kind.IsCompTimeOnly(
- eval_context.sem_ir(), eval_context.inst_blocks().Get(call.args_id),
- call.type_id)) {
- CARBON_DIAGNOSTIC(NonConstantCallToCompTimeOnlyFunction, Error,
- "non-constant call to compile-time-only function");
- CARBON_DIAGNOSTIC(CompTimeOnlyFunctionHere, Note,
- "compile-time-only function declared here");
- eval_context.emitter()
- .Build(inst_id, NonConstantCallToCompTimeOnlyFunction)
- .Note(eval_context.functions()
- .Get(callee_function.function_id)
- .latest_decl_id(),
- CompTimeOnlyFunctionHere)
- .Emit();
- }
- return SemIR::ConstantId::NotConstant;
- }
- // Handle calls to builtins.
- if (builtin_kind != SemIR::BuiltinFunctionKind::None) {
- return MakeConstantForBuiltinCall(
- eval_context, SemIR::LocId(inst_id), call, builtin_kind,
- eval_context.inst_blocks().Get(call.args_id), phase);
- }
- return SemIR::ConstantId::NotConstant;
- }
- // Given an instruction, compute its phase based on its operands.
- static auto ComputeInstPhase(Context& context, SemIR::Inst inst) -> Phase {
- EvalContext eval_context(&context, SemIR::LocId::None);
- auto phase = GetPhase(context.constant_values(),
- context.types().GetConstantId(inst.type_id()));
- GetConstantValueForArg(eval_context, inst.arg0_and_kind(), &phase);
- GetConstantValueForArg(eval_context, inst.arg1_and_kind(), &phase);
- CARBON_CHECK(IsConstantOrError(phase));
- return phase;
- }
- // Convert a ConstantEvalResult to a ConstantId. Factored out of
- // TryEvalTypedInst to avoid repeated instantiation of common code.
- static auto ConvertEvalResultToConstantId(Context& context,
- ConstantEvalResult result,
- Phase orig_phase)
- -> SemIR::ConstantId {
- if (result.is_new()) {
- return MakeConstantResult(
- context, result.new_inst(),
- result.same_phase_as_inst()
- ? orig_phase
- : ComputeInstPhase(context, result.new_inst()));
- }
- return result.existing();
- }
- // Evaluates an instruction of a known type in an evaluation context. The
- // default behavior of this function depends on the constant kind of the
- // instruction:
- //
- // - InstConstantKind::Never: returns ConstantId::NotConstant.
- // - InstConstantKind::Indirect, SymbolicOnly, SymbolicOrReference,
- // Conditional: evaluates all the operands of the instruction, and calls
- // `EvalConstantInst` to evaluate the resulting constant instruction.
- // - InstConstantKind::WheneverPossible, Always: evaluates all the operands of
- // the instruction, and produces the resulting constant instruction as the
- // result.
- // - InstConstantKind::Unique: returns the `inst_id` as the resulting
- // constant.
- //
- // Returns an error constant ID if any of the nested evaluations fail, and
- // returns NotConstant if any of the nested evaluations is non-constant.
- //
- // This template is explicitly specialized for instructions that need special
- // handling.
- template <typename InstT>
- static auto TryEvalTypedInst(EvalContext& eval_context, SemIR::InstId inst_id,
- SemIR::Inst inst) -> SemIR::ConstantId {
- constexpr auto ConstantKind = InstT::Kind.constant_kind();
- if constexpr (ConstantKind == SemIR::InstConstantKind::Never) {
- return SemIR::ConstantId::NotConstant;
- } else if constexpr (ConstantKind == SemIR::InstConstantKind::AlwaysUnique) {
- CARBON_CHECK(inst_id.has_value());
- return SemIR::ConstantId::ForConcreteConstant(inst_id);
- } else {
- // Build a constant instruction by replacing each non-constant operand with
- // its constant value.
- Phase phase = Phase::Concrete;
- if (!ReplaceTypeWithConstantValue(eval_context, inst_id, &inst, &phase) ||
- !ReplaceAllFieldsWithConstantValues(eval_context, &inst, &phase)) {
- if constexpr (ConstantKind == SemIR::InstConstantKind::Always) {
- CARBON_FATAL("{0} should always be constant", InstT::Kind);
- }
- return SemIR::ConstantId::NotConstant;
- }
- // If any operand of the instruction has an error in it, the instruction
- // itself evaluates to an error.
- if (phase == Phase::UnknownDueToError) {
- return SemIR::ErrorInst::ConstantId;
- }
- // When canonicalizing a SpecificId, we defer resolving the specific's
- // declaration until here, to avoid resolving declarations from imported
- // specifics. (Imported instructions are not evaluated.)
- ResolveSpecificDeclForInst(eval_context, inst);
- if constexpr (ConstantKind == SemIR::InstConstantKind::Always ||
- ConstantKind == SemIR::InstConstantKind::WheneverPossible) {
- return MakeConstantResult(eval_context.context(), inst, phase);
- } else if constexpr (ConstantKind == SemIR::InstConstantKind::InstAction) {
- auto result_inst_id = PerformDelayedAction(
- eval_context.context(), SemIR::LocId(inst_id), inst.As<InstT>());
- if (result_inst_id.has_value()) {
- // The result is an instruction.
- return MakeConstantResult(
- eval_context.context(),
- SemIR::InstValue{.type_id = SemIR::InstType::TypeId,
- .inst_id = result_inst_id},
- Phase::Concrete);
- }
- // Couldn't perform the action because it's still dependent.
- return MakeConstantResult(eval_context.context(), inst,
- Phase::TemplateSymbolic);
- } else if constexpr (InstT::Kind.constant_needs_inst_id() !=
- SemIR::InstConstantNeedsInstIdKind::No) {
- CARBON_CHECK(inst_id.has_value());
- return ConvertEvalResultToConstantId(
- eval_context.context(),
- EvalConstantInst(eval_context.context(), inst_id, inst.As<InstT>()),
- phase);
- } else {
- return ConvertEvalResultToConstantId(
- eval_context.context(),
- EvalConstantInst(eval_context.context(), inst.As<InstT>()), phase);
- }
- }
- }
- // Specialize evaluation for array indexing because we want to check the index
- // expression even if the array expression is non-constant.
- template <>
- auto TryEvalTypedInst<SemIR::ArrayIndex>(EvalContext& eval_context,
- SemIR::InstId /*inst_id*/,
- SemIR::Inst inst)
- -> SemIR::ConstantId {
- return PerformArrayIndex(eval_context, inst.As<SemIR::ArrayIndex>());
- }
- // Specialize evaluation for function calls because we want to check the callee
- // expression even if an argument expression is non-constant, and because we
- // will eventually want to perform control flow handling here.
- template <>
- auto TryEvalTypedInst<SemIR::Call>(EvalContext& eval_context,
- SemIR::InstId inst_id, SemIR::Inst inst)
- -> SemIR::ConstantId {
- return MakeConstantForCall(eval_context, inst_id, inst.As<SemIR::Call>());
- }
- // ImportRefLoaded can have a constant value, but it's owned and maintained by
- // `import_ref.cpp`, not by us.
- // TODO: Rearrange how `ImportRefLoaded` instructions are created so we never
- // call this.
- template <>
- auto TryEvalTypedInst<SemIR::ImportRefLoaded>(EvalContext& /*eval_context*/,
- SemIR::InstId /*inst_id*/,
- SemIR::Inst /*inst*/)
- -> SemIR::ConstantId {
- return SemIR::ConstantId::NotConstant;
- }
- // Symbolic bindings are a special case because they can reach into the eval
- // context and produce a context-specific value.
- template <>
- auto TryEvalTypedInst<SemIR::BindSymbolicName>(EvalContext& eval_context,
- SemIR::InstId inst_id,
- SemIR::Inst inst)
- -> SemIR::ConstantId {
- auto bind = inst.As<SemIR::BindSymbolicName>();
- // If we know which specific we're evaluating within and this is an argument
- // of that specific, its constant value is the corresponding argument value.
- const auto& bind_name = eval_context.entity_names().Get(bind.entity_name_id);
- if (bind_name.bind_index().has_value()) {
- if (auto value =
- eval_context.GetCompileTimeBindValue(bind_name.bind_index());
- value.has_value()) {
- return value;
- }
- }
- // The constant form of a symbolic binding is an idealized form of the
- // original, with no equivalent value.
- Phase phase = Phase::Concrete;
- bind.value_id = SemIR::InstId::None;
- if (!ReplaceTypeWithConstantValue(eval_context, inst_id, &bind, &phase) ||
- !ReplaceFieldWithConstantValue(eval_context, &bind,
- &SemIR::BindSymbolicName::entity_name_id,
- &phase)) {
- return SemIR::ConstantId::NotConstant;
- }
- // This correctly handles `Phase::UnknownDueToError`.
- return MakeConstantResult(eval_context.context(), bind, phase);
- }
- // Returns whether `const_id` is the same constant facet value as
- // `facet_value_inst_id`.
- static auto IsSameFacetValue(Context& context, SemIR::ConstantId const_id,
- SemIR::InstId facet_value_inst_id) -> bool {
- if (auto facet_access_type = context.insts().TryGetAs<SemIR::FacetAccessType>(
- context.constant_values().GetInstId(const_id))) {
- const_id =
- context.constant_values().Get(facet_access_type->facet_value_inst_id);
- }
- return const_id == context.constant_values().Get(facet_value_inst_id);
- }
- // TODO: Convert this to an EvalConstantInst function. This will require
- // providing a `GetConstantValue` overload for a requirement block.
- template <>
- auto TryEvalTypedInst<SemIR::WhereExpr>(EvalContext& eval_context,
- SemIR::InstId inst_id, SemIR::Inst inst)
- -> SemIR::ConstantId {
- auto typed_inst = inst.As<SemIR::WhereExpr>();
- Phase phase = Phase::Concrete;
- SemIR::FacetTypeInfo info = {.other_requirements = false};
- // Add the constraints from the `WhereExpr` instruction into `info`.
- if (typed_inst.requirements_id.has_value()) {
- auto insts = eval_context.inst_blocks().Get(typed_inst.requirements_id);
- for (auto inst_id : insts) {
- if (auto base =
- eval_context.insts().TryGetAs<SemIR::RequirementBaseFacetType>(
- inst_id)) {
- if (base->base_type_inst_id == SemIR::ErrorInst::TypeInstId) {
- return SemIR::ErrorInst::ConstantId;
- }
- if (auto base_facet_type =
- eval_context.insts().TryGetAs<SemIR::FacetType>(
- base->base_type_inst_id)) {
- const auto& base_info =
- eval_context.facet_types().Get(base_facet_type->facet_type_id);
- info.extend_constraints.append(base_info.extend_constraints);
- info.self_impls_constraints.append(base_info.self_impls_constraints);
- info.rewrite_constraints.append(base_info.rewrite_constraints);
- info.other_requirements |= base_info.other_requirements;
- }
- } else if (auto rewrite =
- eval_context.insts().TryGetAs<SemIR::RequirementRewrite>(
- inst_id)) {
- info.rewrite_constraints.push_back(
- {.lhs_id = rewrite->lhs_id, .rhs_id = rewrite->rhs_id});
- } else if (auto impls =
- eval_context.insts().TryGetAs<SemIR::RequirementImpls>(
- inst_id)) {
- SemIR::ConstantId lhs_const_id =
- eval_context.GetConstantValue(impls->lhs_id);
- SemIR::ConstantId rhs_const_id =
- eval_context.GetConstantValue(impls->rhs_id);
- if (IsSameFacetValue(eval_context.context(), lhs_const_id,
- typed_inst.period_self_id)) {
- auto rhs_inst_id =
- eval_context.constant_values().GetInstId(rhs_const_id);
- if (rhs_inst_id == SemIR::ErrorInst::InstId) {
- // `.Self impls <error>`.
- return SemIR::ErrorInst::ConstantId;
- } else if (rhs_inst_id == SemIR::TypeType::TypeInstId) {
- // `.Self impls type` -> nothing to do.
- } else {
- auto facet_type = eval_context.insts().GetAs<SemIR::FacetType>(
- RequireConstantValue(eval_context, impls->rhs_id, &phase));
- const auto& more_info =
- eval_context.facet_types().Get(facet_type.facet_type_id);
- // The way to prevent lookup into the interface requirements of a
- // facet type is to put it to the right of a `.Self impls`, which we
- // accomplish by putting them into `self_impls_constraints`.
- llvm::append_range(info.self_impls_constraints,
- more_info.extend_constraints);
- llvm::append_range(info.self_impls_constraints,
- more_info.self_impls_constraints);
- // Other requirements are copied in.
- llvm::append_range(info.rewrite_constraints,
- more_info.rewrite_constraints);
- info.other_requirements |= more_info.other_requirements;
- }
- } else {
- // TODO: Handle `impls` constraints beyond `.Self impls`.
- info.other_requirements = true;
- }
- } else {
- // TODO: Handle other requirements
- info.other_requirements = true;
- }
- }
- }
- auto const_info = GetConstantFacetTypeInfo(
- eval_context, SemIR::LocId(inst_id), info, &phase);
- return MakeFacetTypeResult(eval_context.context(), const_info, phase);
- }
- // Implementation for `TryEvalInst`, wrapping `Context` with `EvalContext`.
- static auto TryEvalInstInContext(EvalContext& eval_context,
- SemIR::InstId inst_id, SemIR::Inst inst)
- -> SemIR::ConstantId {
- using EvalInstFn =
- auto(EvalContext & eval_context, SemIR::InstId inst_id, SemIR::Inst inst)
- ->SemIR::ConstantId;
- static constexpr EvalInstFn* EvalInstFns[] = {
- #define CARBON_SEM_IR_INST_KIND(Kind) &TryEvalTypedInst<SemIR::Kind>,
- #include "toolchain/sem_ir/inst_kind.def"
- };
- [[clang::musttail]] return EvalInstFns[inst.kind().AsInt()](eval_context,
- inst_id, inst);
- }
- auto TryEvalInstUnsafe(Context& context, SemIR::InstId inst_id,
- SemIR::Inst inst) -> SemIR::ConstantId {
- EvalContext eval_context(&context, SemIR::LocId(inst_id));
- return TryEvalInstInContext(eval_context, inst_id, inst);
- }
- auto TryEvalBlockForSpecific(Context& context, SemIR::LocId loc_id,
- SemIR::SpecificId specific_id,
- SemIR::GenericInstIndex::Region region)
- -> SemIR::InstBlockId {
- auto generic_id = context.specifics().Get(specific_id).generic_id;
- auto eval_block_id = context.generics().Get(generic_id).GetEvalBlock(region);
- auto eval_block = context.inst_blocks().Get(eval_block_id);
- llvm::SmallVector<SemIR::InstId> result;
- result.resize(eval_block.size(), SemIR::InstId::None);
- EvalContext eval_context(&context, loc_id, specific_id,
- SpecificEvalInfo{
- .region = region,
- .values = result,
- });
- Diagnostics::AnnotationScope annotate_diagnostics(
- &context.emitter(), [&](auto& builder) {
- CARBON_DIAGNOSTIC(ResolvingSpecificHere, Note, "in {0} used here",
- SemIR::SpecificId);
- builder.Note(loc_id, ResolvingSpecificHere, specific_id);
- });
- for (auto [i, inst_id] : llvm::enumerate(eval_block)) {
- auto const_id = TryEvalInstInContext(eval_context, inst_id,
- context.insts().Get(inst_id));
- result[i] = context.constant_values().GetInstId(const_id);
- CARBON_CHECK(result[i].has_value(), "Failed to evaluate {0} in eval block",
- context.insts().Get(inst_id));
- }
- return context.inst_blocks().Add(result);
- }
- } // namespace Carbon::Check
|