new mlton script

[Henry Cejtin]

My claim is that the reason flags incorrectly keep getting added to the mlton
shell script is that it should  accept  run-time  options,  just  like  MLton
executables do.  Also, the current script will break if you try to compile or
link to a file which has blanks or shell glob characters in it.  This is  all
because  of  the way you have use $@.  The magic string "$@", just like that,
double-quotes and all, does the right thing, but nothing else does.

Also, the inclusion of using SML/NJ to run MLton makes the script very  messy
and full of junk that we really have nothing to do with.

Any  way,  I  have cleaned up the mlton shell file so that it will now not be
confused by any of these things.  I include here 2 versions: mlton which only
runs  a MLton compiled MLton, and mlton+nj which does the usual.  Just like a
real language, you have to use functions in the shell to get the  quoting  to
come  out  correctly.   Note, even this version will get confused if some one
tries to use an argument to the run-time system which  has  blanks  or  shell
glob characters in it.  Pick the one you like, but definitely take one or the
other.  I guess that the real argument  for  the  mlton+nj  one  is  for  the
initial compile.


begin 600 mlton.tgz
M'XL(`,D_-#L"`^V5WV_3,!#'^QK_%3>O(IN8FZ3KCTE3$`\@,;3M!7@"'K+$
M;5PY=A4[:B?$_\XEZ=8A)*0)P1#<YR&V[\[GLV/Y6VEOS>#W$B=Q/)].!S$R
M&<==FTPF7=MVXS'VYZ?)-#Z=3Z8)QB?)?#J`>/`':)S/:H!!*4U]^],X6;O!
M/\?A072C3.1*Q@[A?:D<N+Q6:P]YIK6#JTN\'B/&:FM]&D:-JR-MT15I=1-5
M[=T)F3*Y;@J9\F$;%>V&G&'(G0V[G"WS/`WQ$[)N(OKNDW"VL;4N=J:N/]HY
M6)W52Y=RSO+,2>##A(,R[&57V3$+7*D6G@6;4FD)'V%X"&+I(0:1];$'*7`A
M.'P^A\*R(-BE&W8M8`3:=CD*:^1]PO-S)EV6,R:W,L=4?3G0KPO:9H7HZD17
MUW+8I10B"()/+.BWSM&/>^8@-B`6ME)>+.JLDF)ME?&R1J.QPOE:FJ4O12V+
M)I?M=%%-SF8@JDRKI1':VK5+Q_?C55-]-UXT)O?*&K2UDU]?OP)QP8=W_P*$
MZNH?E=ASMT[;9=N][,X;O7I9K?%;8;$O.1L0_PW=M7AN5D_Y_L_BZ?[]G\7M
M^]^:Z/VG]Y\SLTI#5^D0.V]DMGXX:[0]FPFM3+/]"V3B$"X6T*L$X"FVJM'X
M[`97RTP!O4:@53GO.@O&&.O!Z@)%P)>9P0S#?H]PA&7FY2[Z^`3=T@!>P/YW
MG(!%0[U1:&B-[ZXNH^NW(U98Y>'H&+ZP0"UPCV*[ERW<IG![J<+A`8[ZY7!H
M_-Z')]"NA_M]O/+U^A%(W1?@'JSQ0UJSPIQ8>YLPW<?U&18*L^2EA?"#Z0[1
M6Z@;TQ]`""^>C=&_Q?TF["OK=_X+>@N=V/:J^VB]!13;3O!)<`F"(`B"(`B"
8(`B"(`B"(`B"(`B">%*^`9X)NU(`*```
`
end