mirror of
https://github.com/irmen/prog8.git
synced 2024-10-18 16:24:26 +00:00
+ expose #54, %asmbinary when outputDir != workingDir; also: refactor compiler tests on examples and add test helpers
This commit is contained in:
parent
85897ef8cd
commit
ee115b3337
156
compiler/test/Helpers.kt
Normal file
156
compiler/test/Helpers.kt
Normal file
@ -0,0 +1,156 @@
|
|||||||
|
package prog8tests.helpers
|
||||||
|
|
||||||
|
import kotlin.test.*
|
||||||
|
import kotlin.io.path.*
|
||||||
|
import java.nio.file.Path
|
||||||
|
|
||||||
|
import prog8.ast.IBuiltinFunctions
|
||||||
|
import prog8.ast.IMemSizer
|
||||||
|
import prog8.ast.IStringEncoding
|
||||||
|
import prog8.ast.base.DataType
|
||||||
|
import prog8.ast.base.Position
|
||||||
|
import prog8.ast.expressions.Expression
|
||||||
|
import prog8.ast.expressions.InferredTypes
|
||||||
|
import prog8.ast.expressions.NumericLiteralValue
|
||||||
|
import prog8.compiler.CompilationResult
|
||||||
|
import prog8.compiler.compileProgram
|
||||||
|
import prog8.compiler.target.ICompilationTarget
|
||||||
|
|
||||||
|
// TODO: find a way to share with compilerAst/test/Helpers.kt, while still being able to amend it (-> compileFile(..))
|
||||||
|
|
||||||
|
internal fun CompilationResult.assertSuccess(description: String = ""): CompilationResult {
|
||||||
|
assertTrue(success, "expected successful compilation but failed $description")
|
||||||
|
return this
|
||||||
|
}
|
||||||
|
|
||||||
|
internal fun CompilationResult.assertFailure(description: String = ""): CompilationResult {
|
||||||
|
assertFalse(success, "expected failure to compile but succeeded $description")
|
||||||
|
return this
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @see CompilationResult.assertSuccess
|
||||||
|
* @see CompilationResult.assertFailure
|
||||||
|
*/
|
||||||
|
internal fun compileFile(
|
||||||
|
platform: ICompilationTarget,
|
||||||
|
optimize: Boolean,
|
||||||
|
fileDir: Path,
|
||||||
|
fileName: String,
|
||||||
|
outputDir: Path = prog8tests.helpers.outputDir
|
||||||
|
) : CompilationResult {
|
||||||
|
val filepath = fileDir.resolve(fileName)
|
||||||
|
assumeReadableFile(filepath)
|
||||||
|
return compileProgram(
|
||||||
|
filepath,
|
||||||
|
optimize,
|
||||||
|
writeAssembly = true,
|
||||||
|
slowCodegenWarnings = false,
|
||||||
|
platform.name,
|
||||||
|
libdirs = listOf(),
|
||||||
|
outputDir
|
||||||
|
)
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Takes a [sourceText] as a String, writes it to a temporary
|
||||||
|
* file and then runs the compiler on that.
|
||||||
|
* @see compileFile
|
||||||
|
*/
|
||||||
|
internal fun compileText(
|
||||||
|
platform: ICompilationTarget,
|
||||||
|
optimize: Boolean,
|
||||||
|
sourceText: String
|
||||||
|
) : CompilationResult {
|
||||||
|
val filePath = outputDir.resolve("on_the_fly_test_" + sourceText.hashCode().toUInt().toString(16) + ".p8")
|
||||||
|
// we don't assumeNotExists(filePath) - should be ok to just overwrite it
|
||||||
|
filePath.toFile().writeText(sourceText)
|
||||||
|
return compileFile(platform, optimize, filePath.parent, filePath.name)
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
val workingDir : Path = Path("").absolute() // Note: Path(".") does NOT work..!
|
||||||
|
val fixturesDir : Path = workingDir.resolve("test/fixtures")
|
||||||
|
val resourcesDir : Path = workingDir.resolve("res")
|
||||||
|
val outputDir : Path = workingDir.resolve("build/tmp/test")
|
||||||
|
|
||||||
|
fun assumeReadable(path: Path) {
|
||||||
|
assertTrue(path.isReadable(), "sanity check: should be readable: ${path.absolute()}")
|
||||||
|
}
|
||||||
|
|
||||||
|
fun assumeReadableFile(path: Path) {
|
||||||
|
assumeReadable(path)
|
||||||
|
assertTrue(path.isRegularFile(), "sanity check: should be normal file: ${path.absolute()}")
|
||||||
|
}
|
||||||
|
|
||||||
|
fun assumeDirectory(path: Path) {
|
||||||
|
assertTrue(path.isDirectory(), "sanity check; should be directory: $path")
|
||||||
|
}
|
||||||
|
|
||||||
|
fun assumeNotExists(path: Path) {
|
||||||
|
assertFalse(path.exists(), "sanity check: should not exist: ${path.absolute()}")
|
||||||
|
}
|
||||||
|
|
||||||
|
fun sanityCheckDirectories(workingDirName: String? = null) {
|
||||||
|
if (workingDirName != null)
|
||||||
|
assertEquals(workingDirName, workingDir.fileName.toString(), "name of current working dir")
|
||||||
|
assumeDirectory(workingDir)
|
||||||
|
assumeDirectory(fixturesDir)
|
||||||
|
assumeDirectory(resourcesDir)
|
||||||
|
assumeDirectory(outputDir)
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
fun <A, B, R> mapCombinations(dim1: Iterable<A>, dim2: Iterable<B>, combine2: (A, B) -> R) =
|
||||||
|
sequence {
|
||||||
|
for (a in dim1)
|
||||||
|
for (b in dim2)
|
||||||
|
yield(combine2(a, b))
|
||||||
|
}.toList()
|
||||||
|
|
||||||
|
fun <A, B, C, R> mapCombinations(dim1: Iterable<A>, dim2: Iterable<B>, dim3: Iterable<C>, combine3: (A, B, C) -> R) =
|
||||||
|
sequence {
|
||||||
|
for (a in dim1)
|
||||||
|
for (b in dim2)
|
||||||
|
for (c in dim3)
|
||||||
|
yield(combine3(a, b, c))
|
||||||
|
}.toList()
|
||||||
|
|
||||||
|
fun <A, B, C, D, R> mapCombinations(dim1: Iterable<A>, dim2: Iterable<B>, dim3: Iterable<C>, dim4: Iterable<D>, combine4: (A, B, C, D) -> R) =
|
||||||
|
sequence {
|
||||||
|
for (a in dim1)
|
||||||
|
for (b in dim2)
|
||||||
|
for (c in dim3)
|
||||||
|
for (d in dim4)
|
||||||
|
yield(combine4(a, b, c, d))
|
||||||
|
}.toList()
|
||||||
|
|
||||||
|
|
||||||
|
val DummyEncoding = object : IStringEncoding {
|
||||||
|
override fun encodeString(str: String, altEncoding: Boolean): List<Short> {
|
||||||
|
throw Exception("just a dummy - should not be called")
|
||||||
|
}
|
||||||
|
|
||||||
|
override fun decodeString(bytes: List<Short>, altEncoding: Boolean): String {
|
||||||
|
throw Exception("just a dummy - should not be called")
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
val DummyFunctions = object : IBuiltinFunctions {
|
||||||
|
override val names: Set<String> = emptySet()
|
||||||
|
override val purefunctionNames: Set<String> = emptySet()
|
||||||
|
override fun constValue(
|
||||||
|
name: String,
|
||||||
|
args: List<Expression>,
|
||||||
|
position: Position,
|
||||||
|
memsizer: IMemSizer
|
||||||
|
): NumericLiteralValue? = null
|
||||||
|
|
||||||
|
override fun returnType(name: String, args: MutableList<Expression>) = InferredTypes.InferredType.unknown()
|
||||||
|
}
|
||||||
|
|
||||||
|
val DummyMemsizer = object : IMemSizer {
|
||||||
|
override fun memorySize(dt: DataType): Int = 0
|
||||||
|
}
|
||||||
|
|
@ -1,80 +1,127 @@
|
|||||||
package prog8tests
|
package prog8tests
|
||||||
|
|
||||||
import org.junit.jupiter.api.Test
|
|
||||||
import org.junit.jupiter.api.TestInstance
|
import org.junit.jupiter.api.TestInstance
|
||||||
|
import org.junit.jupiter.api.TestFactory
|
||||||
|
import org.junit.jupiter.api.Disabled
|
||||||
|
import org.junit.jupiter.api.BeforeAll
|
||||||
|
import org.junit.jupiter.api.DynamicTest
|
||||||
|
import org.junit.jupiter.api.DynamicTest.dynamicTest
|
||||||
|
import prog8tests.helpers.*
|
||||||
|
import kotlin.io.path.*
|
||||||
|
|
||||||
import prog8.compiler.compileProgram
|
import prog8.compiler.compileProgram
|
||||||
|
import prog8.compiler.target.C64Target
|
||||||
import prog8.compiler.target.Cx16Target
|
import prog8.compiler.target.Cx16Target
|
||||||
import prog8.compiler.target.ICompilationTarget
|
import prog8.compiler.target.ICompilationTarget
|
||||||
import kotlin.io.path.Path
|
|
||||||
import kotlin.io.path.absolute
|
|
||||||
import kotlin.io.path.isDirectory
|
|
||||||
import kotlin.test.assertEquals
|
|
||||||
import kotlin.test.assertTrue
|
|
||||||
|
|
||||||
|
|
||||||
/**
|
/**
|
||||||
* ATTENTION: this is just kludge!
|
* ATTENTION: this is just kludge!
|
||||||
* They are not really unit tests, but rather tests of the whole process,
|
* They are not really unit tests, but rather tests of the whole process,
|
||||||
* from source file loading all the way through to running 64tass.
|
* from source file loading all the way through to running 64tass.
|
||||||
* What's more: in case of failure (to compile and assemble) - which is when tests should help you -
|
|
||||||
* these tests will actually be ignored (ie. NOT fail),
|
|
||||||
* because in the code there are calls to Process.exit, making it essentially untestable.
|
|
||||||
*/
|
*/
|
||||||
|
//@Disabled("to save some time")
|
||||||
@TestInstance(TestInstance.Lifecycle.PER_CLASS)
|
@TestInstance(TestInstance.Lifecycle.PER_CLASS)
|
||||||
class TestCompilerOnExamples {
|
class TestCompilerOnExamples {
|
||||||
val workingDir = Path("").absolute() // Note: Path(".") does NOT work..!
|
private val examplesDir = workingDir.resolve("../examples")
|
||||||
val examplesDir = workingDir.resolve("../examples")
|
|
||||||
val outputDir = workingDir.resolve("build/tmp/test")
|
|
||||||
|
|
||||||
@Test
|
@BeforeAll
|
||||||
fun testDirectoriesSanityCheck() {
|
fun setUp() {
|
||||||
assertEquals("compiler", workingDir.fileName.toString())
|
sanityCheckDirectories("compiler")
|
||||||
assertTrue(examplesDir.isDirectory(), "sanity check; should be directory: $examplesDir")
|
assumeDirectory(examplesDir)
|
||||||
assertTrue(outputDir.isDirectory(), "sanity check; should be directory: $outputDir")
|
|
||||||
}
|
}
|
||||||
|
|
||||||
// TODO: make assembly stage testable - in case of failure (eg of 64tass) it Process.exit s
|
// TODO: make assembly stage testable - in case of failure (eg of 64tass) it Process.exit s
|
||||||
|
|
||||||
fun testExample(nameWithoutExt: String, platform: ICompilationTarget, optimize: Boolean) {
|
private fun makeDynamicCompilerTest(name: String, platform: ICompilationTarget, optimize: Boolean) : DynamicTest {
|
||||||
val filepath = examplesDir.resolve("$nameWithoutExt.p8")
|
val searchIn = mutableListOf(examplesDir)
|
||||||
val result = compileProgram(
|
if (platform == Cx16Target) {
|
||||||
filepath,
|
searchIn.add(0, examplesDir.resolve("cx16"))
|
||||||
optimize,
|
}
|
||||||
writeAssembly = true,
|
val filepath = searchIn.map { it.resolve("$name.p8") }.first { it.exists() }
|
||||||
slowCodegenWarnings = false,
|
val displayName = "${examplesDir.relativize(filepath)}: ${platform.name}, optimize=$optimize"
|
||||||
compilationTarget = platform.name,
|
return dynamicTest(displayName) {
|
||||||
libdirs = listOf(),
|
compileProgram(
|
||||||
outputDir
|
filepath,
|
||||||
)
|
optimize,
|
||||||
assertTrue(result.success, "${platform.name}, optimize=$optimize: \"$filepath\"")
|
writeAssembly = true,
|
||||||
|
slowCodegenWarnings = false,
|
||||||
|
compilationTarget = platform.name,
|
||||||
|
libdirs = listOf(),
|
||||||
|
outputDir
|
||||||
|
).assertSuccess("; $displayName")
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@TestFactory
|
||||||
|
@Disabled
|
||||||
|
fun bothCx16AndC64() = mapCombinations(
|
||||||
|
dim1 = listOf(
|
||||||
|
"animals",
|
||||||
|
"balls",
|
||||||
|
"cube3d",
|
||||||
|
"cube3d-float",
|
||||||
|
"cube3d-gfx",
|
||||||
|
"cxlogo",
|
||||||
|
"dirlist",
|
||||||
|
"fibonacci",
|
||||||
|
"line-circle-gfx",
|
||||||
|
"line-circle-txt",
|
||||||
|
"mandelbrot",
|
||||||
|
"mandelbrot-gfx",
|
||||||
|
"numbergame",
|
||||||
|
"primes",
|
||||||
|
"rasterbars",
|
||||||
|
"screencodes",
|
||||||
|
"sorting",
|
||||||
|
"swirl",
|
||||||
|
"swirl-float",
|
||||||
|
"tehtriz",
|
||||||
|
"test",
|
||||||
|
"textelite",
|
||||||
|
),
|
||||||
|
dim2 = listOf(Cx16Target, C64Target),
|
||||||
|
dim3 = listOf(false, true),
|
||||||
|
combine3 = ::makeDynamicCompilerTest
|
||||||
|
)
|
||||||
|
|
||||||
@Test
|
@TestFactory
|
||||||
fun test_cxLogo_noopt() {
|
// @Disabled
|
||||||
testExample("cxlogo", Cx16Target, false)
|
fun onlyC64() = mapCombinations(
|
||||||
}
|
dim1 = listOf(
|
||||||
@Test
|
"balloonflight",
|
||||||
fun test_cxLogo_opt() {
|
"bdmusic",
|
||||||
testExample("cxlogo", Cx16Target, true)
|
"bdmusic-irq",
|
||||||
}
|
"charset",
|
||||||
|
"cube3d-sprites",
|
||||||
@Test
|
"plasma",
|
||||||
fun test_swirl_noopt() {
|
"sprites",
|
||||||
testExample("swirl", Cx16Target, false)
|
"turtle-gfx",
|
||||||
}
|
"wizzine",
|
||||||
@Test
|
),
|
||||||
fun test_swirl_opt() {
|
dim2 = listOf(C64Target),
|
||||||
testExample("swirl", Cx16Target, true)
|
dim3 = listOf(false, true),
|
||||||
}
|
combine3 = ::makeDynamicCompilerTest
|
||||||
|
)
|
||||||
@Test
|
|
||||||
fun test_animals_noopt() {
|
|
||||||
testExample("animals", Cx16Target, false)
|
|
||||||
}
|
|
||||||
@Test
|
|
||||||
fun test_animals_opt() {
|
|
||||||
testExample("animals", Cx16Target, true)
|
|
||||||
}
|
|
||||||
|
|
||||||
|
@TestFactory
|
||||||
|
// @Disabled
|
||||||
|
fun onlyCx16() = mapCombinations(
|
||||||
|
dim1 = listOf(
|
||||||
|
"vtui/testvtui",
|
||||||
|
"amiga",
|
||||||
|
"bobs",
|
||||||
|
"cobramk3-gfx",
|
||||||
|
"colorbars",
|
||||||
|
"datetime",
|
||||||
|
"highresbitmap",
|
||||||
|
"kefrenbars",
|
||||||
|
"mandelbrot-gfx-colors",
|
||||||
|
"multipalette",
|
||||||
|
"testgfx2",
|
||||||
|
),
|
||||||
|
dim2 = listOf(Cx16Target),
|
||||||
|
dim3 = listOf(false, true),
|
||||||
|
combine3 = ::makeDynamicCompilerTest
|
||||||
|
)
|
||||||
}
|
}
|
||||||
|
135
compiler/test/TestCompilerOnImportsAndIncludes.kt
Normal file
135
compiler/test/TestCompilerOnImportsAndIncludes.kt
Normal file
@ -0,0 +1,135 @@
|
|||||||
|
package prog8tests
|
||||||
|
|
||||||
|
import org.junit.jupiter.api.TestInstance
|
||||||
|
import org.junit.jupiter.api.Test
|
||||||
|
import org.junit.jupiter.api.BeforeAll
|
||||||
|
import org.junit.jupiter.api.TestFactory
|
||||||
|
import org.junit.jupiter.api.DynamicTest
|
||||||
|
import org.junit.jupiter.api.DynamicTest.dynamicTest
|
||||||
|
import kotlin.test.*
|
||||||
|
import kotlin.io.path.*
|
||||||
|
import prog8tests.helpers.*
|
||||||
|
|
||||||
|
import prog8.ast.expressions.AddressOf
|
||||||
|
import prog8.ast.expressions.IdentifierReference
|
||||||
|
import prog8.ast.expressions.StringLiteralValue
|
||||||
|
import prog8.ast.statements.FunctionCallStatement
|
||||||
|
import prog8.ast.statements.Label
|
||||||
|
import prog8.compiler.target.Cx16Target
|
||||||
|
|
||||||
|
|
||||||
|
/**
|
||||||
|
* 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.
|
||||||
|
*/
|
||||||
|
@TestInstance(TestInstance.Lifecycle.PER_CLASS)
|
||||||
|
class TestCompilerOnImportsAndIncludes {
|
||||||
|
|
||||||
|
@BeforeAll
|
||||||
|
fun setUp() {
|
||||||
|
sanityCheckDirectories("compiler")
|
||||||
|
}
|
||||||
|
|
||||||
|
@Test
|
||||||
|
fun testImportFromSameFolder() {
|
||||||
|
val filepath = fixturesDir.resolve("importFromSameFolder.p8")
|
||||||
|
val imported = fixturesDir.resolve("foo_bar.p8")
|
||||||
|
assumeReadableFile(filepath)
|
||||||
|
assumeReadableFile(imported)
|
||||||
|
|
||||||
|
val platform = Cx16Target
|
||||||
|
val result = compileFile(platform, false, fixturesDir, filepath.name)
|
||||||
|
.assertSuccess()
|
||||||
|
|
||||||
|
val program = result.programAst
|
||||||
|
val startSub = program.entrypoint()
|
||||||
|
val strLits = startSub.statements
|
||||||
|
.filterIsInstance<FunctionCallStatement>()
|
||||||
|
.map { it.args[0] as IdentifierReference }
|
||||||
|
.map { it.targetVarDecl(program)!!.value as StringLiteralValue }
|
||||||
|
|
||||||
|
assertEquals("main.bar", strLits[0].value)
|
||||||
|
assertEquals("foo.bar", strLits[1].value)
|
||||||
|
assertEquals("main", strLits[0].definingScope().name)
|
||||||
|
assertEquals("foo", strLits[1].definingScope().name)
|
||||||
|
}
|
||||||
|
|
||||||
|
@Test
|
||||||
|
fun testAsmIncludeFromSameFolder() {
|
||||||
|
val filepath = fixturesDir.resolve("asmIncludeFromSameFolder.p8")
|
||||||
|
val included = fixturesDir.resolve("foo_bar.asm")
|
||||||
|
assumeReadableFile(filepath)
|
||||||
|
assumeReadableFile(included)
|
||||||
|
|
||||||
|
val platform = Cx16Target
|
||||||
|
val result = compileFile(platform, false, fixturesDir, filepath.name)
|
||||||
|
.assertSuccess()
|
||||||
|
|
||||||
|
val program = result.programAst
|
||||||
|
val startSub = program.entrypoint()
|
||||||
|
val args = startSub.statements
|
||||||
|
.filterIsInstance<FunctionCallStatement>()
|
||||||
|
.map { it.args[0] }
|
||||||
|
|
||||||
|
val str0 = (args[0] as IdentifierReference).targetVarDecl(program)!!.value as StringLiteralValue
|
||||||
|
assertEquals("main.bar", str0.value)
|
||||||
|
assertEquals("main", str0.definingScope().name)
|
||||||
|
|
||||||
|
val id1 = (args[1] as AddressOf).identifier
|
||||||
|
val lbl1 = id1.targetStatement(program) as Label
|
||||||
|
assertEquals("foo_bar", lbl1.name)
|
||||||
|
assertEquals("start", lbl1.definingScope().name)
|
||||||
|
}
|
||||||
|
|
||||||
|
@Test
|
||||||
|
fun testAsmbinaryDirectiveWithNonExistingFile() {
|
||||||
|
val p8Path = fixturesDir.resolve("asmbinaryNonExisting.p8")
|
||||||
|
val binPath = fixturesDir.resolve("i_do_not_exist.bin")
|
||||||
|
assumeReadableFile(p8Path)
|
||||||
|
assumeNotExists(binPath)
|
||||||
|
|
||||||
|
compileFile(Cx16Target, false, p8Path.parent, p8Path.name, outputDir)
|
||||||
|
.assertFailure()
|
||||||
|
}
|
||||||
|
|
||||||
|
@Test
|
||||||
|
fun testAsmbinaryDirectiveWithNonReadableFile() {
|
||||||
|
val p8Path = fixturesDir.resolve("asmbinaryNonReadable.p8")
|
||||||
|
val binPath = fixturesDir.resolve("subFolder")
|
||||||
|
assumeReadableFile(p8Path)
|
||||||
|
assumeDirectory(binPath)
|
||||||
|
|
||||||
|
compileFile(Cx16Target, false, p8Path.parent, p8Path.name, outputDir)
|
||||||
|
.assertFailure()
|
||||||
|
}
|
||||||
|
|
||||||
|
@TestFactory
|
||||||
|
fun asmbinaryDirectiveWithExistingBinFile(): Iterable<DynamicTest> =
|
||||||
|
listOf(
|
||||||
|
Triple("same ", "asmBinaryFromSameFolder.p8", "do_nothing1.bin"),
|
||||||
|
Triple("sub", "asmBinaryFromSubFolder.p8", "subFolder/do_nothing2.bin"),
|
||||||
|
).map {
|
||||||
|
val (where, p8Str, binStr) = it
|
||||||
|
val p8Path = fixturesDir.resolve(p8Str)
|
||||||
|
val binPath = fixturesDir.resolve(binStr)
|
||||||
|
val displayName = "%asmbinary from ${where}folder"
|
||||||
|
dynamicTest(displayName) {
|
||||||
|
assumeReadableFile(p8Path)
|
||||||
|
assumeReadableFile(binPath)
|
||||||
|
assertNotEquals( // the bug we're testing for (#??) was hidden if outputDir == workinDir
|
||||||
|
workingDir.normalize().toAbsolutePath(),
|
||||||
|
outputDir.normalize().toAbsolutePath(),
|
||||||
|
"sanity check: workingDir and outputDir should not be the same folder")
|
||||||
|
|
||||||
|
compileFile(Cx16Target, false, p8Path.parent, p8Path.name, outputDir)
|
||||||
|
.assertSuccess(
|
||||||
|
"argument to assembler directive .binary " +
|
||||||
|
"should be relative to the generated .asm file (in output dir), " +
|
||||||
|
"NOT relative to .p8 neither current working dir"
|
||||||
|
)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
10
compiler/test/fixtures/asmBinaryFromSameFolder.p8
vendored
Normal file
10
compiler/test/fixtures/asmBinaryFromSameFolder.p8
vendored
Normal file
@ -0,0 +1,10 @@
|
|||||||
|
main {
|
||||||
|
sub start() {
|
||||||
|
stuff.do_nothing()
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
stuff $1000 {
|
||||||
|
romsub $1000 = do_nothing()
|
||||||
|
%asmbinary "do_nothing1.bin", 0
|
||||||
|
}
|
10
compiler/test/fixtures/asmBinaryFromSubFolder.p8
vendored
Normal file
10
compiler/test/fixtures/asmBinaryFromSubFolder.p8
vendored
Normal file
@ -0,0 +1,10 @@
|
|||||||
|
main {
|
||||||
|
sub start() {
|
||||||
|
stuff.do_nothing()
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
stuff $1000 {
|
||||||
|
romsub $1000 = do_nothing()
|
||||||
|
%asmbinary "subFolder/do_nothing2.bin", 0
|
||||||
|
}
|
10
compiler/test/fixtures/asmBinaryNonExisting.p8
vendored
Normal file
10
compiler/test/fixtures/asmBinaryNonExisting.p8
vendored
Normal file
@ -0,0 +1,10 @@
|
|||||||
|
main {
|
||||||
|
sub start() {
|
||||||
|
stuff.do_nothing()
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
stuff $1000 {
|
||||||
|
romsub $1000 = do_nothing()
|
||||||
|
%asmbinary "i_do_not_exist.bin", 0
|
||||||
|
}
|
10
compiler/test/fixtures/asmBinaryNonReadable.p8
vendored
Normal file
10
compiler/test/fixtures/asmBinaryNonReadable.p8
vendored
Normal file
@ -0,0 +1,10 @@
|
|||||||
|
main {
|
||||||
|
sub start() {
|
||||||
|
stuff.do_nothing()
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
stuff $1000 {
|
||||||
|
romsub $1000 = do_nothing()
|
||||||
|
%asmbinary "subFolder", 0
|
||||||
|
}
|
13
compiler/test/fixtures/asmIncludeFromSameFolder.p8
vendored
Normal file
13
compiler/test/fixtures/asmIncludeFromSameFolder.p8
vendored
Normal file
@ -0,0 +1,13 @@
|
|||||||
|
%import textio
|
||||||
|
main {
|
||||||
|
str myBar = "main.bar"
|
||||||
|
;foo_bar:
|
||||||
|
; %asminclude "foo_bar.asm" ; FIXME: should be accessible from inside start() but give assembler error
|
||||||
|
sub start() {
|
||||||
|
txt.print(myBar)
|
||||||
|
txt.print(&foo_bar)
|
||||||
|
return
|
||||||
|
foo_bar:
|
||||||
|
%asminclude "foo_bar.asm"
|
||||||
|
}
|
||||||
|
}
|
7
compiler/test/fixtures/do_nothing.asm
vendored
Normal file
7
compiler/test/fixtures/do_nothing.asm
vendored
Normal file
@ -0,0 +1,7 @@
|
|||||||
|
; this is the source code for do_nothing1.bin and subFolder/do_nothing2.bin
|
||||||
|
; command lines:
|
||||||
|
; 64tass --ascii --nostart do_nothing.asm --output do_nothing1.bin
|
||||||
|
; 64tass --ascii --nostart do_nothing.asm --output subFolder/do_nothing2.bin
|
||||||
|
*=0
|
||||||
|
rts
|
||||||
|
|
1
compiler/test/fixtures/do_nothing1.bin
vendored
Normal file
1
compiler/test/fixtures/do_nothing1.bin
vendored
Normal file
@ -0,0 +1 @@
|
|||||||
|
`
|
2
compiler/test/fixtures/foo_bar.asm
vendored
Normal file
2
compiler/test/fixtures/foo_bar.asm
vendored
Normal file
@ -0,0 +1,2 @@
|
|||||||
|
bar .text "foo.bar",0
|
||||||
|
|
3
compiler/test/fixtures/foo_bar.p8
vendored
Normal file
3
compiler/test/fixtures/foo_bar.p8
vendored
Normal file
@ -0,0 +1,3 @@
|
|||||||
|
foo {
|
||||||
|
str bar = "foo.bar"
|
||||||
|
}
|
9
compiler/test/fixtures/importFromSameFolder.p8
vendored
Normal file
9
compiler/test/fixtures/importFromSameFolder.p8
vendored
Normal file
@ -0,0 +1,9 @@
|
|||||||
|
%import textio
|
||||||
|
%import foo_bar
|
||||||
|
main {
|
||||||
|
str myBar = "main.bar"
|
||||||
|
sub start() {
|
||||||
|
txt.print(myBar)
|
||||||
|
txt.print(foo.bar)
|
||||||
|
}
|
||||||
|
}
|
1
compiler/test/fixtures/subFolder/do_nothing2.bin
vendored
Normal file
1
compiler/test/fixtures/subFolder/do_nothing2.bin
vendored
Normal file
@ -0,0 +1 @@
|
|||||||
|
`
|
Loading…
Reference in New Issue
Block a user