2021-06-28 16:42:05 +00:00
|
|
|
package prog8tests
|
|
|
|
|
2021-11-07 23:16:58 +00:00
|
|
|
import io.kotest.core.spec.style.FunSpec
|
2022-03-07 20:41:12 +00:00
|
|
|
import io.kotest.matchers.shouldNotBe
|
2022-03-11 18:54:30 +00:00
|
|
|
import prog8.code.core.ICompilationTarget
|
2022-09-25 09:00:04 +00:00
|
|
|
import prog8.code.target.*
|
2021-11-30 00:40:21 +00:00
|
|
|
import prog8.compiler.CompilationResult
|
|
|
|
import prog8.compiler.CompilerArguments
|
2021-06-28 16:42:05 +00:00
|
|
|
import prog8.compiler.compileProgram
|
2022-09-25 09:00:04 +00:00
|
|
|
import prog8tests.helpers.*
|
2021-11-07 23:16:58 +00:00
|
|
|
import java.nio.file.Path
|
2021-10-10 22:22:04 +00:00
|
|
|
import kotlin.io.path.absolute
|
|
|
|
import kotlin.io.path.exists
|
2022-09-25 09:00:04 +00:00
|
|
|
import kotlin.io.path.readText
|
2021-06-28 16:42:05 +00:00
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* 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.
|
|
|
|
*/
|
2021-11-07 23:16:58 +00:00
|
|
|
|
2022-06-26 16:51:03 +00:00
|
|
|
private val examplesDir = assumeDirectory(workingDir, "../examples")
|
2021-11-07 23:16:58 +00:00
|
|
|
|
2022-03-07 20:41:12 +00:00
|
|
|
private fun compileTheThing(filepath: Path, optimize: Boolean, target: ICompilationTarget): CompilationResult? {
|
2021-11-30 00:40:21 +00:00
|
|
|
val args = CompilerArguments(
|
|
|
|
filepath,
|
|
|
|
optimize,
|
|
|
|
writeAssembly = true,
|
2023-07-30 15:10:54 +00:00
|
|
|
warnSymbolShadowing = false,
|
2021-11-30 00:40:21 +00:00
|
|
|
quietAssembler = true,
|
2021-12-30 13:38:40 +00:00
|
|
|
asmListfile = false,
|
2023-08-02 19:26:40 +00:00
|
|
|
includeSourcelines = false,
|
2022-02-05 20:25:19 +00:00
|
|
|
experimentalCodegen = false,
|
2023-06-26 22:27:34 +00:00
|
|
|
varsHighBank = null,
|
2021-11-30 00:40:21 +00:00
|
|
|
compilationTarget = target.name,
|
2023-05-30 17:08:34 +00:00
|
|
|
splitWordArrays = false,
|
2022-07-06 21:40:36 +00:00
|
|
|
symbolDefs = emptyMap(),
|
2022-06-26 16:51:03 +00:00
|
|
|
outputDir = outputDir
|
2021-11-30 00:40:21 +00:00
|
|
|
)
|
|
|
|
return compileProgram(args)
|
|
|
|
}
|
2021-11-07 23:16:58 +00:00
|
|
|
|
|
|
|
private fun prepareTestFiles(source: String, optimize: Boolean, target: ICompilationTarget): Pair<String, Path> {
|
|
|
|
val searchIn = mutableListOf(examplesDir)
|
2022-09-25 09:00:04 +00:00
|
|
|
when (target) {
|
2023-06-03 19:39:34 +00:00
|
|
|
is C64Target -> searchIn.add(0, assumeDirectory(examplesDir, "c64"))
|
2022-09-25 09:00:04 +00:00
|
|
|
is Cx16Target -> searchIn.add(0, assumeDirectory(examplesDir, "cx16"))
|
|
|
|
is VMTarget -> searchIn.add(0, assumeDirectory(examplesDir, "vm"))
|
|
|
|
is C128Target -> searchIn.add(0, assumeDirectory(examplesDir, "c128"))
|
|
|
|
is AtariTarget -> searchIn.add(0, assumeDirectory(examplesDir, "atari"))
|
2021-06-28 16:42:05 +00:00
|
|
|
}
|
2022-01-10 22:15:24 +00:00
|
|
|
val filepath = searchIn.asSequence()
|
2021-11-07 23:16:58 +00:00
|
|
|
.map { it.resolve("$source.p8") }
|
|
|
|
.map { it.normalize().absolute() }
|
2022-06-26 16:51:03 +00:00
|
|
|
.map { workingDir.relativize(it) }
|
2021-11-07 23:16:58 +00:00
|
|
|
.first { it.exists() }
|
|
|
|
val displayName = "${examplesDir.relativize(filepath.absolute())}: ${target.name}, optimize=$optimize"
|
|
|
|
return Pair(displayName, filepath)
|
|
|
|
}
|
2021-06-28 16:42:05 +00:00
|
|
|
|
|
|
|
|
2021-11-07 23:16:58 +00:00
|
|
|
class TestCompilerOnExamplesC64: FunSpec({
|
|
|
|
|
2022-06-26 16:51:03 +00:00
|
|
|
val onlyC64 = cartesianProduct(
|
2021-11-07 23:16:58 +00:00
|
|
|
listOf(
|
2021-07-17 08:37:58 +00:00
|
|
|
"balloonflight",
|
|
|
|
"bdmusic",
|
|
|
|
"bdmusic-irq",
|
|
|
|
"charset",
|
2023-06-03 19:39:34 +00:00
|
|
|
"cube3d",
|
2021-07-17 08:37:58 +00:00
|
|
|
"cube3d-sprites",
|
|
|
|
"plasma",
|
2023-06-03 19:39:34 +00:00
|
|
|
"rasterbars",
|
2021-07-17 08:37:58 +00:00
|
|
|
"sprites",
|
2022-08-14 08:46:34 +00:00
|
|
|
"starfield",
|
2023-06-03 19:39:34 +00:00
|
|
|
"tehtriz",
|
2021-07-17 08:37:58 +00:00
|
|
|
"turtle-gfx",
|
|
|
|
"wizzine",
|
|
|
|
),
|
2021-11-07 23:16:58 +00:00
|
|
|
listOf(false, true)
|
2021-07-17 08:37:58 +00:00
|
|
|
)
|
2021-06-28 16:42:05 +00:00
|
|
|
|
2021-11-07 23:16:58 +00:00
|
|
|
onlyC64.forEach {
|
|
|
|
val (source, optimize) = it
|
2022-02-06 20:29:06 +00:00
|
|
|
val target = C64Target()
|
|
|
|
val (displayName, filepath) = prepareTestFiles(source, optimize, target)
|
2021-11-07 23:16:58 +00:00
|
|
|
test(displayName) {
|
2022-03-07 20:41:12 +00:00
|
|
|
compileTheThing(filepath, optimize, target) shouldNotBe null
|
2021-11-07 23:16:58 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
})
|
|
|
|
|
|
|
|
class TestCompilerOnExamplesCx16: FunSpec({
|
|
|
|
|
2022-06-26 16:51:03 +00:00
|
|
|
val onlyCx16 = cartesianProduct(
|
2021-11-07 23:16:58 +00:00
|
|
|
listOf(
|
2021-07-17 08:37:58 +00:00
|
|
|
"vtui/testvtui",
|
2023-06-03 19:39:34 +00:00
|
|
|
"pcmaudio/play-adpcm",
|
|
|
|
"pcmaudio/stream-wav",
|
2021-07-17 08:37:58 +00:00
|
|
|
"amiga",
|
2022-07-09 13:40:56 +00:00
|
|
|
"bdmusic",
|
2021-07-17 08:37:58 +00:00
|
|
|
"bobs",
|
2023-06-03 19:39:34 +00:00
|
|
|
"bubbleuniverse",
|
2022-07-17 13:04:15 +00:00
|
|
|
"circles",
|
2021-07-17 08:37:58 +00:00
|
|
|
"cobramk3-gfx",
|
|
|
|
"colorbars",
|
2022-11-14 16:55:55 +00:00
|
|
|
"cube3d",
|
2023-06-03 19:39:34 +00:00
|
|
|
"cxlogo",
|
2021-07-17 08:37:58 +00:00
|
|
|
"datetime",
|
2022-11-14 16:55:55 +00:00
|
|
|
"diskspeed",
|
2022-11-23 00:14:43 +00:00
|
|
|
"fileseek",
|
2021-07-17 08:37:58 +00:00
|
|
|
"highresbitmap",
|
|
|
|
"kefrenbars",
|
2022-11-14 16:55:55 +00:00
|
|
|
"keyboardhandler",
|
2022-07-09 13:40:56 +00:00
|
|
|
"mandelbrot",
|
2021-07-17 08:37:58 +00:00
|
|
|
"mandelbrot-gfx-colors",
|
|
|
|
"multipalette",
|
2021-11-09 22:36:47 +00:00
|
|
|
"rasterbars",
|
|
|
|
"sincos",
|
2022-11-14 16:55:55 +00:00
|
|
|
"snow",
|
2023-06-18 10:49:22 +00:00
|
|
|
"spotlight",
|
2021-11-09 22:36:47 +00:00
|
|
|
"tehtriz",
|
2021-07-17 08:37:58 +00:00
|
|
|
"testgfx2",
|
|
|
|
),
|
2021-11-07 23:16:58 +00:00
|
|
|
listOf(false, true)
|
2021-07-17 08:37:58 +00:00
|
|
|
)
|
2021-11-07 23:16:58 +00:00
|
|
|
|
|
|
|
onlyCx16.forEach {
|
|
|
|
val (source, optimize) = it
|
2022-02-06 20:29:06 +00:00
|
|
|
val target = Cx16Target()
|
|
|
|
val (displayName, filepath) = prepareTestFiles(source, optimize, target)
|
2021-11-07 23:16:58 +00:00
|
|
|
test(displayName) {
|
2022-03-07 20:41:12 +00:00
|
|
|
compileTheThing(filepath, optimize, target) shouldNotBe null
|
2021-11-07 23:16:58 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
})
|
|
|
|
|
|
|
|
class TestCompilerOnExamplesBothC64andCx16: FunSpec({
|
|
|
|
|
2022-06-26 16:51:03 +00:00
|
|
|
val bothCx16AndC64 = cartesianProduct(
|
2021-11-07 23:16:58 +00:00
|
|
|
listOf(
|
|
|
|
"animals",
|
|
|
|
"balls",
|
2022-07-31 09:58:27 +00:00
|
|
|
"bsieve",
|
2021-11-07 23:16:58 +00:00
|
|
|
"cube3d",
|
|
|
|
"cube3d-float",
|
|
|
|
"cube3d-gfx",
|
|
|
|
"dirlist",
|
|
|
|
"fibonacci",
|
|
|
|
"line-circle-gfx",
|
|
|
|
"line-circle-txt",
|
2022-07-09 13:40:56 +00:00
|
|
|
"maze",
|
2021-11-07 23:16:58 +00:00
|
|
|
"mandelbrot",
|
|
|
|
"mandelbrot-gfx",
|
|
|
|
"numbergame",
|
|
|
|
"primes",
|
|
|
|
"screencodes",
|
|
|
|
"sorting",
|
|
|
|
"swirl",
|
|
|
|
"swirl-float",
|
|
|
|
"tehtriz",
|
|
|
|
"textelite",
|
|
|
|
),
|
|
|
|
listOf(false, true)
|
|
|
|
)
|
|
|
|
|
|
|
|
bothCx16AndC64.forEach {
|
|
|
|
val (source, optimize) = it
|
2022-02-06 20:29:06 +00:00
|
|
|
val c64target = C64Target()
|
|
|
|
val cx16target = Cx16Target()
|
|
|
|
val (displayNameC64, filepathC64) = prepareTestFiles(source, optimize, c64target)
|
|
|
|
val (displayNameCx16, filepathCx16) = prepareTestFiles(source, optimize, cx16target)
|
2021-11-07 23:16:58 +00:00
|
|
|
test(displayNameC64) {
|
2022-03-07 20:41:12 +00:00
|
|
|
compileTheThing(filepathC64, optimize, c64target) shouldNotBe null
|
2021-11-07 23:16:58 +00:00
|
|
|
}
|
|
|
|
test(displayNameCx16) {
|
2022-03-07 20:41:12 +00:00
|
|
|
compileTheThing(filepathCx16, optimize, cx16target) shouldNotBe null
|
2021-11-07 23:16:58 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
})
|
2022-09-25 09:00:04 +00:00
|
|
|
|
|
|
|
class TestCompilerOnExamplesVirtual: FunSpec({
|
|
|
|
|
|
|
|
val onlyVirtual = listOf(
|
|
|
|
"bouncegfx",
|
|
|
|
"bsieve",
|
|
|
|
"pixelshader",
|
|
|
|
"sincos",
|
|
|
|
"textelite"
|
|
|
|
)
|
|
|
|
|
|
|
|
onlyVirtual.forEach {
|
|
|
|
val target = VMTarget()
|
|
|
|
val (displayName, filepath) = prepareTestFiles(it, false, target)
|
|
|
|
test(displayName) {
|
|
|
|
val src = filepath.readText()
|
2023-02-14 21:37:33 +00:00
|
|
|
compileText(target, true, src, writeAssembly = true) shouldNotBe null
|
|
|
|
compileText(target, true, src, writeAssembly = true) shouldNotBe null
|
2022-09-25 09:00:04 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
})
|