6502/millfork
1
0
Fork 0
mirror of https://github.com/KarolS/millfork.git synced 2024-06-12 06:29:34 +00:00
Code Issues Projects Releases Wiki Activity

All things mentioned in segment layouts should be considered used.

Browse Source
This commit is contained in:
Karol Stasiak 2020-09-29 22:49:15 +02:00
parent c7008f4414
commit 889a4f94be
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/main/scala/millfork/node/opt/UnusedFunctions.scala
View File

@ -65,8 +65,9 @@ object UnusedFunctions extends NodeOptimization {
case _ => None
}.toMap
val panicRequired = options.flags(CompilationFlag.CheckIndexOutOfBounds)
val entrypointNames = options.platform.bankLayouts.values.flatten.toSet + "main"
val allNormalFunctions = nodes.flatMap {
case v: FunctionDeclarationStatement => if (v.address.isDefined && v.statements.isDefined || v.interrupt || v.name == "main" || panicRequired && v.name == "_panic") Nil else List(v.name)
case v: FunctionDeclarationStatement => if (v.address.isDefined && v.statements.isDefined || v.interrupt || entrypointNames(v.name) || panicRequired && v.name == "_panic") Nil else List(v.name)
case _ => Nil
}.toSet
var allCalledFunctions = resolveAliases(aliases, getAllCalledFunctions(nodes).toSet)

3
src/main/scala/millfork/node/opt/UnusedGlobalVariables.scala
View File

@ -15,8 +15,9 @@ object UnusedGlobalVariables extends NodeOptimization {
case AliasDefinitionStatement(source, target, _) => Some(source -> target)
case _ => None
}.toMap
val entrypointNames = options.platform.bankLayouts.values.flatten.toSet
val allNonvolatileGlobalVariables = nodes.flatMap {
case v: VariableDeclarationStatement => if (v.address.isDefined || v.volatile || v.constant) Nil else List(v.name)
case v: VariableDeclarationStatement => if (v.address.isDefined || v.volatile || v.constant || entrypointNames(v.name)) Nil else List(v.name)
case v: ArrayDeclarationStatement => if (v.address.isDefined) Nil else List(v.name)
case _ => Nil
}.toSet