prog8/compiler/test/TestImportedModulesOrderAndOptions.kt

112 lines
3.4 KiB
Kotlin
Raw Normal View History

package prog8tests
import io.kotest.assertions.withClue
import io.kotest.core.spec.style.FunSpec
import io.kotest.matchers.shouldBe
import io.kotest.matchers.string.shouldStartWith
2022-03-10 22:08:41 +00:00
import prog8.code.core.ZeropageType
2022-03-21 00:01:21 +00:00
import prog8.code.core.internedStringsModuleName
2022-03-11 19:35:25 +00:00
import prog8.code.target.C64Target
2021-10-10 22:22:04 +00:00
import prog8.compiler.determineCompilationOptions
import prog8.compiler.parseImports
2021-10-29 14:46:56 +00:00
import prog8tests.helpers.ErrorReporterForTests
2021-10-10 22:22:04 +00:00
import prog8tests.helpers.compileText
2022-06-26 16:51:03 +00:00
import prog8tests.helpers.outputDir
class TestImportedModulesOrderAndOptions: FunSpec({
test("testImportedModuleOrderAndMainModuleCorrect") {
2022-03-11 19:35:25 +00:00
val result = compileText(
C64Target(), false, """
%import textio
%import floats
main {
sub start() {
; nothing
}
}
2022-03-07 20:41:12 +00:00
""")!!
result.program.toplevelModule.name shouldStartWith "on_the_fly_test"
2021-10-29 22:25:34 +00:00
val moduleNames = result.program.modules.map { it.name }
withClue("main module must be first") {
moduleNames[0] shouldStartWith "on_the_fly_test"
}
withClue("module order in parse tree") {
moduleNames.drop(1) shouldBe listOf(
2022-02-08 00:58:55 +00:00
internedStringsModuleName,
"textio",
"syslib",
"conv",
"floats",
"floats_functions",
"math",
"prog8_lib"
)
}
result.program.toplevelModule.name shouldStartWith "on_the_fly_test"
}
test("testCompilationOptionsCorrectFromMain") {
2022-03-11 19:35:25 +00:00
val result = compileText(
C64Target(), false, """
%import textio
%import floats
%zeropage dontuse
%option no_sysinit
main {
sub start() {
; nothing
}
}
2022-03-07 20:41:12 +00:00
""")!!
result.program.toplevelModule.name shouldStartWith "on_the_fly_test"
val options = determineCompilationOptions(result.program, C64Target())
options.floats shouldBe true
options.zeropage shouldBe ZeropageType.DONTUSE
options.noSysInit shouldBe true
}
test("testModuleOrderAndCompilationOptionsCorrectWithJustImports") {
2021-10-29 14:46:56 +00:00
val errors = ErrorReporterForTests()
val sourceText = """
%import textio
%import floats
%option no_sysinit
%zeropage dontuse
main {
sub start() {
; nothing
}
}
"""
val filenameBase = "on_the_fly_test_" + sourceText.hashCode().toUInt().toString(16)
2022-06-26 16:51:03 +00:00
val filepath = outputDir.resolve("$filenameBase.p8")
filepath.toFile().writeText(sourceText)
val (program, options, importedfiles) = parseImports(filepath, errors, C64Target(), emptyList())
program.toplevelModule.name shouldBe filenameBase
withClue("all imports other than the test source must have been internal resources library files") {
importedfiles.size shouldBe 1
}
withClue("module order in parse tree") {
program.modules.map { it.name } shouldBe
listOf(
internedStringsModuleName,
filenameBase,
"textio", "syslib", "conv", "floats", "floats_functions", "math", "prog8_lib"
)
}
options.floats shouldBe true
options.noSysInit shouldBe true
withClue("zeropage option must be correctly taken from main module, not from float module import logic") {
options.zeropage shouldBe ZeropageType.DONTUSE
}
}
})