File: make_psb

package info (click to toggle)
mit-scheme 12.1-4
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 208,300 kB
  • sloc: lisp: 781,881; xml: 425,435; ansic: 86,059; sh: 10,135; makefile: 2,501; asm: 2,121; csh: 1,143
file content (43 lines) | stat: -rwxr-xr-x 540 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
#!/bin/sh

scheme=`pwd`

if [ ! -x microcode/Bintopsb ]
then
  (cd microcode; make Bintopsb)
fi

if [ ! -d psb ]
then
  echo "mkdir psb"
  mkdir psb
fi

if [ ! -d psb/lib ]
then
  echo "mkdir psb/lib"
  mkdir psb/lib
fi

for i in runtime sf cref
do
  if [ ! -d psb/$i ]
  then
    echo "mkdir psb/$i"
    mkdir psb/$i
  fi
  if [ $i = runtime ]
  then
    ii=runtim
  else
    ii=$i
  fi
  (
    cd $i
    for j in *.bin $ii.bcon $ii.bldr
    do
      echo "Bintopsb $i/$j"
      ../microcode/Bintopsb < $j > ../psb/$i/$j
    done
  )
done