X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.scl.compiler%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Finternal%2Fcodegen%2Fanalysis%2FLoopAnalysis.java;h=34f6578e33e847619a4ed6c3c62c090d9f0d2399;hb=4bf8562ab7cbb3747f9c5844a07469291d43e905;hp=9d6a5645ac1b52cd8bff29da183ea7b9bdb30d35;hpb=969bd23cab98a79ca9101af33334000879fb60c5;p=simantics%2Fplatform.git diff --git a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/internal/codegen/analysis/LoopAnalysis.java b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/internal/codegen/analysis/LoopAnalysis.java index 9d6a5645a..34f6578e3 100644 --- a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/internal/codegen/analysis/LoopAnalysis.java +++ b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/internal/codegen/analysis/LoopAnalysis.java @@ -1,8 +1,7 @@ package org.simantics.scl.compiler.internal.codegen.analysis; -import gnu.trove.set.hash.THashSet; - import org.simantics.scl.compiler.common.names.Name; +import org.simantics.scl.compiler.common.names.Names; import org.simantics.scl.compiler.constants.SCLConstant; import org.simantics.scl.compiler.internal.codegen.references.Val; import org.simantics.scl.compiler.internal.codegen.references.ValRef; @@ -11,6 +10,8 @@ import org.simantics.scl.compiler.internal.codegen.ssa.SSAFunction; import org.simantics.scl.compiler.internal.codegen.ssa.binders.ValRefBinder; import org.simantics.scl.compiler.internal.codegen.ssa.statements.LetApply; +import gnu.trove.set.hash.THashSet; + public class LoopAnalysis { /** @@ -58,8 +59,6 @@ public class LoopAnalysis { return isLoopingBlockWithBreaker(apply.getParent(), breaker); } } - - private static final Name BUILD = Name.create("Prelude", "build"); private static boolean isAppliedAtMostOnce(LetApply apply, ValRef funRef, SSAFunction function) { ValRef applyFunctionRef = apply.getFunction(); @@ -70,7 +69,7 @@ public class LoopAnalysis { if(!(applyFunction instanceof SCLConstant)) return false; // Not necessarily the right answer Name name = ((SCLConstant)applyFunction).getName(); - if(name == BUILD) + if(name == Names.Prelude_build) return true; return false; }