| // Copyright 2009 The Go Authors. All rights reserved. |
| // Use of this source code is governed by a BSD-style |
| // license that can be found in the LICENSE file. |
| |
| #include <u.h> |
| #include <libc.h> |
| |
| #include "../gc/go.h" |
| #include "../6l/6.out.h" |
| |
| #ifndef EXTERN |
| #define EXTERN extern |
| #endif |
| |
| typedef struct Addr Addr; |
| |
| struct Addr |
| { |
| vlong offset; |
| double dval; |
| Prog* branch; |
| char sval[NSNAME]; |
| |
| Sym* gotype; |
| Sym* sym; |
| int width; |
| uchar type; |
| uchar index; |
| uchar etype; |
| uchar scale; /* doubles as width in DATA op */ |
| uchar pun; /* dont register variable */ |
| }; |
| #define A ((Addr*)0) |
| |
| struct Prog |
| { |
| short as; // opcode |
| uint32 loc; // pc offset in this func |
| uint32 lineno; // source line that generated this |
| Addr from; // src address |
| Addr to; // dst address |
| Prog* link; // next instruction in this func |
| void* reg; // pointer to containing Reg struct |
| }; |
| |
| EXTERN Biobuf* bout; |
| EXTERN int32 dynloc; |
| EXTERN uchar reg[D_NONE]; |
| EXTERN int32 pcloc; // instruction counter |
| EXTERN Strlit emptystring; |
| extern char* anames[]; |
| EXTERN Hist* hist; |
| EXTERN Prog zprog; |
| EXTERN Node* curfn; |
| EXTERN Node* newproc; |
| EXTERN Node* deferproc; |
| EXTERN Node* deferreturn; |
| EXTERN Node* panicindex; |
| EXTERN Node* panicslice; |
| EXTERN Node* throwreturn; |
| EXTERN vlong unmappedzero; |
| |
| /* |
| * gen.c |
| */ |
| void compile(Node*); |
| void proglist(void); |
| void gen(Node*); |
| Node* lookdot(Node*, Node*, int); |
| void cgen_as(Node*, Node*); |
| void cgen_callmeth(Node*, int); |
| void cgen_callinter(Node*, Node*, int); |
| void cgen_proc(Node*, int); |
| void cgen_callret(Node*, Node*); |
| void cgen_div(int, Node*, Node*, Node*); |
| void cgen_bmul(int, Node*, Node*, Node*); |
| void cgen_shift(int, Node*, Node*, Node*); |
| void cgen_dcl(Node*); |
| int needconvert(Type*, Type*); |
| void genconv(Type*, Type*); |
| void allocparams(void); |
| void checklabels(); |
| void ginscall(Node*, int); |
| int gen_as_init(Node*); |
| |
| /* |
| * cgen |
| */ |
| void agen(Node*, Node*); |
| void igen(Node*, Node*, Node*); |
| vlong fieldoffset(Type*, Node*); |
| void bgen(Node*, int, Prog*); |
| void sgen(Node*, Node*, int32); |
| void gmove(Node*, Node*); |
| Prog* gins(int, Node*, Node*); |
| int samaddr(Node*, Node*); |
| void naddr(Node*, Addr*, int); |
| void cgen_aret(Node*, Node*); |
| int cgen_inline(Node*, Node*); |
| void restx(Node*, Node*); |
| void savex(int, Node*, Node*, Node*, Type*); |
| int componentgen(Node*, Node*); |
| |
| /* |
| * gsubr.c |
| */ |
| void clearp(Prog*); |
| void proglist(void); |
| Prog* gbranch(int, Type*); |
| Prog* prog(int); |
| void gaddoffset(Node*); |
| void gconv(int, int); |
| int conv2pt(Type*); |
| vlong convvtox(vlong, int); |
| void fnparam(Type*, int, int); |
| Prog* gop(int, Node*, Node*, Node*); |
| int optoas(int, Type*); |
| void ginit(void); |
| void gclean(void); |
| void regalloc(Node*, Type*, Node*); |
| void regfree(Node*); |
| Node* nodarg(Type*, int); |
| void nodreg(Node*, Type*, int); |
| void nodindreg(Node*, Type*, int); |
| void gconreg(int, vlong, int); |
| void ginscon(int, vlong, Node*); |
| void buildtxt(void); |
| Plist* newplist(void); |
| int isfat(Type*); |
| void sudoclean(void); |
| int sudoaddable(int, Node*, Addr*); |
| void afunclit(Addr*); |
| void datagostring(Strlit*, Addr*); |
| void nodfconst(Node*, Type*, Mpflt*); |
| |
| /* |
| * cplx.c |
| */ |
| int complexop(Node*, Node*); |
| void complexmove(Node*, Node*); |
| void complexgen(Node*, Node*); |
| void complexbool(int, Node*, Node*, int, Prog*); |
| |
| /* |
| * gobj.c |
| */ |
| void datastring(char*, int, Addr*); |
| |
| /* |
| * list.c |
| */ |
| int Aconv(Fmt*); |
| int Dconv(Fmt*); |
| int Pconv(Fmt*); |
| int Rconv(Fmt*); |
| int Yconv(Fmt*); |
| void listinit(void); |
| |
| void zaddr(Biobuf*, Addr*, int, int); |
| |
