Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Annotation of /sml/trunk/src/compiler/makeml
ViewVC logotype

Annotation of /sml/trunk/src/compiler/makeml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 146 - (view) (download)

1 : monnier 146 #!/bin/ksh
2 :     #
3 :    
4 :     FULL=""
5 :     ALLOC=1M
6 :    
7 :     ARCH=sparc
8 :     OPSYS=solaris
9 :     RUN_DIR=../../bin/.run
10 :     OBJS_DIR=../runtime/objs
11 :     HEAP_IMAGE=""
12 :     RUN=""
13 :     RUN_ARGS=""
14 :     SET_FLAGS=""
15 :     REBUILD=""
16 :    
17 :     #
18 :     # use the arch-n-opsys script to determine the ARCH/OS if possible
19 :     #
20 :     if [ -f ../../bin/.arch-n-opsys ]; then
21 :     ARCH_N_OPSYS=`../../bin/.arch-n-opsys`
22 :     if [ "$?" = "0" ]; then
23 :     eval $ARCH_N_OPSYS
24 :     fi
25 :     fi
26 :    
27 :     while [ "$#" != "0" ]
28 :     do
29 :     arg=$1; shift
30 :     case $arg in
31 :     -full) FULL="@SMLfull" ;;
32 :     -bare) FULL="@SMLbare" ;;
33 :     -rebuild)
34 :     if [ "$#" = "0" ]; then
35 :     echo "makeml: missing argument for \"-rebuild\" option"
36 :     exit 1
37 :     fi
38 :     REBUILD="@SMLrebuild=$1"; shift
39 :     ;;
40 :     -arch)
41 :     if [ "$#" = "0" ]; then
42 :     echo "makeml: missing argument for \"-arch\" option"
43 :     exit 1
44 :     fi
45 :     ARCH=$1; shift
46 :     ;;
47 :     -opsys)
48 :     if [ "$#" = "0" ]; then
49 :     echo "makeml: missing argument for \"-opsys\" option"
50 :     exit 1
51 :     fi
52 :     OPSYS=$1; shift
53 :     ;;
54 :     -o)
55 :     if [ "$#" = "0" ]; then
56 :     echo "makeml: missing argument for \"-o\" option"
57 :     exit 1
58 :     fi
59 :     HEAP_IMAGE=$1; shift
60 :     ;;
61 :     -run)
62 :     if [ "$#" = "0" ]; then
63 :     echo "makeml: missing argument for \"-run\" option"
64 :     exit 1
65 :     fi
66 :     RUN=$1; shift
67 :     ;;
68 :     -alloc)
69 :     if [ "$#" = "0" ]; then
70 :     echo "makeml: missing argument for \"-alloc\" option"
71 :     exit 1
72 :     fi
73 :     ALLOC=$1; shift
74 :     ;;
75 :     -boot)
76 :     if [ "$#" = "0" ]; then
77 :     echo "makeml: missing argument for \"-boot\" option"
78 :     exit 1
79 :     fi
80 :     BOOT_DIR=$1; shift
81 :     ;;
82 :     @SML*)
83 :     RUN_ARGS="$RUN_ARGS $arg"
84 :     ;;
85 :     *) echo "makeml: unknown argument \"$arg\""
86 :     exit 1
87 :     ;;
88 :     esac
89 :     done
90 :    
91 :     case $OPSYS in
92 :     solaris) MAKE=/usr/ccs/bin/make ;;
93 :     esac
94 :    
95 :     if [ "$RUN" = "" ]; then
96 :     if [ "$OPSYS" = "win32" ]; then
97 :     RUN_CMD="run.$ARCH-$OPSYS.exe"
98 :     else
99 :     RUN_CMD="run.$ARCH-$OPSYS"
100 :     fi
101 :     if [ -x "$RUN_DIR/$RUN_CMD" ]; then
102 :     RUN="$RUN_DIR/$RUN_CMD"
103 :     elif [ -x "$OBJS_DIR/$RUN_CMD" ]; then
104 :     RUN="$OBJS_DIR/$RUN_CMD"
105 :     else
106 :     echo "makeml: unable to find run-time system \"$RUN_CMD\""
107 :     exit 1
108 :     fi
109 :     fi
110 :    
111 :     if [ "$HEAP_IMAGE" = "" ]; then
112 :     if [ "$FULL" = "" ]; then
113 :     HEAP_IMAGE="sml"
114 :     else
115 :     HEAP_IMAGE="sml-full"
116 :     fi
117 :     fi
118 :    
119 :     if [ "$BOOT_DIR" = "" ]; then
120 :     BOOT_DIR="./bin.$ARCH-unix"
121 :     fi
122 :    
123 :     if [ ! -d ./bin.$ARCH-unix ]; then
124 :     ln -s $BOOT_DIR ./bin.$ARCH-unix
125 :     fi
126 :    
127 :     #echo "$RUN @SMLboot=$BOOT_DIR @SMLalloc=$ALLOC $RUN_ARGS $FULL -b $BOOT_DIR"
128 :     #$RUN @SMLboot=$BOOT_DIR @SMLalloc=$ALLOC $RUN_ARGS $FULL -b $BOOT_DIR <<XXXX
129 :     echo "$RUN @SMLboot=$BOOT_DIR @SMLalloc=$ALLOC $RUN_ARGS $FULL $REBUILD"
130 :     $RUN @SMLboot=$BOOT_DIR @SMLalloc=$ALLOC $RUN_ARGS $FULL $REBUILD <<XXXX
131 :     $SET_FLAGS
132 :     val use = Compiler.Interact.useFile;
133 :     val _ = (SMLofNJ.exportML "$HEAP_IMAGE";
134 :     print Compiler.banner;
135 :     print "\n");
136 :     XXXX
137 :    
138 :     if [ -L ./bin.$ARCH-unix ]; then
139 :     rm -f ./bin.$ARCH-unix
140 :     fi

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0