Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2024-12-23 09:32:43 +00:00
Code Issues Projects Releases Wiki Activity

ir tag change INLINEASM->ASM

Browse Source
This commit is contained in:
Irmen de Jong 2023-12-26 16:15:19 +01:00
parent 73864c8101
commit 7530f4407b
6 changed files with 15 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/test/vm/TestCompilerVirtual.kt
View File

@ -258,7 +258,7 @@ main {
val virtfile = result.compilationOptions.outputDir.resolve(result.compilerAst.name + ".p8ir")
val irSrc = virtfile.readText()
irSrc.shouldContain("incm.b $2000")
irSrc.shouldNotContain("INLINEASM")
irSrc.shouldNotContain("</ASM>")
VmRunner().runProgram(irSrc)
}

2
docs/source/todo.rst
View File

@ -2,6 +2,8 @@
TODO
====
- get rid of memory mapped variables: treat them as syntactic sugar for a poke/peek to the symbol.
- add -nowarnunused, or %option ignore_unused (module and block scope), to suppress all warnings about unused symbols. Useful in libraries.
put this in all library code, like %option no_symbol_prefixing, and get rid of the "trick" it uses currently to suppress unused symbol warnings for library modules.

6
intermediate/src/prog8/intermediate/IRFileReader.kt
View File

@ -354,7 +354,7 @@ class IRFileReader {
when(reader.peek().asStartElement().name.localPart) {
"SUB" -> block += parseSubroutine(reader)
"ASMSUB" -> block += parseAsmSubroutine(reader)
"INLINEASM" -> block += parseInlineAssembly(reader)
"ASM" -> block += parseInlineAssembly(reader)
"BYTES" -> block += parseBinaryBytes(reader)
"CODE" -> {
val chunk = parseCodeChunk(reader)
@ -387,7 +387,7 @@ class IRFileReader {
when(reader.peek().asStartElement().name.localPart) {
"CODE" -> sub += parseCodeChunk(reader)
"BYTES" -> sub += parseBinaryBytes(reader)
"INLINEASM" -> sub += parseInlineAssembly(reader)
"ASM" -> sub += parseInlineAssembly(reader)
else -> throw IRParseException("invalid line in SUB: ${reader.peek()}")
}
skipText(reader)
@ -479,7 +479,7 @@ class IRFileReader {
private fun parseInlineAssembly(reader: XMLEventReader): IRInlineAsmChunk {
skipText(reader)
val start = reader.nextEvent().asStartElement()
require(start.name.localPart=="INLINEASM") { "missing INLINEASM" }
require(start.name.localPart=="ASM") { "missing ASM" }
val label = start.attributes.asSequence().single { it.name.localPart == "LABEL" }.value.ifBlank { null }
val isIr = start.attributes.asSequence().single { it.name.localPart == "IR" }.value.toBoolean()
val text = readText(reader).trim()

2
intermediate/src/prog8/intermediate/IRFileWriter.kt
View File

@ -168,7 +168,7 @@ class IRFileWriter(private val irProgram: IRProgram, outfileOverride: Path?) {
}
private fun writeInlineAsm(chunk: IRInlineAsmChunk) {
xml.writeStartElement("INLINEASM")
xml.writeStartElement("ASM")
xml.writeAttribute("LABEL", chunk.label ?: "")
xml.writeAttribute("IR", chunk.isIR.toString())
xml.writeCharacters("\n")

12
intermediate/src/prog8/intermediate/IRProgram.kt
View File

@ -18,12 +18,12 @@ PROGRAM:
CODE-LINE (assignment to initialize a variable)
...
BLOCK
INLINEASM
INLINEASM
ASM
ASM
SUB
PARAMS
INLINEASM
INLINEASM
ASM
ASM
C (CODE)
CODE-LINE (label, instruction, comment, inlinebinary)
CODE-LINE
@ -36,10 +36,10 @@ PROGRAM:
SUB
ASMSUB
PARAMS
INLINEASM
ASM
ASMSUB
PARAMS
INLINEASM
ASM
...
BLOCK
BLOCK

4
intermediate/test/TestIRFileInOut.kt
View File

@ -86,9 +86,9 @@ return
<PARAMS>
uword sys.wait.jiffies
</PARAMS>
<INLINEASM LABEL="sys.wait" IR="true" POS="[library:/prog8lib/virtual/syslib.p8: line 17 col 10-13]">
<ASM LABEL="sys.wait" IR="true" POS="[library:/prog8lib/virtual/syslib.p8: line 17 col 10-13]">
loadm.w r0,sys.wait.jiffies
</INLINEASM>
</ASM>
<CODE>
return
</CODE>