package org.simantics.scl.compiler.internal.codegen.optimization;\r
\r
import org.simantics.scl.compiler.common.names.Name;\r
+import org.simantics.scl.compiler.common.names.Names;\r
import org.simantics.scl.compiler.constants.SCLConstant;\r
import org.simantics.scl.compiler.internal.codegen.analysis.StatementBrowser;\r
import org.simantics.scl.compiler.internal.codegen.references.BoundVar;\r
\r
public enum FoldlBuildFusion implements Optimization {\r
INSTANCE;\r
-\r
- private static final Name BUILD = Name.create("Prelude", "build");\r
\r
private static class Analysis extends StatementBrowser {\r
\r
Val buildFunction = buildApplication.getFunction().getBinding();\r
if(!(buildFunction instanceof SCLConstant))\r
return;\r
- if(((SCLConstant)buildFunction).getName() != BUILD)\r
+ if(((SCLConstant)buildFunction).getName() != Names.Prelude_build)\r
return;\r
}\r
\r