mirror of https://github.com/aamine/cbc
r4985@macbookpro: aamine | 2009-05-26 15:16:21 +0900
* net/loveruby/cflat/sysdep/x86/AssemblyFile.java: refactoring: apply strict visibility. git-svn-id: file:///Users/aamine/c/gitwork/public/cbc/trunk@4263 1b9489fe-b721-0410-924e-b54b9192deb8
This commit is contained in:
parent
1729dbaac0
commit
144393f6d4
|
@ -1,3 +1,8 @@
|
||||||
|
Tue May 26 15:16:04 2009 Minero Aoki <aamine@loveruby.net>
|
||||||
|
|
||||||
|
* net/loveruby/cflat/sysdep/x86/AssemblyFile.java: refactoring:
|
||||||
|
apply strict visibility.
|
||||||
|
|
||||||
Tue May 26 15:11:19 2009 Minero Aoki <aamine@loveruby.net>
|
Tue May 26 15:11:19 2009 Minero Aoki <aamine@loveruby.net>
|
||||||
|
|
||||||
* net/loveruby/cflat/compiler/Compiler.java: change CodeGenerator
|
* net/loveruby/cflat/compiler/Compiler.java: change CodeGenerator
|
||||||
|
|
|
@ -7,13 +7,13 @@ import java.io.PrintStream;
|
||||||
|
|
||||||
public class AssemblyFile implements net.loveruby.cflat.sysdep.AssemblyFile {
|
public class AssemblyFile implements net.loveruby.cflat.sysdep.AssemblyFile {
|
||||||
private final List<Assembly> assemblies;
|
private final List<Assembly> assemblies;
|
||||||
private final Type naturalType;
|
final Type naturalType;
|
||||||
private final long stackWordSize;
|
final long stackWordSize;
|
||||||
private final SymbolTable labelSymbols;
|
final SymbolTable labelSymbols;
|
||||||
private final boolean verbose;
|
final boolean verbose;
|
||||||
private int commentIndentLevel;
|
private int commentIndentLevel;
|
||||||
|
|
||||||
public AssemblyFile(Type naturalType, long stackWordSize,
|
AssemblyFile(Type naturalType, long stackWordSize,
|
||||||
SymbolTable labelSymbols, boolean verbose) {
|
SymbolTable labelSymbols, boolean verbose) {
|
||||||
this.naturalType = naturalType;
|
this.naturalType = naturalType;
|
||||||
this.stackWordSize = stackWordSize;
|
this.stackWordSize = stackWordSize;
|
||||||
|
@ -24,11 +24,11 @@ public class AssemblyFile implements net.loveruby.cflat.sysdep.AssemblyFile {
|
||||||
initVirtualStack();
|
initVirtualStack();
|
||||||
}
|
}
|
||||||
|
|
||||||
public List<Assembly> assemblies() {
|
List<Assembly> assemblies() {
|
||||||
return this.assemblies;
|
return this.assemblies;
|
||||||
}
|
}
|
||||||
|
|
||||||
public void addAll(List<Assembly> assemblies) {
|
void addAll(List<Assembly> assemblies) {
|
||||||
this.assemblies.addAll(assemblies);
|
this.assemblies.addAll(assemblies);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -49,23 +49,23 @@ public class AssemblyFile implements net.loveruby.cflat.sysdep.AssemblyFile {
|
||||||
// FIXME
|
// FIXME
|
||||||
}
|
}
|
||||||
|
|
||||||
public void comment(String str) {
|
void comment(String str) {
|
||||||
assemblies.add(new Comment(str, commentIndentLevel));
|
assemblies.add(new Comment(str, commentIndentLevel));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void indentComment() {
|
void indentComment() {
|
||||||
commentIndentLevel++;
|
commentIndentLevel++;
|
||||||
}
|
}
|
||||||
|
|
||||||
public void unindentComment() {
|
void unindentComment() {
|
||||||
commentIndentLevel--;
|
commentIndentLevel--;
|
||||||
}
|
}
|
||||||
|
|
||||||
public void label(Symbol sym) {
|
void label(Symbol sym) {
|
||||||
assemblies.add(new Label(sym));
|
assemblies.add(new Label(sym));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void label(Label label) {
|
void label(Label label) {
|
||||||
assemblies.add(label);
|
assemblies.add(label);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -116,91 +116,91 @@ public class AssemblyFile implements net.loveruby.cflat.sysdep.AssemblyFile {
|
||||||
// directives
|
// directives
|
||||||
//
|
//
|
||||||
|
|
||||||
public void _file(String name) {
|
void _file(String name) {
|
||||||
directive(".file\t" + TextUtils.dumpString(name));
|
directive(".file\t" + TextUtils.dumpString(name));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _text() {
|
void _text() {
|
||||||
directive("\t.text");
|
directive("\t.text");
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _data() {
|
void _data() {
|
||||||
directive("\t.data");
|
directive("\t.data");
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _section(String name) {
|
void _section(String name) {
|
||||||
directive("\t.section\t" + name);
|
directive("\t.section\t" + name);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _section(String name, String flags, String type, String group, String linkage) {
|
void _section(String name, String flags, String type, String group, String linkage) {
|
||||||
directive("\t.section\t" + name + "," + flags + "," + type + "," + group + "," + linkage);
|
directive("\t.section\t" + name + "," + flags + "," + type + "," + group + "," + linkage);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _globl(Symbol sym) {
|
void _globl(Symbol sym) {
|
||||||
directive(".globl " + sym.name());
|
directive(".globl " + sym.name());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _local(Symbol sym) {
|
void _local(Symbol sym) {
|
||||||
directive(".local " + sym.name());
|
directive(".local " + sym.name());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _hidden(Symbol sym) {
|
void _hidden(Symbol sym) {
|
||||||
directive("\t.hidden\t" + sym.name());
|
directive("\t.hidden\t" + sym.name());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _comm(Symbol sym, long size, long alignment) {
|
void _comm(Symbol sym, long size, long alignment) {
|
||||||
directive("\t.comm\t" + sym.name() + "," + size + "," + alignment);
|
directive("\t.comm\t" + sym.name() + "," + size + "," + alignment);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _align(long n) {
|
void _align(long n) {
|
||||||
directive("\t.align\t" + n);
|
directive("\t.align\t" + n);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _type(Symbol sym, String type) {
|
void _type(Symbol sym, String type) {
|
||||||
directive("\t.type\t" + sym.name() + "," + type);
|
directive("\t.type\t" + sym.name() + "," + type);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _size(Symbol sym, long size) {
|
void _size(Symbol sym, long size) {
|
||||||
_size(sym, new Long(size).toString());
|
_size(sym, new Long(size).toString());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _size(Symbol sym, String size) {
|
void _size(Symbol sym, String size) {
|
||||||
directive("\t.size\t" + sym.name() + "," + size);
|
directive("\t.size\t" + sym.name() + "," + size);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _byte(long val) {
|
void _byte(long val) {
|
||||||
directive(".byte\t" + new IntegerLiteral((byte)val).toSource());
|
directive(".byte\t" + new IntegerLiteral((byte)val).toSource());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _value(long val) {
|
void _value(long val) {
|
||||||
directive(".value\t" + new IntegerLiteral((short)val).toSource());
|
directive(".value\t" + new IntegerLiteral((short)val).toSource());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _long(long val) {
|
void _long(long val) {
|
||||||
directive(".long\t" + new IntegerLiteral((int)val).toSource());
|
directive(".long\t" + new IntegerLiteral((int)val).toSource());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _quad(long val) {
|
void _quad(long val) {
|
||||||
directive(".quad\t" + new IntegerLiteral(val).toSource());
|
directive(".quad\t" + new IntegerLiteral(val).toSource());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _byte(Literal val) {
|
void _byte(Literal val) {
|
||||||
directive(".byte\t" + val.toSource());
|
directive(".byte\t" + val.toSource());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _value(Literal val) {
|
void _value(Literal val) {
|
||||||
directive(".value\t" + val.toSource());
|
directive(".value\t" + val.toSource());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _long(Literal val) {
|
void _long(Literal val) {
|
||||||
directive(".long\t" + val.toSource());
|
directive(".long\t" + val.toSource());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _quad(Literal val) {
|
void _quad(Literal val) {
|
||||||
directive(".quad\t" + val.toSource());
|
directive(".quad\t" + val.toSource());
|
||||||
}
|
}
|
||||||
|
|
||||||
public void _string(String str) {
|
void _string(String str) {
|
||||||
directive("\t.string\t" + TextUtils.dumpString(str));
|
directive("\t.string\t" + TextUtils.dumpString(str));
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -271,218 +271,218 @@ public class AssemblyFile implements net.loveruby.cflat.sysdep.AssemblyFile {
|
||||||
// Instructions
|
// Instructions
|
||||||
//
|
//
|
||||||
|
|
||||||
public void jmp(Label label) {
|
void jmp(Label label) {
|
||||||
insn("jmp", new DirectMemoryReference(label.symbol()));
|
insn("jmp", new DirectMemoryReference(label.symbol()));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void jz(Label label) {
|
void jz(Label label) {
|
||||||
insn("jz", new DirectMemoryReference(label.symbol()));
|
insn("jz", new DirectMemoryReference(label.symbol()));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void jnz(Label label) {
|
void jnz(Label label) {
|
||||||
insn("jnz", new DirectMemoryReference(label.symbol()));
|
insn("jnz", new DirectMemoryReference(label.symbol()));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void je(Label label) {
|
void je(Label label) {
|
||||||
insn("je", new DirectMemoryReference(label.symbol()));
|
insn("je", new DirectMemoryReference(label.symbol()));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void jne(Label label) {
|
void jne(Label label) {
|
||||||
insn("jne", new DirectMemoryReference(label.symbol()));
|
insn("jne", new DirectMemoryReference(label.symbol()));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void cmp(Type t, Operand a, Register b) {
|
void cmp(Type t, Operand a, Register b) {
|
||||||
insn(t, "cmp", a, b);
|
insn(t, "cmp", a, b);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void sete(Register reg) {
|
void sete(Register reg) {
|
||||||
insn("sete", reg);
|
insn("sete", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void setne(Register reg) {
|
void setne(Register reg) {
|
||||||
insn("setne", reg);
|
insn("setne", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void seta(Register reg) {
|
void seta(Register reg) {
|
||||||
insn("seta", reg);
|
insn("seta", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void setae(Register reg) {
|
void setae(Register reg) {
|
||||||
insn("setae", reg);
|
insn("setae", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void setb(Register reg) {
|
void setb(Register reg) {
|
||||||
insn("setb", reg);
|
insn("setb", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void setbe(Register reg) {
|
void setbe(Register reg) {
|
||||||
insn("setbe", reg);
|
insn("setbe", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void setg(Register reg) {
|
void setg(Register reg) {
|
||||||
insn("setg", reg);
|
insn("setg", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void setge(Register reg) {
|
void setge(Register reg) {
|
||||||
insn("setge", reg);
|
insn("setge", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void setl(Register reg) {
|
void setl(Register reg) {
|
||||||
insn("setl", reg);
|
insn("setl", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void setle(Register reg) {
|
void setle(Register reg) {
|
||||||
insn("setle", reg);
|
insn("setle", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void test(Type type, Register a, Register b) {
|
void test(Type type, Register a, Register b) {
|
||||||
insn(type, "test", a, b);
|
insn(type, "test", a, b);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void push(Register reg) {
|
void push(Register reg) {
|
||||||
insn("push", typeSuffix(naturalType), reg);
|
insn("push", typeSuffix(naturalType), reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void pop(Register reg) {
|
void pop(Register reg) {
|
||||||
insn("pop", typeSuffix(naturalType), reg);
|
insn("pop", typeSuffix(naturalType), reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
// call function by relative address
|
// call function by relative address
|
||||||
public void call(Symbol sym) {
|
void call(Symbol sym) {
|
||||||
insn("call", new DirectMemoryReference(sym));
|
insn("call", new DirectMemoryReference(sym));
|
||||||
}
|
}
|
||||||
|
|
||||||
// call function by absolute address
|
// call function by absolute address
|
||||||
public void callAbsolute(Register reg) {
|
void callAbsolute(Register reg) {
|
||||||
insn("call", new AbsoluteAddress(reg));
|
insn("call", new AbsoluteAddress(reg));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void ret() {
|
void ret() {
|
||||||
insn("ret");
|
insn("ret");
|
||||||
}
|
}
|
||||||
|
|
||||||
public void mov(Operand src, Operand dest) {
|
void mov(Operand src, Operand dest) {
|
||||||
mov(naturalType, src, dest);
|
mov(naturalType, src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
// for stack access
|
// for stack access
|
||||||
public void relocatableMov(Operand src, Operand dest) {
|
void relocatableMov(Operand src, Operand dest) {
|
||||||
assemblies.add(new Instruction("mov", typeSuffix(naturalType), src, dest, true));
|
assemblies.add(new Instruction("mov", typeSuffix(naturalType), src, dest, true));
|
||||||
}
|
}
|
||||||
|
|
||||||
public void mov(Type type, Operand src, Operand dest) {
|
void mov(Type type, Operand src, Operand dest) {
|
||||||
insn(type, "mov", src, dest);
|
insn(type, "mov", src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void movsx(Type t1, Type t2, Operand src, Operand dest) {
|
void movsx(Type t1, Type t2, Operand src, Operand dest) {
|
||||||
insn("movs", typeSuffix(t1, t2), src, dest);
|
insn("movs", typeSuffix(t1, t2), src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void movsbl(Operand src, Operand dest) {
|
void movsbl(Operand src, Operand dest) {
|
||||||
insn("movs", "bl", src, dest);
|
insn("movs", "bl", src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void movswl(Operand src, Operand dest) {
|
void movswl(Operand src, Operand dest) {
|
||||||
insn("movs", "wl", src, dest);
|
insn("movs", "wl", src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void movzx(Type t1, Type t2, Operand src, Operand dest) {
|
void movzx(Type t1, Type t2, Operand src, Operand dest) {
|
||||||
insn("movz", typeSuffix(t1, t2), src, dest);
|
insn("movz", typeSuffix(t1, t2), src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void movzb(Type t, Operand src, Operand dest) {
|
void movzb(Type t, Operand src, Operand dest) {
|
||||||
insn("movz", "b" + typeSuffix(t), src, dest);
|
insn("movz", "b" + typeSuffix(t), src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void movzbl(Operand src, Operand dest) {
|
void movzbl(Operand src, Operand dest) {
|
||||||
insn("movz", "bl", src, dest);
|
insn("movz", "bl", src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void movzwl(Operand src, Operand dest) {
|
void movzwl(Operand src, Operand dest) {
|
||||||
insn("movz", "wl", src, dest);
|
insn("movz", "wl", src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void lea(Operand src, Operand dest) {
|
void lea(Operand src, Operand dest) {
|
||||||
lea(naturalType, src, dest);
|
lea(naturalType, src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void lea(Type type, Operand src, Operand dest) {
|
void lea(Type type, Operand src, Operand dest) {
|
||||||
insn(type, "lea", src, dest);
|
insn(type, "lea", src, dest);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void neg(Type type, Register reg) {
|
void neg(Type type, Register reg) {
|
||||||
insn(type, "neg", reg);
|
insn(type, "neg", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void inc(Type type, Operand reg) {
|
void inc(Type type, Operand reg) {
|
||||||
insn(type, "inc", reg);
|
insn(type, "inc", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void dec(Type type, Operand reg) {
|
void dec(Type type, Operand reg) {
|
||||||
insn(type, "dec", reg);
|
insn(type, "dec", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void add(Operand diff, Operand base) {
|
void add(Operand diff, Operand base) {
|
||||||
add(naturalType, diff, base);
|
add(naturalType, diff, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void add(Type type, Operand diff, Operand base) {
|
void add(Type type, Operand diff, Operand base) {
|
||||||
insn(type, "add", diff, base);
|
insn(type, "add", diff, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void sub(Operand diff, Operand base) {
|
void sub(Operand diff, Operand base) {
|
||||||
sub(naturalType, diff, base);
|
sub(naturalType, diff, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void sub(Type type, Operand diff, Operand base) {
|
void sub(Type type, Operand diff, Operand base) {
|
||||||
insn(type, "sub", diff, base);
|
insn(type, "sub", diff, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void imul(Operand m, Register base) {
|
void imul(Operand m, Register base) {
|
||||||
imul(naturalType, m, base);
|
imul(naturalType, m, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void imul(Type type, Operand m, Register base) {
|
void imul(Type type, Operand m, Register base) {
|
||||||
insn(type, "imul", m, base);
|
insn(type, "imul", m, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void cltd() {
|
void cltd() {
|
||||||
insn("cltd");
|
insn("cltd");
|
||||||
}
|
}
|
||||||
|
|
||||||
public void div(Type type, Register base) {
|
void div(Type type, Register base) {
|
||||||
insn(type, "div", base);
|
insn(type, "div", base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void idiv(Type type, Register base) {
|
void idiv(Type type, Register base) {
|
||||||
insn(type, "idiv", base);
|
insn(type, "idiv", base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void not(Type type, Register reg) {
|
void not(Type type, Register reg) {
|
||||||
insn(type, "not", reg);
|
insn(type, "not", reg);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void and(Type type, Operand bits, Register base) {
|
void and(Type type, Operand bits, Register base) {
|
||||||
insn(type, "and", bits, base);
|
insn(type, "and", bits, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void or(Type type, Operand bits, Register base) {
|
void or(Type type, Operand bits, Register base) {
|
||||||
insn(type, "or", bits, base);
|
insn(type, "or", bits, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void xor(Type type, Operand bits, Register base) {
|
void xor(Type type, Operand bits, Register base) {
|
||||||
insn(type, "xor", bits, base);
|
insn(type, "xor", bits, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void sar(Type type, Register bits, Register base) {
|
void sar(Type type, Register bits, Register base) {
|
||||||
insn(type, "sar", bits, base);
|
insn(type, "sar", bits, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void sal(Type type, Register bits, Register base) {
|
void sal(Type type, Register bits, Register base) {
|
||||||
insn(type, "sal", bits, base);
|
insn(type, "sal", bits, base);
|
||||||
}
|
}
|
||||||
|
|
||||||
public void shr(Type type, Register bits, Register base) {
|
void shr(Type type, Register bits, Register base) {
|
||||||
insn(type, "shr", bits, base);
|
insn(type, "shr", bits, base);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue