=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== smlnj-110.79/ml-burg/doc/code.sty-284-% \dcd points to this guy inside a code env. smlnj-110.79/ml-burg/doc/code.sty:285:\def\cd@dcd{\catcode`\$=3\catcode`\&=4\catcode`\#=6\catcode`\^=7% smlnj-110.79/ml-burg/doc/code.sty-286- \catcode`\_=8\catcode`\~=13\catcode`\%=14\def\^{\char`\^}} ############################################## smlnj-110.79/ml-burg/doc/code.sty-291-\def\cd@dollarspecial{\catcode`\$=3} smlnj-110.79/ml-burg/doc/code.sty:292:\def\cd@mathspecial{\catcode`\$=3\catcode`\^=7\catcode`\_=8% smlnj-110.79/ml-burg/doc/code.sty-293- \def\^{\char`\^}} ############################################## smlnj-110.79/nlffi/lib/internals/c-int.sml-65- smlnj-110.79/nlffi/lib/internals/c-int.sml:66: fun pair_type_addr (t: objt) (a: addr) = (a, t) smlnj-110.79/nlffi/lib/internals/c-int.sml-67- fun strip_type (a: addr, _: objt) = a ############################################## smlnj-110.79/nlffi/lib/internals/c-int.sml-98- type 'f fptr = addr * 'f smlnj-110.79/nlffi/lib/internals/c-int.sml:99: type 'f fptr' = addr (* does not carry function around *) smlnj-110.79/nlffi/lib/internals/c-int.sml-100- ############################################## smlnj-110.79/nlffi/lib/memory/memory-dummy.sml-48- smlnj-110.79/nlffi/lib/memory/memory-dummy.sml:49: fun load_addr (a: addr) = 0w0 : addr smlnj-110.79/nlffi/lib/memory/memory-dummy.sml-50- fun load_uchar (a: addr) = 0w0 : uchar ############################################## smlnj-110.79/nlffi/lib/memory/memory-dummy.sml-56- smlnj-110.79/nlffi/lib/memory/memory-dummy.sml:57: fun store_addr (a: addr, x: addr) = () smlnj-110.79/nlffi/lib/memory/memory-dummy.sml-58- fun store_uchar (a: addr, c: uchar) = () ############################################## smlnj-110.79/nlffi/lib/memory/memaccess-a4s2i4l4f4d8.sml-85- (* wrapping and unwrapping for cc types *) smlnj-110.79/nlffi/lib/memory/memaccess-a4s2i4l4f4d8.sml:86: fun wrap_addr (x : addr) = x : cc_addr smlnj-110.79/nlffi/lib/memory/memaccess-a4s2i4l4f4d8.sml-87- fun wrap_schar (x : MLRep.Signed.int) = x : cc_schar ############################################## smlnj-110.79/nlffi/lib/memory/memaccess-a4s2i4l4f4d8.sml-99- smlnj-110.79/nlffi/lib/memory/memaccess-a4s2i4l4f4d8.sml:100: fun unwrap_addr (x : cc_addr) = x : addr smlnj-110.79/nlffi/lib/memory/memaccess-a4s2i4l4f4d8.sml-101- fun unwrap_schar (x : cc_schar) = x : MLRep.Signed.int ############################################## smlnj-110.79/eXene/lib/protocol/xdisplay.sml-199- repeat (fn () => smlnj-110.79/eXene/lib/protocol/xdisplay.sml:200: Socket.connect (sock, INetSock.toAddr(addr, port))); smlnj-110.79/eXene/lib/protocol/xdisplay.sml-201- initConnection (sock, auth, dpy_name, screen) ############################################## smlnj-110.79/eXene/lib/protocol/xdisplay.sml-210- end smlnj-110.79/eXene/lib/protocol/xdisplay.sml:211: | XServerAddr.INET_Addr(host, port) => ( smlnj-110.79/eXene/lib/protocol/xdisplay.sml-212- case NDB.fromString host ############################################## smlnj-110.79/eXene/lib/protocol/xserver-addr.sml-41- smlnj-110.79/eXene/lib/protocol/xserver-addr.sml:42: fun mkUNIXAddr (dpyNum, scr) = { smlnj-110.79/eXene/lib/protocol/xserver-addr.sml-43- addr = UNIX(xUNIXPath ^ (Int.toString dpyNum)), ############################################## smlnj-110.79/eXene/lib/protocol/xserver-addr.sml-46- } smlnj-110.79/eXene/lib/protocol/xserver-addr.sml:47: fun mkINETAddr (host, dpyNum, scr) = if (Char.isDigit(String.sub(host, 0))) smlnj-110.79/eXene/lib/protocol/xserver-addr.sml-48- then { smlnj-110.79/eXene/lib/protocol/xserver-addr.sml:49: addr = INET_Addr(host, xTCPPort+dpyNum), smlnj-110.79/eXene/lib/protocol/xserver-addr.sml-50- dpy_name = F.format "%s:%d.%d" [F.STR host, F.INT dpyNum, F.INT scr], ############################################## smlnj-110.79/eXene/lib/protocol/xserver-addr.sml-58- smlnj-110.79/eXene/lib/protocol/xserver-addr.sml:59: fun getServerAddr "" = mkUNIXAddr(0, 0) smlnj-110.79/eXene/lib/protocol/xserver-addr.sml-60- | getServerAddr s = let ############################################## smlnj-110.79/eXene/lib/protocol/xserver-addr.sml-77- case hostname smlnj-110.79/eXene/lib/protocol/xserver-addr.sml:78: of "" => mkUNIXAddr(dpy, scr) smlnj-110.79/eXene/lib/protocol/xserver-addr.sml:79: | "unix" => mkUNIXAddr(dpy, scr) smlnj-110.79/eXene/lib/protocol/xserver-addr.sml:80: | name => mkINETAddr(name, dpy, scr) smlnj-110.79/eXene/lib/protocol/xserver-addr.sml-81- (* end case *) ############################################## smlnj-110.79/doc/html/HISTORY.html-7145-<p> smlnj-110.79/doc/html/HISTORY.html:7146:Fiddled with how to compile X86.prim.asm without warnings. smlnj-110.79/doc/html/HISTORY.html-7147-</p> ############################################## smlnj-110.79/doc/html/readme/110.40-README.html-101-<li>heap export now silent unless GC messages are on smlnj-110.79/doc/html/readme/110.40-README.html:102:<li>fixed assembly code so that X86.prim.asm now compiles without smlnj-110.79/doc/html/readme/110.40-README.html-103- warnings ############################################## smlnj-110.79/doc/html/readme/110.34-README.html-101- <i>(Caveat: Register assignments in the Sparc backend of SML/NJ smlnj-110.79/doc/html/readme/110.34-README.html:102:still need to be redone. In particular, the ASM temp register must smlnj-110.79/doc/html/readme/110.34-README.html-103-not be %o2. It is unlikely but not impossible that the current situation ############################################## smlnj-110.79/base/runtime/mach-dep/x86-masm.h-4- * smlnj-110.79/base/runtime/mach-dep/x86-masm.h:5: * macros that make MS MASM assembler look somewhat like unix assembler smlnj-110.79/base/runtime/mach-dep/x86-masm.h-6- */ ############################################## smlnj-110.79/base/runtime/mach-dep/assyntax.h-314-/* Immediate Mode */ smlnj-110.79/base/runtime/mach-dep/assyntax.h:315:#define ADDR(a) CHOICE(CONCAT($,a), CONCAT($,a), a) smlnj-110.79/base/runtime/mach-dep/assyntax.h-316-#define CONST(a) CHOICE(CONCAT($,a), CONCAT($,a), a) ############################################## smlnj-110.79/base/runtime/mach-dep/assyntax.h-792- /* Intel style assemblers. */ smlnj-110.79/base/runtime/mach-dep/assyntax.h:793: /* (NASM and MASM) */ smlnj-110.79/base/runtime/mach-dep/assyntax.h-794- /* */ ############################################## smlnj-110.79/base/runtime/mach-dep/assyntax.h-921- smlnj-110.79/base/runtime/mach-dep/assyntax.h:922:#else /* MASM */ smlnj-110.79/base/runtime/mach-dep/assyntax.h-923- ############################################## smlnj-110.79/base/runtime/mach-dep/assyntax.h-978-/* Immediate Mode */ smlnj-110.79/base/runtime/mach-dep/assyntax.h:979:#define P_ADDR(a) OFFSET a smlnj-110.79/base/runtime/mach-dep/assyntax.h:980:#define X_ADDR(a) OFFSET a smlnj-110.79/base/runtime/mach-dep/assyntax.h:981:#define D_ADDR(a) OFFSET a smlnj-110.79/base/runtime/mach-dep/assyntax.h:982:#define L_ADDR(a) OFFSET a smlnj-110.79/base/runtime/mach-dep/assyntax.h:983:#define W_ADDR(a) OFFSET a smlnj-110.79/base/runtime/mach-dep/assyntax.h:984:#define B_ADDR(a) OFFSET a smlnj-110.79/base/runtime/mach-dep/assyntax.h-985- ############################################## smlnj-110.79/base/runtime/mach-dep/assyntax.h-1610-#define ANDPS(a, b) andps P_ARG2(a, b) smlnj-110.79/base/runtime/mach-dep/assyntax.h:1611:/* NASM only knows the pseudo ops for these. smlnj-110.79/base/runtime/mach-dep/assyntax.h-1612-#define CMPPS(a, b, c) cmpps P_ARG3(a, b, c) ############################################## smlnj-110.79/base/runtime/mach-dep/PPC.prim.asm-171- * +-------------------+ smlnj-110.79/base/runtime/mach-dep/PPC.prim.asm:172: * 4096(sp) | mlstate addr (4) | smlnj-110.79/base/runtime/mach-dep/PPC.prim.asm-173- * +-------------------+ smlnj-110.79/base/runtime/mach-dep/PPC.prim.asm:174: * 4100(sp) | _startgc addr (4) | smlnj-110.79/base/runtime/mach-dep/PPC.prim.asm-175- * +-------------------+ ############################################## smlnj-110.79/base/runtime/mach-dep/signal-sysdep.h-49- * smlnj-110.79/base/runtime/mach-dep/signal-sysdep.h:50: * NOTE: Currently SavedPC is a global (so that the asm code in adjust_limit smlnj-110.79/base/runtime/mach-dep/signal-sysdep.h-51- * can access it). Once we have a runtimeLink register that allows dynamic ############################################## smlnj-110.79/base/runtime/mach-dep/signal-sysdep.h-426- extern Addr_t *ML_X86Frame; /* used to get at limitptr */ smlnj-110.79/base/runtime/mach-dep/signal-sysdep.h:427: extern void FPEEnable (); /* defined in X86.prim.asm */ smlnj-110.79/base/runtime/mach-dep/signal-sysdep.h-428-# define SIG_InitFPE() FPEEnable() ############################################## smlnj-110.79/base/runtime/mach-dep/cygwin-fault.c-239- smlnj-110.79/base/runtime/mach-dep/cygwin-fault.c:240:asm (".equ __win32_exception_list,0"); smlnj-110.79/base/runtime/mach-dep/cygwin-fault.c-241-extern exception_list * smlnj-110.79/base/runtime/mach-dep/cygwin-fault.c:242: _win32_exception_list asm ("%fs:__win32_exception_list"); smlnj-110.79/base/runtime/mach-dep/cygwin-fault.c-243- ############################################## smlnj-110.79/base/runtime/mach-dep/X86.prim.masm:1:/* X86.prim.masm (MS assembler) smlnj-110.79/base/runtime/mach-dep/X86.prim.masm-2- * ############################################## smlnj-110.79/base/runtime/mach-dep/X86.prim.masm-759- smlnj-110.79/base/runtime/mach-dep/X86.prim.masm:760:/* end of X86.prim.masm (MS assembler) */ ############################################## smlnj-110.79/base/runtime/mach-dep/X86.prim.asm-737- smlnj-110.79/base/runtime/mach-dep/X86.prim.asm:738:/* end of X86.prim.asm */ ############################################## smlnj-110.79/base/runtime/mach-dep/SPARC.prim.asm-30- * %o0-1 misc regs smlnj-110.79/base/runtime/mach-dep/SPARC.prim.asm:31: * %o2 asm tmp smlnj-110.79/base/runtime/mach-dep/SPARC.prim.asm-32- * %o3-5 misc regs ############################################## smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm-263- */ smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm:264:#define STORE_CODE_ADDR(proc, offset) \ smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm-265- ldil L%proc, tmp2 !\ ############################################## smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm-301- smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm:302: STORE_CODE_ADDR(ml_udiv, UDIV_OFFSET) smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm:303: STORE_CODE_ADDR(ml_div, DIV_OFFSET) smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm:304: STORE_CODE_ADDR(ml_mul, MUL_OFFSET) smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm:305: STORE_CODE_ADDR(ml_umul, UMUL_OFFSET) smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm:306: STORE_CODE_ADDR(saveregs0, STARTGC_OFFSET) smlnj-110.79/base/runtime/mach-dep/HPPA.prim.asm-307- ############################################## smlnj-110.79/base/runtime/memory/mem-mmap.c-34- */ smlnj-110.79/base/runtime/memory/mem-mmap.c:35:# define MMAP_ADDR (caddr_t)0x2000000 smlnj-110.79/base/runtime/memory/mem-mmap.c-36-#else ############################################## smlnj-110.79/base/runtime/kernel/bill-os.c-10- smlnj-110.79/base/runtime/kernel/bill-os.c:11:struct netent * getnetbyaddr(long net, int type) smlnj-110.79/base/runtime/kernel/bill-os.c-12-{ ############################################## smlnj-110.79/base/runtime/kernel/run-ml.c-45- msp->ml_pc = smlnj-110.79/base/runtime/kernel/run-ml.c:46: msp->ml_linkReg = GET_CODE_ADDR(f); smlnj-110.79/base/runtime/kernel/run-ml.c-47- ############################################## smlnj-110.79/base/runtime/kernel/run-ml.c-68- msp->ml_pc = smlnj-110.79/base/runtime/kernel/run-ml.c:69: msp->ml_linkReg = GET_CODE_ADDR(kont); smlnj-110.79/base/runtime/kernel/run-ml.c-70- ############################################## smlnj-110.79/base/runtime/kernel/run-ml.c-105- msp->ml_pc = smlnj-110.79/base/runtime/kernel/run-ml.c:106: msp->ml_linkReg = GET_CODE_ADDR(msp->ml_closure); smlnj-110.79/base/runtime/kernel/run-ml.c-107- vsp->vp_inSigHandler = TRUE; ############################################## smlnj-110.79/base/runtime/kernel/run-ml.c-128- msp->ml_pc = smlnj-110.79/base/runtime/kernel/run-ml.c:129: msp->ml_linkReg = GET_CODE_ADDR(msp->ml_closure); smlnj-110.79/base/runtime/kernel/run-ml.c-130- msp->ml_inPollHandler = TRUE; ############################################## smlnj-110.79/base/runtime/include/bibop.h-35- smlnj-110.79/base/runtime/include/bibop.h:36:#define BIBOP_INDEX_TO_ADDR(i) ((Addr_t)((i) << BIBOP_SHIFT)) smlnj-110.79/base/runtime/include/bibop.h-37-#define BIBOP_NBLKS_TO_SZB(i) ((Addr_t)((i) << BIBOP_SHIFT)) ############################################## smlnj-110.79/base/runtime/include/asm-base.h-164- smlnj-110.79/base/runtime/include/asm-base.h:165:# error missing asm definitions smlnj-110.79/base/runtime/include/asm-base.h-166- ############################################## smlnj-110.79/base/runtime/include/ml-values.h-60-/* convert an ML pointer to an Addr_t value */ smlnj-110.79/base/runtime/include/ml-values.h:61:#define PTR_MLtoADDR(p) ((Addr_t)PTR_MLtoC(void, p)) smlnj-110.79/base/runtime/include/ml-values.h-62- ############################################## smlnj-110.79/base/runtime/include/ml-values.h-76-/* Extract the code address from an ML closure */ smlnj-110.79/base/runtime/include/ml-values.h:77:#define GET_CODE_ADDR(c) (REC_SEL(c, 0)) smlnj-110.79/base/runtime/include/ml-values.h-78- ############################################## smlnj-110.79/base/runtime/include/bill-os.h-38-struct netent * getnetbyname(const char * name) __NO_THROW; smlnj-110.79/base/runtime/include/bill-os.h:39:struct netent * getnetbyaddr(long net, int type) __NO_THROW; smlnj-110.79/base/runtime/include/bill-os.h-40- ############################################## smlnj-110.79/base/runtime/include/ml-state.h-75- __msp->ml_pc = \ smlnj-110.79/base/runtime/include/ml-state.h:76: __msp->ml_linkReg = GET_CODE_ADDR(__cont); \ smlnj-110.79/base/runtime/include/ml-state.h-77- __msp->ml_exnCont = ML_unit; \ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-162- smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c:163:#define MK_CADDR(msp,p) mkWord32(msp,(Word_t) (p)) smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c:164:#define GET_CADDR(v) (Word_t *)getWord32(v) smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-165- ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-248- ptrlist = p->next; smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c:249: v = MK_CADDR(msp,p->ptr); smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-250- LIST_cons(msp, lp, v, lp); ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-735-#ifdef DEBUG_C_CALLS smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c:736: SayDebug("datumMLtoC: addr %x\n", GET_CADDR(val)); smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-737-#endif smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c:738: *(*p)++ = (Word_t) GET_CADDR(val); smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-739- break; ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-861- restore_ptrlist(saved_pl); smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c:862: ret = MK_CADDR(msp,(Word_t *)p); smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-863- REC_ALLOC2(msp, ret, ret, lp); ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-932- tag = MLADDR_TAG; smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c:933: mlval = MK_CADDR(msp,cp); smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-934- (*p)++; ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-1069- char *type = mk_strcpy(REC_SELPTR(char,arg,0)); smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c:1070: Word_t *caddr = GET_CADDR(REC_SEL(arg,1)); smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls.c-1071- ml_val_t ret; ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-entry.asm:1:/* c-entry.asm smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-entry.asm-2- * ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-entry.asm-193- smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-entry.asm:194:/* end of c-entry.asm */ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/makefile.win32-50- smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/makefile.win32:51:c-entry.obj: c-entry.asm c-calls.h smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/makefile.win32:52: $(CPP) /D_ASM_ $(DEFS) $(INCLUDES) c-entry.asm > c-entry.s smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/makefile.win32-53- $(AS) /c c-entry.s ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls-fns.c-19- smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls-fns.c:20:/* layout of a code_header must match offsets in c-entry.asm */ smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls-fns.c-21-typedef struct code_header { ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls-fns.c-31-Word_t *last_entry; /* points to the beginning of the last c-entry */ smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls-fns.c:32: /* executed set by grabPC in c-entry.asm */ smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls-fns.c-33-PVT code_header_t *last_code_hdr = NULL; /* last code hdr used */ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls-fns.c-159- msp->ml_pc = smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls-fns.c:160: msp->ml_linkReg = GET_CODE_ADDR(f); smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/c-calls-fns.c-161-} ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/makefile-44- smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/makefile:45:c-entry.o: c-entry.asm c-calls.h smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/makefile:46: $(CPP) -D_ASM_ $(DEFS) $(INCLUDES) c-entry.asm > c-entry.s smlnj-110.79/base/runtime/c-libs/smlnj-ccalls/makefile-47- $(AS) -o c-entry.o c-entry.s ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/ctlREUSEADDR.c-15- */ smlnj-110.79/base/runtime/c-libs/smlnj-sockets/ctlREUSEADDR.c:16:ml_val_t _ml_Sock_ctlREUSEADDR (ml_state_t *msp, ml_val_t arg) smlnj-110.79/base/runtime/c-libs/smlnj-sockets/ctlREUSEADDR.c-17-{ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c-16-#undef getnetbyaddr smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c:17:#define getnetbyaddr(x,y) NULL smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c-18-#endif ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c-22- */ smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c:23:ml_val_t _ml_NetDB_getnetbyaddr (ml_state_t *msp, ml_val_t arg) smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c-24-{ smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c-25-#if defined(OPSYS_WIN32) smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c:26: /* FIXME: getnetbyaddr() does not seem to exist under Windows. What is smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c-27- the equivalent? */ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c-32- smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c:33: return _util_NetDB_mknetent (msp, getnetbyaddr(net, type)); smlnj-110.79/base/runtime/c-libs/smlnj-sockets/getnetbyaddr.c-34-#endif ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/gethostbyaddr.c-17- */ smlnj-110.79/base/runtime/c-libs/smlnj-sockets/gethostbyaddr.c:18:ml_val_t _ml_NetDB_gethostbyaddr (ml_state_t *msp, ml_val_t arg) smlnj-110.79/base/runtime/c-libs/smlnj-sockets/gethostbyaddr.c-19-{ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/gethostbyaddr.c-23- msp, smlnj-110.79/base/runtime/c-libs/smlnj-sockets/gethostbyaddr.c:24: gethostbyaddr (STR_MLtoC(arg), sizeof(struct in_addr), AF_INET)); smlnj-110.79/base/runtime/c-libs/smlnj-sockets/gethostbyaddr.c-25-} /* end of _ml_NetDB_gethostbyaddr */ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/to-inetaddr.c-18- */ smlnj-110.79/base/runtime/c-libs/smlnj-sockets/to-inetaddr.c:19:ml_val_t _ml_Sock_toinetaddr (ml_state_t *msp, ml_val_t arg) smlnj-110.79/base/runtime/c-libs/smlnj-sockets/to-inetaddr.c-20-{ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/to-unixaddr.c-21- */ smlnj-110.79/base/runtime/c-libs/smlnj-sockets/to-unixaddr.c:22:ml_val_t _ml_Sock_tounixaddr (ml_state_t *msp, ml_val_t arg) smlnj-110.79/base/runtime/c-libs/smlnj-sockets/to-unixaddr.c-23-{ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/from-unixaddr.c-20- */ smlnj-110.79/base/runtime/c-libs/smlnj-sockets/from-unixaddr.c:21:ml_val_t _ml_Sock_fromunixaddr (ml_state_t *msp, ml_val_t arg) smlnj-110.79/base/runtime/c-libs/smlnj-sockets/from-unixaddr.c-22-{ ############################################## smlnj-110.79/base/runtime/c-libs/smlnj-sockets/from-inetaddr.c-18- */ smlnj-110.79/base/runtime/c-libs/smlnj-sockets/from-inetaddr.c:19:ml_val_t _ml_Sock_frominetaddr (ml_state_t *msp, ml_val_t arg) smlnj-110.79/base/runtime/c-libs/smlnj-sockets/from-inetaddr.c-20-{ ############################################## smlnj-110.79/base/runtime/mp/solaris-mp.c-725- p->ml_pc = smlnj-110.79/base/runtime/mp/solaris-mp.c:726: p->ml_linkReg = GET_CODE_ADDR(f); smlnj-110.79/base/runtime/mp/solaris-mp.c-727- p->ml_varReg = v; ############################################## smlnj-110.79/base/runtime/mp/sgi-mp.c-329- p->ml_pc = smlnj-110.79/base/runtime/mp/sgi-mp.c:330: p->ml_linkReg = GET_CODE_ADDR(f); smlnj-110.79/base/runtime/mp/sgi-mp.c-331- p->ml_varReg = v; ############################################## smlnj-110.79/base/runtime/objs/makefile.win32-279- smlnj-110.79/base/runtime/objs/makefile.win32:280:prim.obj: $(MACH_DIR)\$(TARGET).prim.masm \ smlnj-110.79/base/runtime/objs/makefile.win32-281- $(MACH_DIR)\x86-masm.h \ ############################################## smlnj-110.79/base/runtime/objs/makefile.win32-284- mlstate-offsets.h smlnj-110.79/base/runtime/objs/makefile.win32:285: $(CPP) /D_ASM_ $(DEFS) /I$(BC_DIR) /I$(MACH_DIR) $(INCLUDES) /Tc$(MACH_DIR)\$(TARGET).prim.masm > prim.s smlnj-110.79/base/runtime/objs/makefile.win32-286- $(AS) /c prim.s ############################################## smlnj-110.79/base/runtime/objs/makefile.win32-328- smlnj-110.79/base/runtime/objs/makefile.win32:329:primops.obj: $(BC_DIR)\primops.asm \ smlnj-110.79/base/runtime/objs/makefile.win32-330- $(INC_DIR)\asm-base.h smlnj-110.79/base/runtime/objs/makefile.win32:331: $(CPP) /D_ASM_ $(DEFS) $(INCLUDES) $(BC_DIR)\primops.asm > primops.s smlnj-110.79/base/runtime/objs/makefile.win32-332- $(AS) -o primops.obj primops.s ############################################## smlnj-110.79/base/runtime/objs/makefile-272- smlnj-110.79/base/runtime/objs/makefile:273:prim.o: $(MACH_DIR)/$(TARGET).prim.asm \ smlnj-110.79/base/runtime/objs/makefile-274- ml-sizes.h $(INC_DIR)/ml-base.h $(INC_DIR)/tags.h \ ############################################## smlnj-110.79/base/runtime/objs/makefile-276- mlstate-offsets.h smlnj-110.79/base/runtime/objs/makefile:277: $(CPP) -D_ASM_ $(DEFS) -I$(BC_DIR) $(INCLUDES) $(MACH_DIR)/$(TARGET).prim.asm > prim.s smlnj-110.79/base/runtime/objs/makefile-278- $(AS) -o prim.o prim.s ############################################## smlnj-110.79/base/runtime/objs/makefile-316- smlnj-110.79/base/runtime/objs/makefile:317:primops.o: $(BC_DIR)/primops.asm \ smlnj-110.79/base/runtime/objs/makefile-318- $(INC_DIR)/asm-base.h smlnj-110.79/base/runtime/objs/makefile:319: $(CPP) -D_ASM_ $(DEFS) $(INCLUDES) $(BC_DIR)/primops.asm > primops.s smlnj-110.79/base/runtime/objs/makefile-320- $(AS) -o primops.o primops.s ############################################## smlnj-110.79/base/runtime/config/gen-posix-names.sh-90-if [ "$USED_ENUMS" = "TRUE" ]; then smlnj-110.79/base/runtime/config/gen-posix-names.sh:91: for i in `sed -n "s/.*$PFIX\([0-9A-Z_]*\).*/\1/p" $INCLFILE | sort -u` smlnj-110.79/base/runtime/config/gen-posix-names.sh-92- do ############################################## smlnj-110.79/base/runtime/config/gen-posix-names.sh-95-else smlnj-110.79/base/runtime/config/gen-posix-names.sh:96: for i in `sed -n "s/.*$PFIX\([0-9A-Z_]*\).*/\1/p" $INCLFILE | sort -u` smlnj-110.79/base/runtime/config/gen-posix-names.sh-97- do ############################################## smlnj-110.79/base/runtime/config/gen-offsets.c-4- * smlnj-110.79/base/runtime/config/gen-offsets.c:5: * This C program generates a header file for the *.prim.asm files, smlnj-110.79/base/runtime/config/gen-offsets.c-6- * which gives the offset values in the VProc and ML state vectors. ############################################## smlnj-110.79/base/runtime/gc/blast-out.c-213- else { smlnj-110.79/base/runtime/gc/blast-out.c:214: Addr_t addr = PTR_MLtoADDR(obj); smlnj-110.79/base/runtime/gc/blast-out.c-215- int gen = EXTRACT_GEN(aid) - 1; ############################################## smlnj-110.79/base/runtime/gc/blast-out.c-283- int kind = EXTRACT_OBJC(aid)-1; smlnj-110.79/base/runtime/gc/blast-out.c:284: Addr_t addr = PTR_MLtoADDR(w); smlnj-110.79/base/runtime/gc/blast-out.c-285- addr -= adjust[gen][kind].base; ############################################## smlnj-110.79/base/runtime/gc/card-map.h-33-/* Map a card index to its base address */ smlnj-110.79/base/runtime/gc/card-map.h:34:#define CARD_TO_ADDR(cm, index) \ smlnj-110.79/base/runtime/gc/card-map.h-35- ((Word_t *)((Addr_t)(cm->baseAddr) + ((index) << CARD_BITS))) ############################################## smlnj-110.79/base/runtime/gc/card-map.h-108-/* Map a card index to its base address */ smlnj-110.79/base/runtime/gc/card-map.h:109:#define CARD_TO_ADDR(cm, index) \ smlnj-110.79/base/runtime/gc/card-map.h-110- ((Word_t *)((Addr_t)(cm->baseAddr) + ((index) << CARD_BITS))) ############################################## smlnj-110.79/base/runtime/gc/major-gc.c.SAV-66- } smlnj-110.79/base/runtime/gc/major-gc.c.SAV:67: region = (bigobj_region_t *)BIBOP_INDEX_TO_ADDR(indx); smlnj-110.79/base/runtime/gc/major-gc.c.SAV-68- dp = ADDR_TO_BODESC(region, w); ############################################## smlnj-110.79/base/runtime/gc/major-gc.c.SAV-815- continue; smlnj-110.79/base/runtime/gc/major-gc.c.SAV:816: region = (bigobj_region_t *)BIBOP_INDEX_TO_ADDR(i); smlnj-110.79/base/runtime/gc/major-gc.c.SAV-817- dp = ADDR_TO_BODESC(region, obj); ############################################## smlnj-110.79/base/runtime/gc/c-globals-tbl.c-199-{ smlnj-110.79/base/runtime/gc/c-globals-tbl.c:200: Addr_t a = PTR_MLtoADDR(addr); smlnj-110.79/base/runtime/gc/c-globals-tbl.c-201- item_ref_t *p; ############################################## smlnj-110.79/base/runtime/gc/major-gc.c-81- } smlnj-110.79/base/runtime/gc/major-gc.c:82: region = (bigobj_region_t *)BIBOP_INDEX_TO_ADDR(indx); smlnj-110.79/base/runtime/gc/major-gc.c-83- dp = ADDR_TO_BODESC(region, w); ############################################## smlnj-110.79/base/runtime/gc/major-gc.c-851- continue; smlnj-110.79/base/runtime/gc/major-gc.c:852: region = (bigobj_region_t *)BIBOP_INDEX_TO_ADDR(i); smlnj-110.79/base/runtime/gc/major-gc.c-853- dp = ADDR_TO_BODESC(region, obj); ############################################## smlnj-110.79/base/runtime/gc/minor-gc.c-230- continue; smlnj-110.79/base/runtime/gc/minor-gc.c:231: region = (bigobj_region_t *)BIBOP_INDEX_TO_ADDR(i); smlnj-110.79/base/runtime/gc/minor-gc.c-232- dp = ADDR_TO_BODESC(region, w); ############################################## smlnj-110.79/base/runtime/gc/heap-input.h-43-#define LookupBORegion(tbl, bibopIndex) \ smlnj-110.79/base/runtime/gc/heap-input.h:44: ((bo_region_reloc_t *)AddrTblLookup(tbl, BIBOP_INDEX_TO_ADDR(bibopIndex))) smlnj-110.79/base/runtime/gc/heap-input.h-45- ############################################## smlnj-110.79/base/runtime/gc/blast-gc.c-763- continue; smlnj-110.79/base/runtime/gc/blast-gc.c:764: region = (bigobj_region_t *)BIBOP_INDEX_TO_ADDR(i); smlnj-110.79/base/runtime/gc/blast-gc.c-765- dp = ADDR_TO_BODESC(region, obj); ############################################## smlnj-110.79/base/runtime/gc/big-objects.c-247- smlnj-110.79/base/runtime/gc/big-objects.c:248: rp = (bigobj_region_t *)BIBOP_INDEX_TO_ADDR(i); smlnj-110.79/base/runtime/gc/big-objects.c-249- ############################################## smlnj-110.79/base/runtime/gc/big-objects.c-270- aid = BIBOP[--indx]; smlnj-110.79/base/runtime/gc/big-objects.c:271: region = (bigobj_region_t *)BIBOP_INDEX_TO_ADDR(indx); smlnj-110.79/base/runtime/gc/big-objects.c-272- return BO_GetCodeObjTag (ADDR_TO_BODESC(region, pc)); ############################################## smlnj-110.79/base/runtime/gc/ml-heap-image.h-159-#define HIO_TAG_PTR(id,offset) PTR_CtoML(((id)<<HIO_ADDR_BITS)|(Addr_t)(offset)) smlnj-110.79/base/runtime/gc/ml-heap-image.h:160:#define HIO_GET_ID(p) (PTR_MLtoADDR(p)>>HIO_ADDR_BITS) smlnj-110.79/base/runtime/gc/ml-heap-image.h:161:#define HIO_GET_OFFSET(p) (PTR_MLtoADDR(p) & HIO_ADDR_MASK) smlnj-110.79/base/runtime/gc/ml-heap-image.h-162- ############################################## smlnj-110.79/base/runtime/gc/import-heap.c-183- msp->ml_pc = smlnj-110.79/base/runtime/gc/import-heap.c:184: msp->ml_linkReg = GET_CODE_ADDR(funct); smlnj-110.79/base/runtime/gc/import-heap.c-185- /* setup the arguments to the imported function */ ############################################## smlnj-110.79/base/runtime/gc/import-heap.c-528- if (isBOXED(__w)) { \ smlnj-110.79/base/runtime/gc/import-heap.c:529: Addr_t __obj = PTR_MLtoADDR(__w); \ smlnj-110.79/base/runtime/gc/import-heap.c-530- aid_t __aid = ADDR_TO_PAGEID(oldBIBOP, __obj); \ ############################################## smlnj-110.79/base/runtime/gc/import-heap.c-571- if (isBOXED(w)) { smlnj-110.79/base/runtime/gc/import-heap.c:572: Addr_t obj = PTR_MLtoADDR(w); smlnj-110.79/base/runtime/gc/import-heap.c-573- aid_t aid = ADDR_TO_PAGEID(oldBIBOP, obj); ############################################## smlnj-110.79/base/runtime/gc/obj-info.c-25- continue; smlnj-110.79/base/runtime/gc/obj-info.c:26: region = (bigobj_region_t *)BIBOP_INDEX_TO_ADDR(i); smlnj-110.79/base/runtime/gc/obj-info.c-27- dp = ADDR_TO_BODESC(region, obj); ############################################## smlnj-110.79/base/system/fixpt-22-if [ -f $twoup/bin/.arch-n-opsys ]; then smlnj-110.79/base/system/fixpt:23: ARCH_N_OPSYS=`$twoup/bin/.arch-n-opsys` smlnj-110.79/base/system/fixpt-24- if [ "$?" = "0" ]; then ############################################## smlnj-110.79/base/system/fixpt-91- prevbase=$iterbase smlnj-110.79/base/system/fixpt:92: iter=`expr $iter + 1` smlnj-110.79/base/system/fixpt-93- iterbase=$BASE$iter ############################################## smlnj-110.79/base/system/makeml-56-if [ -f $twoup/bin/.arch-n-opsys ]; then smlnj-110.79/base/system/makeml:57: ARCH_N_OPSYS=`$twoup/bin/.arch-n-opsys` smlnj-110.79/base/system/makeml-58- if [ "$?" = "0" ]; then ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/inet-sock.sml-26- in smlnj-110.79/base/system/Basis/Implementation/Sockets/inet-sock.sml:27: fun toAddr (ina, port) = smlnj-110.79/base/system/Basis/Implementation/Sockets/inet-sock.sml:28: Socket.ADDR(toInetAddr(NetHostDBInternal.unINADDR ina, port)) smlnj-110.79/base/system/Basis/Implementation/Sockets/inet-sock.sml:29: fun fromAddr (Socket.ADDR addr) = let smlnj-110.79/base/system/Basis/Implementation/Sockets/inet-sock.sml-30- val (a, port) = fromInetAddr addr ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/inet-sock.sml-33- end smlnj-110.79/base/system/Basis/Implementation/Sockets/inet-sock.sml:34: fun any port = Socket.ADDR(inetAny port) smlnj-110.79/base/system/Basis/Implementation/Sockets/inet-sock.sml-35- end ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/unix-sock.sml-27- in smlnj-110.79/base/system/Basis/Implementation/Sockets/unix-sock.sml:28: fun toAddr s = Socket.ADDR(toUnixAddr s) smlnj-110.79/base/system/Basis/Implementation/Sockets/unix-sock.sml:29: fun fromAddr (Socket.ADDR addr) = fromUnixAddr addr smlnj-110.79/base/system/Basis/Implementation/Sockets/unix-sock.sml-30- end ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-25- smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml:26: fun unINADDR (INADDR a) = a smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-27- ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-57- val getByName = getHostEnt o getHostByName' smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml:58: fun getByAddr (INADDR addr) = getHostEnt(getHostByAddr' addr) smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-59- end (* local *) ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-63- fun getB (w, shft) = SysW.andb(SysW.>>(w, shft), 0wxFF) smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml:64: fun mkAddr (a, b, c, d) = INADDR(Word8Vector.fromList[ smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-65- w2b a, w2b b, w2b c, w2b d ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-69- of SOME([a, b, c, d], strm) => smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml:70: SOME(mkAddr(a, b, c, d), strm) smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-71- | SOME([a, b, c], strm) => smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml:72: SOME(mkAddr(a, b, getB(c, 0w8), getB(c, 0w0)), strm) smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-73- | SOME([a, b], strm) => smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml:74: SOME(mkAddr(a, getB(b, 0w16), getB(b, 0w8), getB(b, 0w0)), strm) smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-75- | SOME([a], strm) => smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml:76: SOME(mkAddr(getB(a, 0w24), getB(a, 0w16), getB(a, 0w8), getB(a, 0w0)), strm) smlnj-110.79/base/system/Basis/Implementation/Sockets/host-db.sml-77- | _ => NONE ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml-52- val getByName = getNetEnt o getNetByName' smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml:53: fun getByAddr (NETADDR addr, Socket.AF.AF af) = smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml-54- getNetEnt(getNetByAddr'(addr, af)) ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml-62- SOME( smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml:63: NETADDR(SysW.<<(a, 0w24)+SysW.<<(b, 0w16)+SysW.<<(c, 0w8)+d), smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml-64- strm) smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml-65- | SOME([a, b, c], strm) => smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml:66: SOME(NETADDR(SysW.<<(a, 0w24)+SysW.<<(b, 0w16)+c), strm) smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml-67- | SOME([a, b], strm) => smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml:68: SOME(NETADDR(SysW.<<(a, 0w24)+b), strm) smlnj-110.79/base/system/Basis/Implementation/Sockets/net-db.sml-69- | SOME([a], strm) => SOME(NETADDR a, strm) ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-31- smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml:32:(* val dummyAddr = ADDR(W8V.fromList[]) *) smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-33- ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-130- val getSockName' : sockFD -> addr = sockFn "getSockName" smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml:131: fun getName f (SOCK { fd, ... }) = ADDR (f fd) smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-132- in ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-168- (* socket address operations *) smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml:169: fun sameAddr (ADDR a1, ADDR a2) = (a1 = a2) smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-170- local ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-172- in smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml:173: fun familyOfAddr (ADDR a) = AF.AF(getAddrFamily a) smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-174- end ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-409- = sockFn "recvFrom" smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml:410: fun recvFromV _ (_, 0, _, _) = (W8V.fromList[], (ADDR(W8V.fromList[]))) smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-411- | recvFromV getfd (sock, sz, peek, oob) = ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-439- end smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml:440: else (0, ADDR(W8V.fromList[])) smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-441- end ############################################## smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-453- end smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml:454: else (0, (ADDR(W8V.fromList[]))) smlnj-110.79/base/system/Basis/Implementation/Sockets/socket.sml-455- end ############################################## smlnj-110.79/base/system/installml-57-if [ -f $twoup/bin/.arch-n-opsys ]; then smlnj-110.79/base/system/installml:58: ARCH_N_OPSYS=`$twoup/bin/.arch-n-opsys` smlnj-110.79/base/system/installml-59- if [ "$?" = "0" ]; then ############################################## smlnj-110.79/base/system/testml-8- smlnj-110.79/base/system/testml:9:cmddir=`dirname $0` smlnj-110.79/base/system/testml:10:cmddir=`cd $cmddir; pwd` smlnj-110.79/base/system/testml-11- ############################################## smlnj-110.79/base/system/testml-14- smlnj-110.79/base/system/testml:15:eval `$bin/.arch-n-opsys` smlnj-110.79/base/system/testml-16- smlnj-110.79/base/system/testml:17:heapdir=`dirname $HEAP_IMAGE` smlnj-110.79/base/system/testml-18-[ -f "$heapdir/$HEAP_IMAGE.$HEAP_SUFFIX" ] || heapdir="$cmddir/$heapdir" smlnj-110.79/base/system/testml:19:HEAP_IMAGE=`cd $heapdir; pwd`/$HEAP_IMAGE smlnj-110.79/base/system/testml-20- ############################################## smlnj-110.79/base/compiler/CodeGen/main/machine.sig-6- structure P : INSN_PROPERTIES smlnj-110.79/base/compiler/CodeGen/main/machine.sig:7: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/base/compiler/CodeGen/main/machine.sig-8- where I = P.I ############################################## smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml-488- *) smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml:489: fun laddr(lab, k) = smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml-490- let val e = ############################################## smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml-519- | regbind(CPS.LABEL v) = smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml:520: laddr(functionLabel(if splitEntry then ~v-1 else v), 0) smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml-521- | regbind _ = error "regbind" ############################################## smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml-535- | regbind'(CPS.LABEL v) = smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml:536: laddr(functionLabel(if splitEntry then ~v-1 else v), 0) smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml-537- | regbind' _ = error "regbind'" ############################################## smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml-1484- val tmpR = newReg I32 val tmp = M.REG(ity,tmpR) smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml:1485: in emit(M.MV(ity, tmpR, laddr(lab, 0))); smlnj-110.79/base/compiler/CodeGen/main/mlriscGen.sml-1486- emit(M.JMP(M.ADD(addrTy, tmp, M.LOAD(pty, scale4(tmp, v), ############################################## smlnj-110.79/base/compiler/CodeGen/main/machspec.sig-92- * These values must be coordinated with their respective runtime smlnj-110.79/base/compiler/CodeGen/main/machspec.sig:93: * counterparts in ?.prim.asm and mlstate-offsets.h! *) smlnj-110.79/base/compiler/CodeGen/main/machspec.sig-94- val ML_STATE_OFFSET : int (* within frame *) ############################################## smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml-21- and TS.S.P = PseudoOps smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml:22: structure Asm : INSTRUCTION_EMITTER (* assembly *) smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml-23- where S.P = PseudoOps ############################################## smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml-46- structure Stream = MLTreeComp.TS smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml:47: structure Asm = Asm smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml-48- structure Shuffle = Shuffle ############################################## smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml-57- structure GraphViewer = GraphViewer(AllDisplays) smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml:58: structure Asm = Asm) smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml-59- ############################################## smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml-109- CheckGCFn smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml:110: (structure Asm = Asm smlnj-110.79/base/compiler/CodeGen/main/machine-gen.sml-111- structure CFG = CFG ############################################## smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml-14- structure InsnProps = HppaProps smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml:15: structure Asm = HppaAsmEmitter smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml-16- structure Shuffle = HppaShuffle ############################################## smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml-62- structure Props = InsnProps smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml:63: structure Asm = HppaAsmEmitter smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml-64- ) ############################################## smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml-72- structure SpillInstr= HppaSpillInstr(HppaInstr) smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml:73: structure Asm = HppaAsmEmitter smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml-74- structure SpillHeur = ChaitinSpillHeur smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml-75- structure Spill = RASpill(structure InsnProps = InsnProps smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml:76: structure Asm = HppaAsmEmitter) smlnj-110.79/base/compiler/CodeGen/hppa/hppaCG.sml-77- ############################################## smlnj-110.79/base/compiler/CodeGen/hppa/hppaMLTree.sml-71- structure InsnProps = HppaProps smlnj-110.79/base/compiler/CodeGen/hppa/hppaMLTree.sml:72: structure Asm = HppaAsmEmitter) smlnj-110.79/base/compiler/CodeGen/hppa/hppaMLTree.sml-73- ############################################## smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32MLTree.sml-26-structure Alpha32ClientPseudoOps = smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32MLTree.sml:27: SMLNJPseudoOps(structure Asm = Alpha32GasPseudoOps) smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32MLTree.sml-28- ############################################## smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32MLTree.sml-72- structure InsnProps = Alpha32Props smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32MLTree.sml:73: structure Asm = Alpha32AsmEmitter) ############################################## smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32CG.sml-14- structure InsnProps = Alpha32Props smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32CG.sml:15: structure Asm = Alpha32AsmEmitter smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32CG.sml-16- structure Shuffle = Alpha32Shuffle ############################################## smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32CG.sml-66- structure SpillInstr= AlphaSpillInstr(Alpha32Instr) smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32CG.sml:67: structure Asm = Alpha32AsmEmitter smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32CG.sml-68- structure SpillHeur = ChaitinSpillHeur smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32CG.sml-69- structure Spill = RASpill(structure InsnProps = InsnProps smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32CG.sml:70: structure Asm = Alpha32AsmEmitter) smlnj-110.79/base/compiler/CodeGen/alpha32/alpha32CG.sml-71- ############################################## smlnj-110.79/base/compiler/CodeGen/x86/x86MemRegs.sml-7- fun memReg{reg, base} = let smlnj-110.79/base/compiler/CodeGen/x86/x86MemRegs.sml:8: (* see X86.prim.asm stack layout *) smlnj-110.79/base/compiler/CodeGen/x86/x86MemRegs.sml-9- fun fpDisp f = Int32.fromInt((CB.registerNum f-8) * 8 + X86Runtime.vFpStart) ############################################## smlnj-110.79/base/compiler/CodeGen/x86/x86MLTree.sml-79- structure InsnProps = X86Props smlnj-110.79/base/compiler/CodeGen/x86/x86MLTree.sml:80: structure Asm = X86AsmEmitter) smlnj-110.79/base/compiler/CodeGen/x86/x86MLTree.sml-81- ############################################## smlnj-110.79/base/compiler/CodeGen/x86/x86CG.sml-26- structure InsnProps = X86Props smlnj-110.79/base/compiler/CodeGen/x86/x86CG.sml:27: structure Asm = X86AsmEmitter smlnj-110.79/base/compiler/CodeGen/x86/x86CG.sml-28- structure Shuffle = X86Shuffle ############################################## smlnj-110.79/base/compiler/CodeGen/x86/x86CG.sml-116- structure InsnProps = InsnProps smlnj-110.79/base/compiler/CodeGen/x86/x86CG.sml:117: structure Asm = X86AsmEmitter smlnj-110.79/base/compiler/CodeGen/x86/x86CG.sml-118- structure CFG = X86CFG ############################################## smlnj-110.79/base/compiler/CodeGen/x86/x86CG.sml-120- structure Spill = RASpill smlnj-110.79/base/compiler/CodeGen/x86/x86CG.sml:121: (structure Asm = X86AsmEmitter smlnj-110.79/base/compiler/CodeGen/x86/x86CG.sml-122- structure InsnProps = InsnProps ############################################## smlnj-110.79/base/compiler/CodeGen/ppc/ppcMLTree.sml-70- structure InsnProps = PPCProps smlnj-110.79/base/compiler/CodeGen/ppc/ppcMLTree.sml:71: structure Asm = PPCAsmEmitter) smlnj-110.79/base/compiler/CodeGen/ppc/ppcMLTree.sml-72- ############################################## smlnj-110.79/base/compiler/CodeGen/ppc/ppcCG.sml-14- structure InsnProps = PPCProps smlnj-110.79/base/compiler/CodeGen/ppc/ppcCG.sml:15: structure Asm = PPCAsmEmitter smlnj-110.79/base/compiler/CodeGen/ppc/ppcCG.sml-16- structure Shuffle = PPCShuffle ############################################## smlnj-110.79/base/compiler/CodeGen/ppc/ppcCG.sml-62- structure SpillInstr= PPCSpillInstr(PPCInstr) smlnj-110.79/base/compiler/CodeGen/ppc/ppcCG.sml:63: structure Asm = PPCAsmEmitter smlnj-110.79/base/compiler/CodeGen/ppc/ppcCG.sml-64- structure SpillHeur = ChaitinSpillHeur smlnj-110.79/base/compiler/CodeGen/ppc/ppcCG.sml-65- structure Spill = RASpill(structure InsnProps = InsnProps smlnj-110.79/base/compiler/CodeGen/ppc/ppcCG.sml:66: structure Asm = PPCAsmEmitter) smlnj-110.79/base/compiler/CodeGen/ppc/ppcCG.sml-67- ############################################## smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml-14- structure InsnProps = SparcProps smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml:15: structure Asm = SparcAsmEmitter smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml-16- structure Shuffle = SparcShuffle ############################################## smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml-61- structure Props = InsnProps smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml:62: structure Asm = SparcAsmEmitter smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml-63- ) ############################################## smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml-71- structure SpillInstr= SparcSpillInstr(SparcInstr) smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml:72: structure Asm = SparcAsmEmitter smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml-73- structure SpillHeur = ChaitinSpillHeur smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml-74- structure Spill = RASpill(structure InsnProps = InsnProps smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml:75: structure Asm = SparcAsmEmitter) smlnj-110.79/base/compiler/CodeGen/sparc/sparcCG.sml-76- ############################################## smlnj-110.79/base/compiler/CodeGen/sparc/sparcMLTree.sml-76- structure InsnProps = SparcProps smlnj-110.79/base/compiler/CodeGen/sparc/sparcMLTree.sml:77: structure Asm = SparcAsmEmitter) smlnj-110.79/base/compiler/CodeGen/sparc/sparcMLTree.sml-78- ############################################## smlnj-110.79/base/compiler/CodeGen/cpscompile/check-gc.sml-14-functor CheckGCFn( smlnj-110.79/base/compiler/CodeGen/cpscompile/check-gc.sml:15: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/base/compiler/CodeGen/cpscompile/check-gc.sml-16- structure CFG : CONTROL_FLOW_GRAPH ############################################## smlnj-110.79/base/compiler/CodeGen/cpscompile/smlnj-pseudoOps.sml-7-functor SMLNJPseudoOps smlnj-110.79/base/compiler/CodeGen/cpscompile/smlnj-pseudoOps.sml:8: ( structure Asm : PSEUDO_OPS_BASIS smlnj-110.79/base/compiler/CodeGen/cpscompile/smlnj-pseudoOps.sml-9- ) : SMLNJ_PSEUDO_OPS = ############################################## smlnj-110.79/base/compiler/CodeGen/cpscompile/smlnj-pseudoOps.sml-65- if Label.addrOf(base) = baseAddr then false smlnj-110.79/base/compiler/CodeGen/cpscompile/smlnj-pseudoOps.sml:66: else (Label.setAddr(base, baseAddr); true) smlnj-110.79/base/compiler/CodeGen/cpscompile/smlnj-pseudoOps.sml-67- end ############################################## smlnj-110.79/base/compiler/CodeGen/amd64/amd64MLTree.sml-78- structure InsnProps = AMD64Props smlnj-110.79/base/compiler/CodeGen/amd64/amd64MLTree.sml:79: structure Asm = AMD64AsmEmitter) smlnj-110.79/base/compiler/CodeGen/amd64/amd64MLTree.sml-80- ############################################## smlnj-110.79/base/compiler/CodeGen/amd64/amd64CG.sml-26- structure InsnProps = AMD64Props smlnj-110.79/base/compiler/CodeGen/amd64/amd64CG.sml:27: structure Asm = AMD64AsmEmitter smlnj-110.79/base/compiler/CodeGen/amd64/amd64CG.sml-28- structure Shuffle = AMD64Shuffle ############################################## smlnj-110.79/base/compiler/CodeGen/amd64/amd64CG.sml-127- structure Props = InsnProps smlnj-110.79/base/compiler/CodeGen/amd64/amd64CG.sml:128: structure Asm = AMD64AsmEmitter smlnj-110.79/base/compiler/CodeGen/amd64/amd64CG.sml-129- structure CFG = AMD64CFG ############################################## smlnj-110.79/base/compiler/CodeGen/amd64/amd64CG.sml-131- structure Spill = RASpill smlnj-110.79/base/compiler/CodeGen/amd64/amd64CG.sml:132: (structure Asm = AMD64AsmEmitter smlnj-110.79/base/compiler/CodeGen/amd64/amd64CG.sml-133- structure InsnProps = InsnProps ############################################## smlnj-110.79/smlnj-lib/INet/sock-util.sml-62- fun resolveAddr {host, port} = let smlnj-110.79/smlnj-lib/INet/sock-util.sml:63: fun err (a, b) = raise BadAddr(concat[a, " \"", b, "\" not found"]) smlnj-110.79/smlnj-lib/INet/sock-util.sml-64- val (name, addr) = (case host ############################################## smlnj-110.79/smlnj-lib/INet/sock-util.sml-91- in smlnj-110.79/smlnj-lib/INet/sock-util.sml:92: Socket.connect (sock, INetSock.toAddr(addr, port)); smlnj-110.79/smlnj-lib/INet/sock-util.sml-93- sock ############################################## smlnj-110.79/config/_link-sml-24- if [ ! -d "$BIN_DIR" ]; then smlnj-110.79/config/_link-sml:25: cmddir=`dirname $0` smlnj-110.79/config/_link-sml-26- case "$cmddir" in smlnj-110.79/config/_link-sml-27- /* ) BIN_DIR="$cmddir";; smlnj-110.79/config/_link-sml:28: * ) BIN_DIR=`cd $cmddir; pwd` ;; smlnj-110.79/config/_link-sml-29- esac ############################################## smlnj-110.79/config/_link-sml-44-# smlnj-110.79/config/_link-sml:45:ARCH_N_OPSYS=`"$BIN_DIR/.arch-n-opsys"` smlnj-110.79/config/_link-sml-46-if [ "$?" != "0" ]; then ############################################## smlnj-110.79/config/_link-sml-67- @SMLrun=*) smlnj-110.79/config/_link-sml:68: RUN=`echo "$arg" | sed 's/@SMLrun=//'` smlnj-110.79/config/_link-sml-69- shift ############################################## smlnj-110.79/config/_link-sml-71- @SMLboot=*) smlnj-110.79/config/_link-sml:72: BOOT=`echo "$arg" | sed 's/@SMLboot=//'` smlnj-110.79/config/_link-sml-73- shift ############################################## smlnj-110.79/config/_link-sml-75- @SMLheap=*) smlnj-110.79/config/_link-sml:76: HEAP=`echo "$arg" | sed 's/@SMLheap=//'` smlnj-110.79/config/_link-sml-77- shift ############################################## smlnj-110.79/config/actions-208-# utility program for use by heap2exec: smlnj-110.79/config/actions:209:heap2asm prog smlnj-110.79/config/actions-210- ############################################## smlnj-110.79/config/install.sh-102-# smlnj-110.79/config/install.sh:103:VERSION=`cat "$CONFIGDIR/version"` smlnj-110.79/config/install.sh-104-vsay $this: Installing version $VERSION. ############################################## smlnj-110.79/config/install.sh-120- else smlnj-110.79/config/install.sh:121: makedirtmp=`dirname "$1"` smlnj-110.79/config/install.sh-122- makedir "$makedirtmp" ############################################## smlnj-110.79/config/install.sh-249-# smlnj-110.79/config/install.sh:250:ARCH_N_OPSYS=`"$BINDIR"/.arch-n-opsys` smlnj-110.79/config/install.sh-251-if [ "$?" != "0" ]; then ############################################## smlnj-110.79/config/install.sh-295- linux) smlnj-110.79/config/install.sh:296: EXTRA_DEFS=`"$CONFIGDIR/chk-global-names.sh"` smlnj-110.79/config/install.sh-297- if [ "$?" != "0" ]; then smlnj-110.79/config/install.sh:298: complain "$this: !!! Problems checking for underscores in asm names." smlnj-110.79/config/install.sh-299- fi ############################################## smlnj-110.79/config/unpack-19- smlnj-110.79/config/unpack:20:VERSION=`cat "$CONFIGDIR"/version` smlnj-110.79/config/unpack-21-. "$CONFIGDIR"/srcarchiveurl ############################################## smlnj-110.79/config/unpack-277- heap2asm) smlnj-110.79/config/unpack:278: unpack "Heap->ASM tool" "$ROOT" heap2asm heap2asm smlnj-110.79/config/unpack-279- ;; ############################################## smlnj-110.79/config/_heap2exec-2- smlnj-110.79/config/_heap2exec:3:CMD=`basename "$0"` smlnj-110.79/config/_heap2exec-4- ############################################## smlnj-110.79/config/_heap2exec-21- smlnj-110.79/config/_heap2exec:22:ARCH_N_OPSYS=`"$BIN_DIR/.arch-n-opsys"` smlnj-110.79/config/_heap2exec-23-if [ "$?" != "0" ]; then ############################################## smlnj-110.79/config/_heap2exec-111-if [ ! -f $H2A ]; then smlnj-110.79/config/_heap2exec:112: echo "${CMD}: heap2asm is not installed" smlnj-110.79/config/_heap2exec-113- exit 2 ############################################## smlnj-110.79/config/_heap2exec-146-else smlnj-110.79/config/_heap2exec:147: die "heap2asm failed" smlnj-110.79/config/_heap2exec-148-fi ############################################## smlnj-110.79/config/_ml-build-70- main=$2 smlnj-110.79/config/_ml-build:71: heap=`basename "$root" .cm` smlnj-110.79/config/_ml-build-72-elif [ $# = 1 ] ; then ############################################## smlnj-110.79/config/_ml-build-75- main=Test.main smlnj-110.79/config/_ml-build:76: heap=`basename "$root" .cm` smlnj-110.79/config/_ml-build-77-else ############################################## smlnj-110.79/config/_ml-build-97- if [ -r "$linkargsfile" ]; then smlnj-110.79/config/_ml-build:98: "$LINK" `cat "$linkargsfile"` smlnj-110.79/config/_ml-build-99- fi ############################################## smlnj-110.79/config/chk-global-names.sh-24- smlnj-110.79/config/chk-global-names.sh:25:if `nm $TMP_FILE | grep -q "_$WITNESS"` smlnj-110.79/config/chk-global-names.sh-26- then echo "-DGLOBALS_HAVE_UNDERSCORE" ############################################## smlnj-110.79/config/_run-sml-5- smlnj-110.79/config/_run-sml:6:CMD=`basename "$0"` smlnj-110.79/config/_run-sml-7- ############################################## smlnj-110.79/config/_run-sml-27- # Convert to Unix style, absolute pathname. smlnj-110.79/config/_run-sml:28: SMLNJ_HOME=`cygpath -u -a "$SMLNJ_HOME"` smlnj-110.79/config/_run-sml-29- fi ############################################## smlnj-110.79/config/_run-sml-36- if [ ! -d "$BIN_DIR" ]; then smlnj-110.79/config/_run-sml:37: cmddir=`dirname "$0"` smlnj-110.79/config/_run-sml-38- case "$cmddir" in smlnj-110.79/config/_run-sml-39- /* ) BIN_DIR="$cmddir";; smlnj-110.79/config/_run-sml:40: * ) BIN_DIR=`cd $cmddir; pwd` ;; smlnj-110.79/config/_run-sml-41- esac ############################################## smlnj-110.79/config/_run-sml-59-# smlnj-110.79/config/_run-sml:60:ARCH_N_OPSYS=`"$BIN_DIR/.arch-n-opsys"` smlnj-110.79/config/_run-sml-61-if [ "$?" != "0" ]; then ############################################## smlnj-110.79/config/_run-sml-73-# special shortcut for frequent use (and for Linux' binfmt) smlnj-110.79/config/_run-sml:74:if [ `basename "$0"` = sml ] ; then smlnj-110.79/config/_run-sml-75- case "$1" in ############################################## smlnj-110.79/config/_run-sml-98- shift smlnj-110.79/config/_run-sml:99: RUN=`echo $arg | sed 's/@SMLrun=//'` smlnj-110.79/config/_run-sml-100- ;; ############################################## smlnj-110.79/config/_run-sml-145- cpu=`fgrep 'cpu ' </proc/cpuinfo | head -1` smlnj-110.79/config/_run-sml:146: cputype=`echo $cpu | sed -e 's/^.*:[ \t]*\(.*\)$/\1/'` smlnj-110.79/config/_run-sml-147- case $cputype in ############################################## smlnj-110.79/config/_run-sml-157- else smlnj-110.79/config/_run-sml:158: kb=`echo $cache | sed -e 's/^[^0-9]*\([0-9]*\).*$/\1/'` smlnj-110.79/config/_run-sml-159- case $kb in ############################################## smlnj-110.79/cml/cml-lib/SMLNJ-INet/sock-util.sml-60- fun resolveAddr {host, port} = let smlnj-110.79/cml/cml-lib/SMLNJ-INet/sock-util.sml:61: fun err (a, b) = raise BadAddr(concat[a, " \"", b, "\" not found"]) smlnj-110.79/cml/cml-lib/SMLNJ-INet/sock-util.sml-62- val (name, addr) = (case host ############################################## smlnj-110.79/cml/cml-lib/SMLNJ-INet/sock-util.sml-89- in smlnj-110.79/cml/cml-lib/SMLNJ-INet/sock-util.sml:90: Socket.connect (sock, INetSock.toAddr(addr, port)); smlnj-110.79/cml/cml-lib/SMLNJ-INet/sock-util.sml-91- sock ############################################## smlnj-110.79/MLRISC/Glue/mlrisc-ssa-optimizer.sml-5-functor SSAOptimizer smlnj-110.79/MLRISC/Glue/mlrisc-ssa-optimizer.sml:6: (structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/Glue/mlrisc-ssa-optimizer.sml-7- structure MLTreeComp : MLTREECOMP ############################################## smlnj-110.79/MLRISC/Glue/mlrisc-ssa-optimizer.sml-46- structure GraphImpl = DirectedGraph smlnj-110.79/MLRISC/Glue/mlrisc-ssa-optimizer.sml:47: structure Asm = Asm smlnj-110.79/MLRISC/Glue/mlrisc-ssa-optimizer.sml-48- ) ############################################## smlnj-110.79/MLRISC/Glue/mlrisc-glue.sml-7-functor MLRISCGlue smlnj-110.79/MLRISC/Glue/mlrisc-glue.sml:8: (structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/Glue/mlrisc-glue.sml-9- structure Flowgraph : FLOWGRAPH ############################################## smlnj-110.79/MLRISC/Glue/mlrisc-glue.sml-35- structure InsnProps = InsnProps smlnj-110.79/MLRISC/Glue/mlrisc-glue.sml:36: structure Asm = Asm smlnj-110.79/MLRISC/Glue/mlrisc-glue.sml-37- ) ############################################## smlnj-110.79/MLRISC/Glue/mlrisc-glue.sml-105- structure ClusterGraph = ClusterGraph smlnj-110.79/MLRISC/Glue/mlrisc-glue.sml:106: structure Asm = Asm smlnj-110.79/MLRISC/Glue/mlrisc-glue.sml-107- ) ############################################## smlnj-110.79/MLRISC/cluster/clusterViewer.sml-10- structure GraphViewer : GRAPH_VIEWER smlnj-110.79/MLRISC/cluster/clusterViewer.sml:11: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/cluster/clusterViewer.sml-12- sharing ClusterGraph.F.I = Asm.I ############################################## smlnj-110.79/MLRISC/alpha/ra/alphaRegAlloc.sml-15- structure F : FLOWGRAPH where I = I smlnj-110.79/MLRISC/alpha/ra/alphaRegAlloc.sml:16: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/alpha/ra/alphaRegAlloc.sml-17- where I = I and P = F.P) : ############################################## smlnj-110.79/MLRISC/hppa/hppa.mdl-978- in (* set the location of tmpLab *) smlnj-110.79/MLRISC/hppa/hppa.mdl:979: Label.setAddr(tmpLab, !loc+4); smlnj-110.79/MLRISC/hppa/hppa.mdl-980- branchLink(0wx3a,tmp,tmpLab,0w0,n); ############################################## smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-281- *) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:282: and addr(scale,T.ADD(_,e,T.LI n)) = DISP(expr e, n) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:283: | addr(scale,T.ADD(_,e,c as T.CONST _)) = smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-284- AMode(DISPea(expr e,I.LabExp(c,I.F))) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:285: | addr(scale,T.ADD(ty,i as T.LI _,e)) = addr(scale,T.ADD(ty,e,i)) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:286: | addr(scale,T.ADD(_,c as T.CONST _,e)) = smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-287- AMode(DISPea(expr e,I.LabExp(c,I.F))) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:288: | addr(scale,T.ADD(_,e,T.LABEXP le)) = smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-289- let val rs = expr e ############################################## smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-299- end smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:300: | addr(scale,T.ADD(t,e1 as T.LABEXP l,e2)) = addr(scale,T.ADD(t,e2,e1)) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:301: | addr(scale,T.ADD(_,e1,e2)) = smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-302- let (* check for special multiply add sequence ############################################## smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-326- end smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:327: | addr(scale,T.SUB(ty,e,T.LI n)) = addr(scale,T.ADD(ty,e,T.LI(T.I.NEGT(32,n)))) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:328: | addr(scale,T.LABEXP lexp) = AMode(DISPea(ldLabelEA(lexp))) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:329: | addr(scale,ea) = AMode(DISPea(expr ea,zeroImmed)) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-330- ############################################## smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-337- and load(scale,li,l,ls,ea,t,mem,an) = smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:338: case addr(scale,ea) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-339- of DISP(r, off) => ############################################## smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-350- let val (b,d) = smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:351: case addr(0,ea) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-352- of DISP(b, disp) => ############################################## smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-371- and fload(scale,fl,flx,flxs,ea,t,mem,an) = smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:372: case addr(scale,ea) of smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-373- AMode(INDXea(b,x)) => mark(I.FLOADX{flx=flx,b=b,x=x,t=t,mem=mem},an) ############################################## smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-389- let val r = fexpr data smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:390: in case addr(scale,ea) of smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-391- DISP(b, d) => ############################################## smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-569- val (b,x) = smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:570: case addr(32,e) of smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-571- DISP(b, i) => ############################################## smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-847- and addrOf e = smlnj-110.79/MLRISC/hppa/mltree/hppa.sml:848: case addr(0, e) smlnj-110.79/MLRISC/hppa/mltree/hppa.sml-849- of AMode mode => mode ############################################## smlnj-110.79/MLRISC/hppa/emit/hppaMC.sml-590- T.LI (IntInf.fromInt 4))) smlnj-110.79/MLRISC/hppa/emit/hppaMC.sml:591: in Label.setAddr (tmpLab, ( ! loc) + 4); smlnj-110.79/MLRISC/hppa/emit/hppaMC.sml-592- branchLink (0wx3A, tmp, tmpLab, 0wx0, n); ############################################## smlnj-110.79/MLRISC/hppa/ra/hppaRegAlloc.sml-13- structure F : FLOWGRAPH where I = I and P = P smlnj-110.79/MLRISC/hppa/ra/hppaRegAlloc.sml:14: structure Asm : INSTRUCTION_EMITTER where I = I and P = P) : smlnj-110.79/MLRISC/hppa/ra/hppaRegAlloc.sml-15- sig ############################################## smlnj-110.79/MLRISC/cm/makecm-62- if ($error) { exit 1; } smlnj-110.79/MLRISC/cm/makecm:63: #system("/bin/mv -f $cmfile $cmfile.bak"); smlnj-110.79/MLRISC/cm/makecm-64- open(MLRISC,">$cmfile") || die("$!: $cmfile"); ############################################## smlnj-110.79/MLRISC/cm/makeallcm-49- if ($outfile) smlnj-110.79/MLRISC/cm/makeallcm:50: { system("perl makecm $outfile"); smlnj-110.79/MLRISC/cm/makeallcm-51- } ############################################## smlnj-110.79/MLRISC/Doc/html/mltex2html-209- print STDERR "running: ", $command, "\n"; smlnj-110.79/MLRISC/Doc/html/mltex2html:210: system("$command"); smlnj-110.79/MLRISC/Doc/html/mltex2html-211- if ($?) { die("$? $command"); } ############################################## smlnj-110.79/MLRISC/Doc/latex/span-dep.tex-101- structure Flowgraph : \href{cluster.html}{FLOWGRAPH} smlnj-110.79/MLRISC/Doc/latex/span-dep.tex:102: structure Asm : \href{asm.html}{INSTRUCTION_EMITTER} smlnj-110.79/MLRISC/Doc/latex/span-dep.tex-103- sharing Emitter.I = Jumps.I = Flowgraph.I = Props.I = Asm.I) : BBSCHED ############################################## smlnj-110.79/MLRISC/Doc/latex/asm.tex-38-\begin{SML} smlnj-110.79/MLRISC/Doc/latex/asm.tex:39: val asm = makeStream [] smlnj-110.79/MLRISC/Doc/latex/asm.tex-40-\end{SML} ############################################## smlnj-110.79/MLRISC/Doc/latex/asm.tex-44-\begin{SML} smlnj-110.79/MLRISC/Doc/latex/asm.tex:45: val asm = AsmStream.withStream mystream makeStream [] smlnj-110.79/MLRISC/Doc/latex/asm.tex-46-\end{SML} smlnj-110.79/MLRISC/Doc/latex/asm.tex:47:binds the output of asm to \sml{mystream}. smlnj-110.79/MLRISC/Doc/latex/asm.tex-48- ############################################## smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml-6- (* align the address to the given alignment, which must be a power of 2 *) smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml:7: fun alignAddr (addr, align) = let smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml-8- val mask = Word.fromInt(align-1) ############################################## smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml-30- fun ssz ([], maxAlign, offset) = smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml:31: {sz = alignAddr(offset, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml-32- | ssz (ty::tys, maxAlign, offset) = let smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml-33- val {sz, align} = sizeOfTy ty smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml:34: val offset = alignAddr(offset, align) smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml-35- in ############################################## smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml-46- fun usz ([], maxAlign, maxSz) = smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml:47: {sz = alignAddr(maxSz, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/c-call/archs/x86-c-sizes.sml-48- | usz (ty::tys, maxAlign, maxSz) = let ############################################## smlnj-110.79/MLRISC/c-call/archs/x86-64-svid-fn.sml-168- val frameSzB = SA.find(store, CCs.cCallStk) smlnj-110.79/MLRISC/c-call/archs/x86-64-svid-fn.sml:169: val argMem = {szb=CSizes.alignAddr(frameSzB, frameAlignB), align=frameAlignB} smlnj-110.79/MLRISC/c-call/archs/x86-64-svid-fn.sml-170- in ############################################## smlnj-110.79/MLRISC/c-call/archs/x86-svid-fn.sml-119- if (abi = "Mac OS X") smlnj-110.79/MLRISC/c-call/archs/x86-svid-fn.sml:120: then X86CSizes.alignAddr(n, 16) smlnj-110.79/MLRISC/c-call/archs/x86-svid-fn.sml-121- else n ############################################## smlnj-110.79/MLRISC/c-call/archs/x86-svid-fn.sml-192- (* align the frame on a 16-byte boundary *) smlnj-110.79/MLRISC/c-call/archs/x86-svid-fn.sml:193: val szb = X86CSizes.alignAddr(#szb argMem + 2*4, 16)-2*4 smlnj-110.79/MLRISC/c-call/archs/x86-svid-fn.sml-194- in ############################################## smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml-21- (* align the address to the given alignment, which must be a power of 2 *) smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml:22: fun alignAddr (addr, align) = smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml-23- let val mask = Word.fromInt(align-1) ############################################## smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml-35- let fun ssz ([], maxAlign, offset) = smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml:36: {sz = alignAddr(offset, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml-37- | ssz (ty::tys, maxAlign, offset) = smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml-38- let val {sz, align} = sizeOfTy ty smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml:39: val offset = alignAddr(offset, align) smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml-40- in ############################################## smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml-51- fun usz ([], maxAlign, maxSz) = smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml:52: {sz = alignAddr(maxSz, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/c-call/archs/x86-64-c-sizes.sml-53- | usz (ty::tys, maxAlign, maxSz) = let ############################################## smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml-148- *) smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml:149:structure SparcAsm = SparcAsmEmitter smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml-150- (structure Instr = SparcInstr ############################################## smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml-310- structure InsnProps = SparcProps smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml:311: structure Asm = SparcAsmEmitter) smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml-312- ############################################## smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml-380- structure SpillInstr= SparcSpillInstr(SparcInstr) smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml:381: structure Asm = SparcAsmEmitter smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml-382- structure SpillHeur = ChaitinSpillHeur smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml-383- structure Spill = RASpill(structure InsnProps = InsnProps smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml:384: structure Asm = SparcAsmEmitter) smlnj-110.79/MLRISC/c-call/test/c-sparc-test.sml-385- ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-155- smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml:156:structure AMD64Asm = AMD64AsmEmitter smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-157- (structure Instr = AMD64Instr ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-171- structure InsnProps = AMD64InsnProps smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml:172: structure Asm = AMD64Asm) smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-173- ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-242-structure RASpill = RASpillWithRenaming ( smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml:243: structure Asm = AMD64Asm smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-244- structure InsnProps = AMD64InsnProps ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-285- structure CFG = AMD64CFG smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml:286: structure Asm = AMD64Asm smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-287- structure SpillHeur = ChowHennessySpillHeur ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-307- (structure I = AMD64Instr smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml:308: structure Asm = AMD64Asm smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-309- structure CFG = AMD64CFG ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-429- structure Spill = RASpill (structure InsnProps = AMD64InsnProps smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml:430: structure Asm = AMD64Asm) smlnj-110.79/MLRISC/c-call/test/c-x86-64-test.sml-431- ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml-166- smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml:167:structure X86Asm = X86AsmEmitter smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml-168- (structure Instr = X86Instr ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml-184- structure InsnProps = X86InsnProps smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml:185: structure Asm = X86Asm) smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml-186- ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml-258-structure RASpill = RASpillWithRenaming ( smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml:259: structure Asm = X86Asm smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml-260- structure InsnProps = X86InsnProps ############################################## smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml-318- structure CFG = X86CFG smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml:319: structure Asm = X86Asm smlnj-110.79/MLRISC/c-call/test/c-x86-test.sml-320- structure SpillHeur = ChowHennessySpillHeur ############################################## smlnj-110.79/MLRISC/mltree/mltree-utils.sml-595- and ccload(u,ea,m) = ccmemuse(u,ea,m) smlnj-110.79/MLRISC/mltree/mltree-utils.sml:596: and addr(u,ea,m,show) = smlnj-110.79/MLRISC/mltree/mltree-utils.sml-597- let val r = show m handle _ => Region.toString m ############################################## smlnj-110.79/MLRISC/mltree/mltree-utils.sml-599- in u^"["^rexp ea^r^"]" end smlnj-110.79/MLRISC/mltree/mltree-utils.sml:600: and mem(t,u,ea,m,show) = "mem"^ty t^addr(u,ea,m,show) smlnj-110.79/MLRISC/mltree/mltree-utils.sml:601: and fmem(t,u,ea,m,show) = "mem"^fty t^addr(u,ea,m,show) smlnj-110.79/MLRISC/mltree/mltree-utils.sml:602: and ccmem(u,ea,m,show) = "mem"^addr(u,ea,m,show) smlnj-110.79/MLRISC/mltree/mltree-utils.sml-603- and memdef(t,u,ea,m) = mem(t,u,ea,m,regionDef) ############################################## smlnj-110.79/MLRISC/x86/x86.mdl-128- (* LOCK can only be used in front of smlnj-110.79/MLRISC/x86/x86.mdl:129: * (Intel ordering, not gasm ordering) smlnj-110.79/MLRISC/x86/x86.mdl-130- * ADC, ADD, AND, BT mem, reg/imm ############################################## smlnj-110.79/MLRISC/x86/x86.mdl-314- rtl NOP{} = () (* duh! *) smlnj-110.79/MLRISC/x86/x86.mdl:315: rtl LEA{addr, r32} = $r[r32] := addr (* this is completely wrong! XXX *) smlnj-110.79/MLRISC/x86/x86.mdl-316- ############################################## smlnj-110.79/MLRISC/x86/mltree/x86-fp.sml-71- where CFG = Flowgraph smlnj-110.79/MLRISC/x86/mltree/x86-fp.sml:72: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/x86/mltree/x86-fp.sml-73- where I = X86Instr ############################################## smlnj-110.79/MLRISC/x86/mltree/orig-x86-fp.sml-71- where CFG = Flowgraph smlnj-110.79/MLRISC/x86/mltree/orig-x86-fp.sml:72: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/x86/mltree/orig-x86-fp.sml-73- where I = X86Instr ############################################## smlnj-110.79/MLRISC/x86/mltree/x86RA.sml-10- structure F : FLOWGRAPH where I = I smlnj-110.79/MLRISC/x86/mltree/x86RA.sml:11: structure Asm : INSTRUCTION_EMITTER where I = I smlnj-110.79/MLRISC/x86/mltree/x86RA.sml-12- ############################################## smlnj-110.79/MLRISC/x86/mltree/x86RA.sml-99- PrintCluster(structure Flowgraph=F smlnj-110.79/MLRISC/x86/mltree/x86RA.sml:100: structure Asm = Asm) smlnj-110.79/MLRISC/x86/mltree/x86RA.sml-101- ############################################## smlnj-110.79/MLRISC/x86/mltree/x86RA.sml-106- structure Liveness = Liveness(F) smlnj-110.79/MLRISC/x86/mltree/x86RA.sml:107: structure Asm = Asm smlnj-110.79/MLRISC/x86/mltree/x86RA.sml-108- ) ############################################## smlnj-110.79/MLRISC/x86/mltree/x86RA.sml-180- (structure Flowgraph = F smlnj-110.79/MLRISC/x86/mltree/x86RA.sml:181: structure Asm = Asm smlnj-110.79/MLRISC/x86/mltree/x86RA.sml-182- structure InsnProps = InsnProps ############################################## smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-115- (* align the address to the given alignment, which must be a power of 2 *) smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml:116: fun alignAddr (addr, align) = let smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-117- val mask = Word.fromInt(align-1) ############################################## smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-139- fun ssz ([], maxAlign, offset) = smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml:140: {sz = alignAddr(offset, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-141- | ssz (ty::tys, maxAlign, offset) = let smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-142- val {sz, align} = sizeOfTy ty smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml:143: val offset = alignAddr(offset, align) smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-144- in ############################################## smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-155- fun usz ([], maxAlign, maxSz) = smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml:156: {sz = alignAddr(maxSz, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-157- | usz (ty::tys, maxAlign, maxSz) = let ############################################## smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-237- fun next {ty, align, sz} = let smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml:238: val offset = alignAddr (offset, align) smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-239- in ############################################## smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-242- fun nextFlt (ty, szb) = let smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml:243: val offset = alignAddr (offset, 4) smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-244- in ############################################## smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-273- val (argLocs, argSz) = assign (paramTys, argOffset, []) smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml:274: val argMem = {szb = alignAddr (argSz, frameAlign), align = frameAlign} smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-275- in { ############################################## smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-368- T.STORE(ty, offSP offset, T.REG(ty, tmp), stack) smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml:369: :: T.MV(ty, tmp, T.LOAD(ty, addr(offset - baseOffset), mem)) smlnj-110.79/MLRISC/x86/c-calls/ia32-svid.sml-370- :: stms ############################################## smlnj-110.79/MLRISC/x86/ra/x86RA.sml-115- where I = I smlnj-110.79/MLRISC/x86/ra/x86RA.sml:116: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/x86/ra/x86RA.sml-117- where I = I ############################################## smlnj-110.79/MLRISC/x86/ra/x86RA.sml-221- PrintFlowgraph(structure CFG=CFG smlnj-110.79/MLRISC/x86/ra/x86RA.sml:222: structure Asm = Asm) smlnj-110.79/MLRISC/x86/ra/x86RA.sml-223- ############################################## smlnj-110.79/MLRISC/x86/ra/x86RA.sml-228- structure Liveness = Liveness(CFG) smlnj-110.79/MLRISC/x86/ra/x86RA.sml:229: structure Asm = Asm smlnj-110.79/MLRISC/x86/ra/x86RA.sml-230- ) ############################################## smlnj-110.79/MLRISC/x86/ra/x86RA.sml-311- (structure Flowgraph = CFG smlnj-110.79/MLRISC/x86/ra/x86RA.sml:312: structure Asm = Asm smlnj-110.79/MLRISC/x86/ra/x86RA.sml-313- structure InsnProps = InsnProps ############################################## smlnj-110.79/MLRISC/x86/ra/x86RegAlloc.sml-4- structure F : FLOWGRAPH where I = I smlnj-110.79/MLRISC/x86/ra/x86RegAlloc.sml:5: structure Asm : INSTRUCTION_EMITTER where I = I and P = F.P smlnj-110.79/MLRISC/x86/ra/x86RegAlloc.sml-6- ) : ############################################## smlnj-110.79/MLRISC/mips/mltree/mipsRTLProps.sml-11- structure OperandTable : OPERAND_TABLE where I = Instr smlnj-110.79/MLRISC/mips/mltree/mipsRTLProps.sml:12: structure Asm : INSTRUCTION_EMITTER where I = Instr smlnj-110.79/MLRISC/mips/mltree/mipsRTLProps.sml-13- sharing Instr.T = RTL.T ############################################## smlnj-110.79/MLRISC/mips/mips.mdl-260- fun emit_nop false = () | emit_nop true = emit "\n\tnop" smlnj-110.79/MLRISC/mips/mips.mdl:261: end (* Asm *) smlnj-110.79/MLRISC/mips/mips.mdl-262- ############################################## smlnj-110.79/MLRISC/ppc/ppc.mdl-648- smlnj-110.79/MLRISC/ppc/ppc.mdl:649: fun addr(ra,I.RegOp rb) = (emitCell ra; emit ", "; emitCell rb) smlnj-110.79/MLRISC/ppc/ppc.mdl:650: | addr(ra,d) = (emit_operand d; emit "("; emitCell ra; emit ")") smlnj-110.79/MLRISC/ppc/ppc.mdl-651- ############################################## smlnj-110.79/MLRISC/ppc/ppc.mdl-655- L of {ld:load, rt: $GP, ra: $GP, d:operand, mem:Region.region} smlnj-110.79/MLRISC/ppc/ppc.mdl:656: ``<emitx(asm_load ld,d)>\t<rt>, <addr(ra,d)><mem>'' smlnj-110.79/MLRISC/ppc/ppc.mdl-657- load{ld,rt,ra,d} ############################################## smlnj-110.79/MLRISC/ppc/ppc.mdl-659- | LF of {ld:fload, ft: $FP, ra: $GP, d:operand, mem:Region.region} smlnj-110.79/MLRISC/ppc/ppc.mdl:660: ``<emitx(asm_fload ld,d)>\t<ft>, <addr(ra,d)><mem>'' smlnj-110.79/MLRISC/ppc/ppc.mdl-661- fload{ld,ft,ra,d} ############################################## smlnj-110.79/MLRISC/ppc/ppc.mdl-663- | ST of {st:store, rs: $GP, ra: $GP, d:operand, mem:Region.region} smlnj-110.79/MLRISC/ppc/ppc.mdl:664: ``<emitx(asm_store st,d)>\t<rs>, <addr(ra,d)><mem>'' smlnj-110.79/MLRISC/ppc/ppc.mdl-665- store{st,rs,ra,d} ############################################## smlnj-110.79/MLRISC/ppc/ppc.mdl-667- | STF of {st:fstore, fs: $FP, ra: $GP, d:operand, mem:Region.region} smlnj-110.79/MLRISC/ppc/ppc.mdl:668: ``<emitx(asm_fstore st,d)>\t<fs>, <addr(ra,d)><mem>'' smlnj-110.79/MLRISC/ppc/ppc.mdl-669- fstore{st,fs,ra,d} ############################################## smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-242- *) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:243: and addr(size,T.ADD(_, e, T.LI i)) = smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-244- let val ra = expr e ############################################## smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-251- end smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:252: | addr(size,T.ADD(ty, T.LI i, e)) = addr(size,T.ADD(ty, e, T.LI i)) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:253: | addr(size,exp as T.SUB(ty, e, T.LI i)) = smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:254: (addr(size,T.ADD(ty, e, T.LI (T.I.NEGT(32, i)))) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-255- handle Overflow => (expr exp, I.ImmedOp 0)) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:256: | addr(size,T.ADD(_, e1, e2)) = (expr e1, I.RegOp (expr e2)) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:257: | addr(size,e) = (expr e, I.ImmedOp 0) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-258- ############################################## smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-412- | _ => error "store" smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:413: val (r, disp) = addr(size,ea) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-414- in mark(I.ST{st=st, rs=expr data, ra=r, d=disp, mem=mem}, an) end ############################################## smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-423- | _ => error "fstore" smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:424: val (r, disp) = addr(size,ea) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-425- in mark(I.STF{st=st,fs=fexpr data, ra=r, d=disp, mem=mem},an) end ############################################## smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-461- else (ld32,signed16) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:462: val (r, disp) = addr(size,ea) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-463- in mark(I.L{ld=ld, rt=rt, ra=r, d=disp, mem=mem},an) ############################################## smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-659- else (ld32,signed16) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml:660: val (r, disp) = addr(size,ea) smlnj-110.79/MLRISC/ppc/mltree/ppc.sml-661- in mark(I.LF{ld=ld, ft=ft, ra=r, d=disp, mem=mem}, an) end ############################################## smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-319-(*#line 649.7 "ppc/ppc.mdl"*) smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml:320: fun addr (ra, I.RegOp rb) = smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-321- ( emitCell ra; ############################################## smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-323- emitCell rb ) smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml:324: | addr (ra, d) = smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-325- ( emit_operand d; ############################################## smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-335- emit ", "; smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml:336: addr (ra, d); smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-337- emit_region mem ) ############################################## smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-342- emit ", "; smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml:343: addr (ra, d); smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-344- emit_region mem ) ############################################## smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-349- emit ", "; smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml:350: addr (ra, d); smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-351- emit_region mem ) ############################################## smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-356- emit ", "; smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml:357: addr (ra, d); smlnj-110.79/MLRISC/ppc/emit/ppcAsm.sml-358- emit_region mem ) ############################################## smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml-159- (* align the address to the given alignment, which must be a power of 2 *) smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml:160: fun alignAddr (addr, align) = let smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml-161- val mask = Word.fromInt(align-1) ############################################## smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml-173- fun f ([], maxAlign, offset) = smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml:174: {sz = alignAddr(offset, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml-175- | f (ty::tys, maxAlign, offset) = let ############################################## smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml-177- val align = Int.min(align, 4) smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml:178: val offset = alignAddr(offset, align) smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml-179- in ############################################## smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml-196- fun f ([], maxAlign, maxSz) = smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml:197: {sz = alignAddr(maxSz, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/ppc/c-calls/ppc-macosx.sml-198- | f (ty::tys, maxAlign, maxSz) = let ############################################## smlnj-110.79/MLRISC/ppc/ra/ppcRegAlloc.sml-3- structure F : FLOWGRAPH where I = I and P = P smlnj-110.79/MLRISC/ppc/ra/ppcRegAlloc.sml:4: structure Asm : INSTRUCTION_EMITTER where I=I and P=P) : smlnj-110.79/MLRISC/ppc/ra/ppcRegAlloc.sml-5- sig ############################################## smlnj-110.79/MLRISC/demo/demo-sparc.sml-22- *) smlnj-110.79/MLRISC/demo/demo-sparc.sml:23:structure SparcAsm = SparcAsmEmitter smlnj-110.79/MLRISC/demo/demo-sparc.sml-24- (structure Instr = SparcInstr ############################################## smlnj-110.79/MLRISC/demo/demo-sparc.sml-123- structure InsnProps = SparcProps(SparcInstr) smlnj-110.79/MLRISC/demo/demo-sparc.sml:124: structure Asm = SparcAsm smlnj-110.79/MLRISC/demo/demo-sparc.sml-125- ############################################## smlnj-110.79/MLRISC/demo/demo-sparc.sml-129- structure Flowgraph = Flowgraph smlnj-110.79/MLRISC/demo/demo-sparc.sml:130: structure Asm = Asm smlnj-110.79/MLRISC/demo/demo-sparc.sml-131- structure InsnProps = InsnProps smlnj-110.79/MLRISC/demo/demo-sparc.sml:132: structure Spill = RASpill(structure Asm = Asm smlnj-110.79/MLRISC/demo/demo-sparc.sml-133- structure InsnProps = InsnProps) ############################################## smlnj-110.79/MLRISC/demo/demo-alpha.sml-38- *) smlnj-110.79/MLRISC/demo/demo-alpha.sml:39:structure AlphaAsm = AlphaAsmEmitter smlnj-110.79/MLRISC/demo/demo-alpha.sml-40- (structure Instr = AlphaInstr ############################################## smlnj-110.79/MLRISC/demo/demo-alpha.sml-198- structure InsnProps = AlphaProps(AlphaInstr) smlnj-110.79/MLRISC/demo/demo-alpha.sml:199: structure Asm = AlphaAsm smlnj-110.79/MLRISC/demo/demo-alpha.sml-200- structure MLTreeComp = AlphaMLTreeComp ############################################## smlnj-110.79/MLRISC/demo/demo-alpha.sml-210- structure Flowgraph = Flowgraph smlnj-110.79/MLRISC/demo/demo-alpha.sml:211: structure Asm = Asm smlnj-110.79/MLRISC/demo/demo-alpha.sml-212- structure Rewrite = AlphaRewrite(AlphaInstr) smlnj-110.79/MLRISC/demo/demo-alpha.sml-213- structure InsnProps = InsnProps smlnj-110.79/MLRISC/demo/demo-alpha.sml:214: structure Spill = RASpill(structure Asm = Asm smlnj-110.79/MLRISC/demo/demo-alpha.sml-215- structure InsnProps = InsnProps) ############################################## smlnj-110.79/MLRISC/demo/demo-backend.sml-8- structure InsnProps : INSN_PROPERTIES smlnj-110.79/MLRISC/demo/demo-backend.sml:9: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/demo/demo-backend.sml-10- structure RA : CLUSTER_OPTIMIZATION ############################################## smlnj-110.79/MLRISC/demo/demo-amd64.sml-52- smlnj-110.79/MLRISC/demo/demo-amd64.sml:53:structure AMD64Asm = AMD64AsmEmitter smlnj-110.79/MLRISC/demo/demo-amd64.sml-54- (structure Instr = AMD64Instr ############################################## smlnj-110.79/MLRISC/demo/demo-amd64.sml-68- structure InsnProps = AMD64InsnProps smlnj-110.79/MLRISC/demo/demo-amd64.sml:69: structure Asm = AMD64Asm) smlnj-110.79/MLRISC/demo/demo-amd64.sml-70- ############################################## smlnj-110.79/MLRISC/demo/demo-amd64.sml-135-structure RASpill = RASpillWithRenaming ( smlnj-110.79/MLRISC/demo/demo-amd64.sml:136: structure Asm = AMD64Asm smlnj-110.79/MLRISC/demo/demo-amd64.sml-137- structure InsnProps = AMD64InsnProps ############################################## smlnj-110.79/MLRISC/demo/demo-amd64.sml-177- structure CFG = AMD64CFG smlnj-110.79/MLRISC/demo/demo-amd64.sml:178: structure Asm = AMD64Asm smlnj-110.79/MLRISC/demo/demo-amd64.sml-179- structure SpillHeur = ChowHennessySpillHeur ############################################## smlnj-110.79/MLRISC/IR/mlrisc-cfg.sml-10- structure InsnProps : INSN_PROPERTIES smlnj-110.79/MLRISC/IR/mlrisc-cfg.sml:11: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/IR/mlrisc-cfg.sml-12- sharing Asm.I = InsnProps.I = I ############################################## smlnj-110.79/MLRISC/IR/mlrisc-format-insn.sml-16- smlnj-110.79/MLRISC/IR/mlrisc-format-insn.sml:17:functor FormatInstruction(Asm : INSTRUCTION_EMITTER) : FORMAT_INSTRUCTION = smlnj-110.79/MLRISC/IR/mlrisc-format-insn.sml-18-struct ############################################## smlnj-110.79/MLRISC/SSA/ssa.sml-42- *------------------------------------------------------------------------*) smlnj-110.79/MLRISC/SSA/ssa.sml:43: val showAsm = MLRiscControl.getFlag "ssa-show-asm" smlnj-110.79/MLRISC/SSA/ssa.sml-44- val showPos = MLRiscControl.getFlag "ssa-show-pos" ############################################## smlnj-110.79/MLRISC/SSA/ssa.sml-468- val regmap = CFG.regmap cfg smlnj-110.79/MLRISC/SSA/ssa.sml:469: val asm = FormatInsn.toString (!(CFG.annotations cfg)) smlnj-110.79/MLRISC/SSA/ssa.sml-470- (C.lookup regmap) ############################################## smlnj-110.79/MLRISC/SSA/ssa.sml-523- else ssa smlnj-110.79/MLRISC/SSA/ssa.sml:524: in if !showAsm then asm ssa_op^" ["^ssa^"]" else ssa end smlnj-110.79/MLRISC/SSA/ssa.sml-525- end ############################################## smlnj-110.79/MLRISC/visualization/cfgViewer.sml-3- structure GraphViewer : GRAPH_VIEWER smlnj-110.79/MLRISC/visualization/cfgViewer.sml:4: structure Asm : INSTRUCTION_EMITTER where I = CFG.I) smlnj-110.79/MLRISC/visualization/cfgViewer.sml-5- : sig ############################################## smlnj-110.79/MLRISC/visualization/mlrisc-format-insn.sml-16- smlnj-110.79/MLRISC/visualization/mlrisc-format-insn.sml:17:functor FormatInstruction(Asm : INSTRUCTION_EMITTER) : FORMAT_INSTRUCTION = smlnj-110.79/MLRISC/visualization/mlrisc-format-insn.sml-18-struct ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml-100- datatype yystart_state = smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml:101:ASM | COMMENT | ASMQUOTE | INITIAL smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml-102- structure UserDeclarations = ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml-173- pos,pos + size s) smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml:174:fun transAsm s = smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml-175-let fun loop(#"\\" :: #"<" ::s) = #"<"::loop s ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml-182-fun asmtext(err,s,pos) = smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml:183: ASMTEXT(check(err,pos,s,String.fromString(transAsm s)),pos,pos + size s) smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml-184- ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml-1338- else (case (!(yyss)) smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml:1339: of ASM => yygo yyactTable (0, !(yystrm), yyNO_MATCH) smlnj-110.79/MLRISC/Tools/Parser/mdl.lex.sml-1340- | COMMENT => yygo yyactTable (1, !(yystrm), yyNO_MATCH) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.lex-69- pos,pos + size s) smlnj-110.79/MLRISC/Tools/Parser/mdl.lex:70:fun transAsm s = smlnj-110.79/MLRISC/Tools/Parser/mdl.lex-71-let fun loop(#"\\" :: #"<" ::s) = #"<"::loop s ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.lex-78-fun asmtext(err,s,pos) = smlnj-110.79/MLRISC/Tools/Parser/mdl.lex:79: ASMTEXT(check(err,pos,s,String.fromString(transAsm s)),pos,pos + size s) smlnj-110.79/MLRISC/Tools/Parser/mdl.lex-80- ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.lex-248- smlnj-110.79/MLRISC/Tools/Parser/mdl.lex:249:%s COMMENT ASM ASMQUOTE; smlnj-110.79/MLRISC/Tools/Parser/mdl.lex-250- ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-305- fieldty of id option | smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:306: asms of asm list | smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:307: asm_strings of asm list | smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:308: asm of asm | smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:309: hasasm of bool | smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-310- sigsub of sigexp -> sigexp | ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-569- smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:570:datatypebind: tyvarseq id opcodeencoding fieldty hasasm EQ consbinds smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:571: (let val a = hasasm orelse smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-572- List.exists(fn CONSbind{asm=SOME _,...}=>true ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-578- ) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:579:| tyvarseq id opcodeencoding fieldty hasasm EQ DATATYPE ty smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-580- (DATATYPEEQbind{id=id,tyvars=tyvarseq,ty=ty}) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-678-consassembly: (NONE) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:679:| string (SOME(STRINGasm string)) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:680:| asm_strings (SOME(ASMasm asm_strings)) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:681:| ASM_COLON exp (SOME(ASMasm[EXPasm exp])) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-682- ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-686- smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:687:asms: asm ([asm]) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:688:| asm asms (asm::asms) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-689- smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:690:asm: LMETA exp RMETA (EXPasm exp) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:691:| ASMTEXT (TEXTasm ASMTEXT) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-692- ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-774-(*| LPAREN exp COLON ty RPAREN (TYPEDexp(exp,ty))*) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm:775:| asm_strings (ASMexp(ASMasm asm_strings)) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm-776-| LPAREN RPAREN (TUPLEexp []) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-5937- | sigsubs of unit -> (sigexp -> sigexp) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:5938: | sigsub of unit -> (sigexp -> sigexp) | hasasm of unit -> (bool) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:5939: | asm of unit -> (asm) | asm_strings of unit -> (asm list) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:5940: | asms of unit -> (asm list) | fieldty of unit -> (id option) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-5941- | encodingexps of unit -> (int list) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7333-| ( 129, ( ( _, ( MlyValue.consbinds consbinds1, _, consbinds1right)) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7334: :: _ :: ( _, ( MlyValue.hasasm hasasm1, _, _)) :: ( _, ( smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7335-MlyValue.fieldty fieldty1, _, _)) :: ( _, ( MlyValue.opcodeencoding ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7342- val (fieldty as fieldty1) = fieldty1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7343: val (hasasm as hasasm1) = hasasm1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7344- val (consbinds as consbinds1) = consbinds1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7345- in ( smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7346:let val a = hasasm orelse smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7347- List.exists(fn CONSbind{asm=SOME _,...}=>true ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7359-| ( 130, ( ( _, ( MlyValue.ty ty1, _, ty1right)) :: _ :: _ :: ( _, ( smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7360:MlyValue.hasasm hasasm1, _, _)) :: ( _, ( MlyValue.fieldty fieldty1, _ smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7361-, _)) :: ( _, ( MlyValue.opcodeencoding opcodeencoding1, _, _)) :: ( _ ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7375-| ( 131, ( ( _, ( _, DEREF1left, DEREF1right)) :: rest671)) => let smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7376: val result = MlyValue.hasasm (fn _ => (true)) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7377- in ( LrTable.NT 149, ( result, DEREF1left, DEREF1right), rest671) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7378-end smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7379:| ( 132, ( rest671)) => let val result = MlyValue.hasasm (fn _ => ( smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7380-false)) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7774- val (string as string1) = string1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7775: in (SOME(STRINGasm string)) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7776-end) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7783- = asm_strings1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7784: in (SOME(ASMasm asm_strings)) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7785-end) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7791-MlyValue.consassembly (fn _ => let val (exp as exp1) = exp1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7792: in (SOME(ASMasm[EXPasm exp])) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7793-end) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7815-end smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7816:| ( 188, ( ( _, ( MlyValue.asm asm1, asm1left, asm1right)) :: rest671 smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7817:)) => let val result = MlyValue.asms (fn _ => let val (asm as asm1) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7818- = asm1 () ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7823-| ( 189, ( ( _, ( MlyValue.asms asms1, _, asms1right)) :: ( _, ( smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7824:MlyValue.asm asm1, asm1left, _)) :: rest671)) => let val result = smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7825:MlyValue.asms (fn _ => let val (asm as asm1) = asm1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7826- val (asms as asms1) = asms1 () ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7832- _)) :: ( _, ( _, LMETA1left, _)) :: rest671)) => let val result = smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7833:MlyValue.asm (fn _ => let val (exp as exp1) = exp1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7834: in (EXPasm exp) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7835-end) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7838-| ( 191, ( ( _, ( MlyValue.ASMTEXT ASMTEXT1, ASMTEXT1left, smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7839:ASMTEXT1right)) :: rest671)) => let val result = MlyValue.asm (fn _ smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7840- => let val (ASMTEXT as ASMTEXT1) = ASMTEXT1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:7841: in (TEXTasm ASMTEXT) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-7842-end) ############################################## smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-8251- (fn _ => let val (asm_strings as asm_strings1) = asm_strings1 () smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml:8252: in (ASMexp(ASMasm asm_strings)) smlnj-110.79/MLRISC/Tools/Parser/mdl.grm.sml-8253-end) ############################################## smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml-165- and datatypebind = DATATYPEbind of smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml:166: {id:id,tyvars:tyvar list,mc : opcodeencoding,asm : bool, smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml-167- field:id option,cbs:consbind list} ############################################## smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml-174- CONSbind of {id : id,ty:ty option,mc : mc option, smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml:175: asm : assembly option, smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml-176- rtl : exp option, ############################################## smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml-201- smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml:202: and assembly = STRINGasm of string smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml:203: | ASMasm of asm list smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml-204- smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml:205: and asm = TEXTasm of string smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml:206: | EXPasm of exp smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sml-207- ############################################## smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig-169- and datatypebind = DATATYPEbind of smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig:170: {id:id,tyvars:tyvar list,mc : opcodeencoding,asm : bool, smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig-171- field:id option,cbs:consbind list} ############################################## smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig-178- CONSbind of {id : id,ty:ty option,mc : mc option, smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig:179: asm : assembly option, smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig-180- rtl : exp option, ############################################## smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig-205- smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig:206: and assembly = STRINGasm of string smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig:207: | ASMasm of asm list smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig-208- smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig:209: and asm = TEXTasm of string smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig:210: | EXPasm of exp smlnj-110.79/MLRISC/Tools/FakeSMLAst/ast.sig-211- ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-ssaprops.sml-199- "structure InsnProps : INSN_PROPERTIES where I = Instr", smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-ssaprops.sml:200: "structure Asm : INSTRUCTION_EMITTER where I = Instr", smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-ssaprops.sml-201- "structure OperandTable : OPERAND_TABLE where I = Instr", ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-mc.sml-310- (if debugOn then smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-mc.sml:311: " emitInstr instr; asm instr" smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-mc.sml-312- else ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-rtl-comp.sml-490- (* Translate rtl definition *) smlnj-110.79/MLRISC/Tools/MDL/mdl-rtl-comp.sml:491: fun trans(TEXTasm s) = LIT s smlnj-110.79/MLRISC/Tools/MDL/mdl-rtl-comp.sml-492- | trans(EXPasm(IDexp(IDENT([],x)))) = ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-rtl-comp.sml-500- in TYP(x,db) end smlnj-110.79/MLRISC/Tools/MDL/mdl-rtl-comp.sml:501: | trans(EXPasm e) = fail("illegal rtl expression "^e2s e) smlnj-110.79/MLRISC/Tools/MDL/mdl-rtl-comp.sml-502- smlnj-110.79/MLRISC/Tools/MDL/mdl-rtl-comp.sml-503- fun exp _ (e as RTLexp [COMPOSITErtl _]) = e smlnj-110.79/MLRISC/Tools/MDL/mdl-rtl-comp.sml:504: | exp _ (ASMexp(ASMasm rtl)) = smlnj-110.79/MLRISC/Tools/MDL/mdl-rtl-comp.sml-505- foreachRtlPat (genCode(instr, E)) (map trans rtl) ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-55- *) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:56: datatype mode = EMIT | ASM | NOTHING smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-57- ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-61- fun modeOf(DATATYPEbind{cbs, asm, ...}) = smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:62: let val mode = if asm then ASM else NOTHING smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-63- fun loop([], m) = m ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-65- | loop(CONSbind{asm=NONE, ...}::cbs, m) = loop(cbs, m) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:66: | loop(CONSbind{asm=SOME(STRINGasm _), ...}::cbs, _)= smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-67- loop(cbs, ASM) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:68: | loop(CONSbind{asm=SOME(ASMasm a), ...}::cbs, m)= smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-69- loop(cbs, loop2(a, ASM)) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-70- and loop2([], m) = m smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:71: | loop2(EXPasm _::_, _) = EMIT smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-72- | loop2(_::a, m) = loop2(a, m) ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-81- fun emit id = "emit_"^id smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:82: fun asm id = "asm_"^id smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-83- ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-114- | EMIT => mkAsms(dbs, FUNbind(emit id,mkAsm(EMIT,cbs))::fbs) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:115: | ASM => mkAsms(dbs, mkEmit id:: smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:116: FUNbind(asm id,mkAsm(ASM,cbs))::fbs) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-117- ) ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-121- FUNbind(emit id,[CLAUSE([IDpat "x"],NONE, smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:122: APP("emit",APP(asm id,ID "x")))]) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-123- ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-127- if mode = EMIT then APP("emit",e) else e smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:128: fun asmToExp E (TEXTasm s) = emitIt(mkString s) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-129- | asmToExp E (EXPasm(IDexp(IDENT([],x)))) = ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-134- ) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:135: | asmToExp E (EXPasm e) = smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:136: let fun exp _ (ASMexp(STRINGasm s)) = emitIt(mkString s) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:137: | exp _ (ASMexp(ASMasm a)) = SEQexp(map (asmToExp E) a) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-138- | exp _ e = e ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-148- let val exp = smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:149: case asm of smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-150- NONE => emitIt(mkString id) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:151: | SOME(STRINGasm s) => emitIt(mkString s) smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml:152: | SOME(ASMasm a) => smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-asm.sml-153- let val consEnv = T.consBindings cb ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-glue.sml-79- structure Shuffle = MDLDummyGen(MDLCompile) smlnj-110.79/MLRISC/Tools/MDL/mdl-glue.sml:80: structure Asm = MDLGenAsm(MDLCompile) smlnj-110.79/MLRISC/Tools/MDL/mdl-glue.sml-81- structure MC = MDLGenMC(MDLCompile) smlnj-110.79/MLRISC/Tools/MDL/mdl-glue.sml-82- structure Jumps = MDLDummyGen(MDLCompile) smlnj-110.79/MLRISC/Tools/MDL/mdl-glue.sml:83: structure Dasm = MDLDummyGen(MDLCompile) smlnj-110.79/MLRISC/Tools/MDL/mdl-glue.sml-84- structure Props = MDLGenInsnProps(MDLRTLComp) ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen.sml-9- structure Instr : MDL_GEN_MODULE smlnj-110.79/MLRISC/Tools/MDL/mdl-gen.sml:10: structure Asm : MDL_GEN_MODULE smlnj-110.79/MLRISC/Tools/MDL/mdl-gen.sml-11- structure MC : MDL_GEN_MODULE ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen.sml-13- structure Jumps : MDL_GEN_MODULE smlnj-110.79/MLRISC/Tools/MDL/mdl-gen.sml:14: structure Dasm : MDL_GEN_MODULE smlnj-110.79/MLRISC/Tools/MDL/mdl-gen.sml-15- structure Props : MDL_GEN_MODULE2 ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-schedprops.sml-275- "structure RegionProps : REGION_PROPERTIES", smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-schedprops.sml:276: "structure Asm : INSTRUCTION_EMITTER where I = Instr", smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-schedprops.sml-277- " sharing RegionProps.Region = Instr.Region" ############################################## smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-rtlprops.sml-149- "structure OperandTable : OPERAND_TABLE where I = Instr", smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-rtlprops.sml:150: "structure Asm : INSTRUCTION_EMITTER where I = Instr", smlnj-110.79/MLRISC/Tools/MDL/mdl-gen-rtlprops.sml-151- " sharing Instr.T = RTL.T" ############################################## smlnj-110.79/MLRISC/Tools/mdl.vim-22-syn keyword mdStatement called locations storage internal latency pipeline smlnj-110.79/MLRISC/Tools/mdl.vim:23:syn keyword mdStatement mc asm rtl padding cpu resource smlnj-110.79/MLRISC/Tools/mdl.vim-24-syn keyword mdConditional if else then case include ############################################## smlnj-110.79/MLRISC/instructions/label.sml-46- exception GlobalLabel smlnj-110.79/MLRISC/instructions/label.sml:47: fun setAddr ({id, addr, kind=GLOB _}, _) = raise GlobalLabel smlnj-110.79/MLRISC/instructions/label.sml:48: | setAddr ({id, addr, kind}, a) = addr := a smlnj-110.79/MLRISC/instructions/label.sml-49- ############################################## smlnj-110.79/MLRISC/sparc/mltree/sparc.sml-369- (* convert an expression into an addressing mode *) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:370: and addr(T.ADD(ty, (T.ADD (_, e, T.LI n)| smlnj-110.79/MLRISC/sparc/mltree/sparc.sml-371- T.ADD (_, T.LI n, e)), T.LI n')) = smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:372: addr(T.ADD (ty, e, T.LI (T.I.ADD (ty, n, n')))) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:373: | addr(T.ADD(ty, T.SUB (_, e, T.LI n), T.LI n')) = smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:374: addr(T.ADD (ty, e, T.LI (T.I.SUB (ty, n', n)))) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:375: | addr(T.ADD(_,e,T.LI n)) = smlnj-110.79/MLRISC/sparc/mltree/sparc.sml-376- if immed13 n then (expr e,I.IMMED(toInt n)) ############################################## smlnj-110.79/MLRISC/sparc/mltree/sparc.sml-378- in loadImmed(n,d,REG,[]); (d,opn e) end smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:379: | addr(T.ADD(_,e,x as T.CONST c)) = (expr e,I.LAB x) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:380: | addr(T.ADD(_,e,x as T.LABEL l)) = (expr e,I.LAB x) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:381: | addr(T.ADD(_,e,T.LABEXP x)) = (expr e,I.LAB x) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:382: | addr(T.ADD(ty,i as T.LI _,e)) = addr(T.ADD(ty,e,i)) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:383: | addr(T.ADD(_,x as T.CONST c,e)) = (expr e,I.LAB x) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:384: | addr(T.ADD(_,x as T.LABEL l,e)) = (expr e,I.LAB x) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:385: | addr(T.ADD(_,T.LABEXP x,e)) = (expr e,I.LAB x) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:386: | addr(T.ADD(_,e1,e2)) = (expr e1,I.REG(expr e2)) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:387: | addr(T.SUB(ty,e,T.LI n)) = addr(T.ADD(ty,e,T.LI(T.I.NEG(32,n)))) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:388: | addr(x as T.LABEL l) = (zeroR,I.LAB x) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml:389: | addr(T.LABEXP x) = (zeroR,I.LAB x) smlnj-110.79/MLRISC/sparc/mltree/sparc.sml-390- | addr a = (expr a,zeroOpn) ############################################## smlnj-110.79/MLRISC/sparc/ra/sparcRegAlloc.sml-13- structure F : FLOWGRAPH where I = I smlnj-110.79/MLRISC/sparc/ra/sparcRegAlloc.sml:14: structure Asm : INSTRUCTION_EMITTER where I = I and P=F.P smlnj-110.79/MLRISC/sparc/ra/sparcRegAlloc.sml-15- ) : ############################################## smlnj-110.79/MLRISC/ra/cluster-ra.sml-15-functor ClusterRA smlnj-110.79/MLRISC/ra/cluster-ra.sml:16: (structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/ra/cluster-ra.sml-17- structure Flowgraph : CONTROL_FLOW_GRAPH ############################################## smlnj-110.79/MLRISC/ra/risc-ra.sml-7- (structure I : INSTRUCTIONS smlnj-110.79/MLRISC/ra/risc-ra.sml:8: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/ra/risc-ra.sml-9- where I = I ############################################## smlnj-110.79/MLRISC/ra/risc-ra.sml-91- (structure Flowgraph = CFG smlnj-110.79/MLRISC/ra/risc-ra.sml:92: structure Asm = Asm smlnj-110.79/MLRISC/ra/risc-ra.sml-93- structure InsnProps = InsnProps ############################################## smlnj-110.79/MLRISC/ra/ra-spill-with-renaming.sml-89- (structure InsnProps : INSN_PROPERTIES smlnj-110.79/MLRISC/ra/ra-spill-with-renaming.sml:90: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/ra/ra-spill-with-renaming.sml-91- where I = InsnProps.I ############################################## smlnj-110.79/MLRISC/ra/ra-spill.sml-58- (structure InsnProps : INSN_PROPERTIES smlnj-110.79/MLRISC/ra/ra-spill.sml:59: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/ra/ra-spill.sml-60- where I = InsnProps.I ############################################## smlnj-110.79/MLRISC/flowgraph/cfgView.sml-5-functor CFGView smlnj-110.79/MLRISC/flowgraph/cfgView.sml:6: (structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/flowgraph/cfgView.sml-7- structure CFG : CONTROL_FLOW_GRAPH ############################################## smlnj-110.79/MLRISC/flowgraph/cfg.sml-13- structure InsnProps : INSN_PROPERTIES where I = I smlnj-110.79/MLRISC/flowgraph/cfg.sml:14: structure Asm : INSTRUCTION_EMITTER where I = I smlnj-110.79/MLRISC/flowgraph/cfg.sml-15- ) : CONTROL_FLOW_GRAPH = ############################################## smlnj-110.79/MLRISC/flowgraph/printFlowgraph.sml-6-sig smlnj-110.79/MLRISC/flowgraph/printFlowgraph.sml:7: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/flowgraph/printFlowgraph.sml-8- structure CFG : CONTROL_FLOW_GRAPH ############################################## smlnj-110.79/MLRISC/flowgraph/printFlowgraph.sml-16-functor PrintFlowgraph smlnj-110.79/MLRISC/flowgraph/printFlowgraph.sml:17: (structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/flowgraph/printFlowgraph.sml-18- structure CFG : CONTROL_FLOW_GRAPH ############################################## smlnj-110.79/MLRISC/flowgraph/printFlowgraph.sml-22-struct smlnj-110.79/MLRISC/flowgraph/printFlowgraph.sml:23: structure Asm = Asm smlnj-110.79/MLRISC/flowgraph/printFlowgraph.sml-24- structure CFG = CFG ############################################## smlnj-110.79/MLRISC/amd64/amd64.mdl-139- (* LOCK can only be used in front of smlnj-110.79/MLRISC/amd64/amd64.mdl:140: * (Intel ordering, not gasm ordering) smlnj-110.79/MLRISC/amd64/amd64.mdl-141- * ADC, ADD, AND, BT mem, reg/imm ############################################## smlnj-110.79/MLRISC/amd64/amd64.mdl-305- rtl NOP{} = () (* duh! *) smlnj-110.79/MLRISC/amd64/amd64.mdl:306: rtl LEAL{addr, r32} = $r[r32] := addr (* this is completely wrong! XXX *) smlnj-110.79/MLRISC/amd64/amd64.mdl:307: rtl LEAQ{addr, r64} = $r[r32] := addr (* this is completely wrong! XXX *) smlnj-110.79/MLRISC/amd64/amd64.mdl-308- ############################################## smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-132- (* align the address to the given alignment, which must be a power of 2 *) smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml:133: fun alignAddr (addr, align) = let smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-134- val mask = Word.fromInt(align-1) ############################################## smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-158- fun ssz ([], maxAlign, offset) = smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml:159: {sz = alignAddr(offset, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-160- | ssz (ty::tys, maxAlign, offset) = let smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-161- val {sz, align} = sizeOfTy ty smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml:162: val offset = alignAddr(offset, align) smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-163- in ############################################## smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-174- fun usz ([], maxAlign, maxSz) = smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml:175: {sz = alignAddr(maxSz, maxAlign), align = maxAlign} smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-176- | usz (ty::tys, maxAlign, maxSz) = let ############################################## smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-263- let smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml:264: val offset = alignAddr (offset, align) smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-265- in ############################################## smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-271- fun nextFlt (ty, szb) = let smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml:272: val offset = alignAddr (offset, 4) smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-273- in ############################################## smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-308- argOffset, []) smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml:309: val argMem = {szb = alignAddr (argSz, frameAlign), align = frameAlign} smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-310- in { ############################################## smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-408- T.STORE(ty, offSP offset, T.REG(ty, tmp), stack) smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml:409: :: T.MV(ty, tmp, T.LOAD(ty, addr(offset - baseOffset), mem)) smlnj-110.79/MLRISC/amd64/c-calls/amd64-svid.sml-410- :: stms ############################################## smlnj-110.79/MLRISC/amd64/ra/amd64RegAlloc.sml-14- where I = I smlnj-110.79/MLRISC/amd64/ra/amd64RegAlloc.sml:15: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/amd64/ra/amd64RegAlloc.sml-16- where I = I ############################################## smlnj-110.79/MLRISC/amd64/ra/amd64RegAlloc.sml-145- (structure Flowgraph = CFG smlnj-110.79/MLRISC/amd64/ra/amd64RegAlloc.sml:146: structure Asm = Asm smlnj-110.79/MLRISC/amd64/ra/amd64RegAlloc.sml-147- structure InsnProps = Props ############################################## smlnj-110.79/MLRISC/amd64/ra/amd64RegAlloc.sml-161- PrintFlowgraph (structure CFG = CFG smlnj-110.79/MLRISC/amd64/ra/amd64RegAlloc.sml:162: structure Asm = Asm) smlnj-110.79/MLRISC/amd64/ra/amd64RegAlloc.sml-163- structure SpillInstr = AMD64SpillInstr ( ############################################## smlnj-110.79/MLRISC/backpatch/backpatch.sml-86- if Label.addrOf(lab) = pos then labels(rest, pos, chgd) smlnj-110.79/MLRISC/backpatch/backpatch.sml:87: else (Label.setAddr(lab, pos); labels(rest, pos, true)) smlnj-110.79/MLRISC/backpatch/backpatch.sml-88- | labels(CODE code::rest, pos, chgd) = let ############################################## smlnj-110.79/MLRISC/backpatch/backpatch.sml-130- (P.adjustLabels(p, loc); init(rest, loc + P.sizeOf(p, loc))) smlnj-110.79/MLRISC/backpatch/backpatch.sml:131: | init(LABEL lab::rest, loc) = (Label.setAddr(lab,loc); init(rest, loc)) smlnj-110.79/MLRISC/backpatch/backpatch.sml-132- | init(CODE code::rest, loc) = let ############################################## smlnj-110.79/MLRISC/backpatch/spanDep.sml-20- where I = CFG.I smlnj-110.79/MLRISC/backpatch/spanDep.sml:21: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/backpatch/spanDep.sml-22- where I = CFG.I ############################################## smlnj-110.79/MLRISC/backpatch/spanDep.sml-321- | labels(LABEL lab::rest, loc) = smlnj-110.79/MLRISC/backpatch/spanDep.sml:322: (Label.setAddr(lab, loc); labels(rest, loc)) smlnj-110.79/MLRISC/backpatch/spanDep.sml-323- | labels(CODE(lab,code)::rest, loc) = let ############################################## smlnj-110.79/MLRISC/backpatch/spanDep.sml-331- | sizeList(code::rest,n) = sizeList(rest,size code + n) smlnj-110.79/MLRISC/backpatch/spanDep.sml:332: in Label.setAddr(lab,loc+4); smlnj-110.79/MLRISC/backpatch/spanDep.sml-333- labels(rest, sizeList(code,loc)) ############################################## smlnj-110.79/MLRISC/backpatch/spanDep.sml-380- if Label.addrOf(lab) = pos then scan(rest, pos, changed) smlnj-110.79/MLRISC/backpatch/spanDep.sml:381: else (Label.setAddr(lab, pos); scan(rest, pos, true)) smlnj-110.79/MLRISC/backpatch/spanDep.sml-382- | scan(CODE(lab,code)::rest, pos, changed) = let ############################################## smlnj-110.79/MLRISC/backpatch/spanDep.sml-386- scan(rest, newPos, changed) smlnj-110.79/MLRISC/backpatch/spanDep.sml:387: else (Label.setAddr(lab, pos+4); scan(rest, newPos, true)) smlnj-110.79/MLRISC/backpatch/spanDep.sml-388- end ############################################## smlnj-110.79/MLRISC/backpatch/vlBackPatch.sml-34- where I = Emitter.I smlnj-110.79/MLRISC/backpatch/vlBackPatch.sml:35: structure Asm : INSTRUCTION_EMITTER smlnj-110.79/MLRISC/backpatch/vlBackPatch.sml-36- where I = CFG.I) = ############################################## smlnj-110.79/MLRISC/backpatch/vlBackPatch.sml-107- if Label.addrOf(l) = pos then labels(rest, pos, changed) smlnj-110.79/MLRISC/backpatch/vlBackPatch.sml:108: else (Label.setAddr(l, pos); labels(rest, pos, true)) smlnj-110.79/MLRISC/backpatch/vlBackPatch.sml-109- | labels (PSEUDO(pOp, rest), pos, chgd) = let ############################################## smlnj-110.79/MLRISC/backpatch/vlBackPatch.sml-182- | init(LABEL(lab, rest), loc) = smlnj-110.79/MLRISC/backpatch/vlBackPatch.sml:183: (Label.setAddr(lab, loc); init(rest, loc)) smlnj-110.79/MLRISC/backpatch/vlBackPatch.sml-184- | init(NIL, loc) = loc ############################################## smlnj-110.79/debian/mkorig-20- smlnj-110.79/debian/mkorig:21:root_tarballs="ckit config pgraph smlnj-lib MLRISC cml eXene heap2asm \ smlnj-110.79/debian/mkorig-22- ml-burg ml-lex ml-yacc smlnj-c nlffi ml-lpt \ ############################################## smlnj-110.79/debian/rules-22- smlnj-110.79/debian/rules:23:srcdirs:=ckit cml config doc eXene heap2asm ml-burg ml-lex ml-lpt MLRISC ml-yacc nlffi pgraph smlnj-c smlnj-lib trace-debug-profile smlnj-110.79/debian/rules-24-basedirs:=cm compiler old-basis runtime system ############################################## smlnj-110.79/debian/rules-61- mkdir -p $(ROOT)/wrapper smlnj-110.79/debian/rules:62: for c in `cd $(ROOT)/bin && ls`; do \ smlnj-110.79/debian/rules-63- cat debian/wrapper.in | sed -f vars.sed -e "s/@CMD@/$$c/g" > $(ROOT)/wrapper/$$c; \ ############################################## smlnj-110.79/.pc/mltex2html-perl-fixes/MLRISC/Doc/html/mltex2html-209- print STDERR "running: ", $command, "\n"; smlnj-110.79/.pc/mltex2html-perl-fixes/MLRISC/Doc/html/mltex2html:210: system("$command"); smlnj-110.79/.pc/mltex2html-perl-fixes/MLRISC/Doc/html/mltex2html-211- if ($?) { die("$? $command"); }