mirror of
https://github.com/irmen/prog8.git
synced 2024-12-26 14:29:35 +00:00
a289b32053
This reverts commit 690782bf.
It was too risky, using vera (especially fx) transparently in multiple places especially perhaps in IRQ handlers will create havoc unless much intricate care is taken to save/restore the vera state. Better to do vera fx explicitly where the programmer has full control.
94 lines
3.1 KiB
Kotlin
94 lines
3.1 KiB
Kotlin
package prog8tests
|
|
|
|
import io.kotest.core.spec.style.FunSpec
|
|
import io.kotest.matchers.shouldNotBe
|
|
import prog8.code.target.Cx16Target
|
|
import prog8.compiler.CompilationResult
|
|
import prog8.compiler.CompilerArguments
|
|
import prog8.compiler.compileProgram
|
|
import prog8tests.helpers.assumeReadableFile
|
|
import prog8tests.helpers.fixturesDir
|
|
import prog8tests.helpers.outputDir
|
|
import prog8tests.helpers.workingDir
|
|
import java.nio.file.Path
|
|
import kotlin.io.path.absolute
|
|
import kotlin.io.path.createTempFile
|
|
import kotlin.io.path.deleteExisting
|
|
import kotlin.io.path.writeText
|
|
|
|
/**
|
|
* ATTENTION: this is just kludge!
|
|
* They are not really unit tests, but rather tests of the whole process,
|
|
* from source file loading all the way through to running 64tass.
|
|
*/
|
|
class TestCompilerOptionSourcedirs: FunSpec({
|
|
|
|
lateinit var tempFileInWorkingDir: Path
|
|
|
|
beforeSpec {
|
|
tempFileInWorkingDir = createTempFile(directory = workingDir, prefix = "tmp_", suffix = ".p8")
|
|
.also { it.writeText("""
|
|
main {
|
|
sub start() {
|
|
}
|
|
}
|
|
""")}
|
|
}
|
|
|
|
afterSpec {
|
|
tempFileInWorkingDir.deleteExisting()
|
|
}
|
|
|
|
fun compileFile(filePath: Path, sourceDirs: List<String>): CompilationResult? {
|
|
val args = CompilerArguments(
|
|
filepath = filePath,
|
|
optimize = false,
|
|
writeAssembly = true,
|
|
warnSymbolShadowing = false,
|
|
quietAssembler = true,
|
|
asmListfile = false,
|
|
includeSourcelines = false,
|
|
experimentalCodegen = false,
|
|
varsHighBank = null,
|
|
compilationTarget = Cx16Target.NAME,
|
|
splitWordArrays = false,
|
|
symbolDefs = emptyMap(),
|
|
sourceDirs,
|
|
outputDir
|
|
)
|
|
return compileProgram(args)
|
|
}
|
|
|
|
test("testAbsoluteFilePathInWorkingDir") {
|
|
val filepath = assumeReadableFile(tempFileInWorkingDir.absolute())
|
|
compileFile(filepath, listOf()) shouldNotBe null
|
|
}
|
|
|
|
test("testFilePathInWorkingDirRelativeToWorkingDir") {
|
|
val filepath = assumeReadableFile(workingDir.relativize(tempFileInWorkingDir.absolute()))
|
|
compileFile(filepath, listOf()) shouldNotBe null
|
|
}
|
|
|
|
test("testFilePathInWorkingDirRelativeTo1stInSourcedirs") {
|
|
val filepath = assumeReadableFile(tempFileInWorkingDir)
|
|
compileFile(filepath.fileName, listOf(workingDir.toString())) shouldNotBe null
|
|
}
|
|
|
|
test("testAbsoluteFilePathOutsideWorkingDir") {
|
|
val filepath = assumeReadableFile(fixturesDir, "ast_simple_main.p8")
|
|
compileFile(filepath.absolute(), listOf()) shouldNotBe null
|
|
}
|
|
|
|
test("testFilePathOutsideWorkingDirRelativeToWorkingDir") {
|
|
val filepath = workingDir.relativize(assumeReadableFile(fixturesDir, "ast_simple_main.p8").absolute())
|
|
compileFile(filepath, listOf()) shouldNotBe null
|
|
}
|
|
|
|
test("testFilePathOutsideWorkingDirRelativeTo1stInSourcedirs") {
|
|
val filepath = assumeReadableFile(fixturesDir, "ast_simple_main.p8")
|
|
val sourcedirs = listOf("$fixturesDir")
|
|
compileFile(filepath.fileName, sourcedirs) shouldNotBe null
|
|
}
|
|
|
|
})
|