Skip to content

Commit 37bf95c

Browse files
author
Damien Doligez
committed
detabisation
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5029 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
1 parent 30fdb75 commit 37bf95c

File tree

148 files changed

+10758
-10756
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

148 files changed

+10758
-10756
lines changed

README.win32

+12-12
Original file line numberDiff line numberDiff line change
@@ -56,7 +56,7 @@ supported out of the box, without additional software.
5656
The native-code compiler (ocamlopt) requires Visual C++ and the
5757
Microsoft assembler MASM version 6.11 or later. MASM can be
5858
downloaded for free from Microsoft's Web site; for directions, see
59-
http://www.easystreet.com/~jkirwan/pctools.html
59+
http://www.easystreet.com/~jkirwan/pctools.html
6060
or http://www2.dgsys.com/~raymoon/faq/masm.html
6161
or the comp.lang.asm.x86 FAQ.
6262

@@ -96,14 +96,14 @@ You will need the following software components to perform the recompilation:
9696
To recompile, start a Cygwin shell and change to the top-level
9797
directory of the OCaml distribution. Then, do
9898

99-
cp config/m-nt.h config/m.h
100-
cp config/s-nt.h config/s.h
101-
cp config/Makefile.msvc config/Makefile
99+
cp config/m-nt.h config/m.h
100+
cp config/s-nt.h config/s.h
101+
cp config/Makefile.msvc config/Makefile
102102

103103
Then, edit config/Makefile as needed, following the comments in this file.
104104
Normally, the only variables that need to be changed are
105-
PREFIX where to install everything
106-
TK_ROOT where TCL/TK was installed
105+
PREFIX where to install everything
106+
TK_ROOT where TCL/TK was installed
107107

108108
Finally, use "make -f Makefile.nt" to build the system, e.g.
109109

@@ -149,7 +149,7 @@ runs without any additional tools.
149149
The native-code compiler (ocamlopt), as well as static linking of
150150
Caml bytecode with C code (ocamlc -custom), require either the MinGW
151151
development tools, which is free software available at
152-
http://www.mingw.org/
152+
http://www.mingw.org/
153153
or the Cygwin development tools (also free software), available at
154154
http://sources.redhat.com/cygwin/
155155

@@ -174,14 +174,14 @@ Start a Cygwin shell and unpack the source distribution
174174
(ocaml-X.YZ.tar.gz) with "tar xzf". Change to the top-level
175175
directory of the OCaml distribution. Then, do
176176

177-
cp config/m-nt.h config/m.h
178-
cp config/s-nt.h config/s.h
179-
cp config/Makefile.mingw config/Makefile
177+
cp config/m-nt.h config/m.h
178+
cp config/s-nt.h config/s.h
179+
cp config/Makefile.mingw config/Makefile
180180

181181
Then, edit config/Makefile as needed, following the comments in this file.
182182
Normally, the only variables that need to be changed are
183-
PREFIX where to install everything
184-
TK_ROOT where TCL/TK was installed
183+
PREFIX where to install everything
184+
TK_ROOT where TCL/TK was installed
185185

186186
Finally, use "make -f Makefile.nt" to build the system, e.g.
187187

byterun/extern.c

+2-2
Original file line numberDiff line numberDiff line change
@@ -335,8 +335,8 @@ static void extern_rec(value v)
335335
unsigned long sz_32, sz_64;
336336
char * ident = Custom_ops_val(v)->identifier;
337337
void (*serialize)(value v, unsigned long * wsize_32,
338-
unsigned long * wsize_64)
339-
= Custom_ops_val(v)->serialize;
338+
unsigned long * wsize_64)
339+
= Custom_ops_val(v)->serialize;
340340
if (serialize == NULL) failwith("output_value: abstract value");
341341
Write(CODE_CUSTOM);
342342
writeblock(ident, strlen(ident) + 1);

byterun/minor_gc.c

+3-3
Original file line numberDiff line numberDiff line change
@@ -98,12 +98,12 @@ void oldify_one (value v, value *p)
9898
Field (result, 0) = field0;
9999
Field (result, 1) = oldify_todo_list; /* Add this block */
100100
oldify_todo_list = v; /* to the "to do" list. */
101-
}else{
101+
}else{
102102
Assert (sz == 1);
103103
p = &Field (result, 0);
104-
v = field0;
104+
v = field0;
105105
goto tail_call;
106-
}
106+
}
107107
}else if (tag >= No_scan_tag){
108108
sz = Wosize_hd (hd);
109109
result = alloc_shr (sz, tag);

camlp4/CHANGES

+1-1
Original file line numberDiff line numberDiff line change
@@ -643,7 +643,7 @@ Camlp4 Version 0.6:
643643
* Added option -where: "camlp4 -where" prints the name of the standard
644644
library directory of Camlp4 and exit. So, the ocaml toplevel and the
645645
compiler can use the option:
646-
-I `camlp4 -where`
646+
-I `camlp4 -where`
647647

648648
* Added option -nolib to not search for objects files in the installed
649649
library directory of Camlp4.

camlp4/compile/compile.sh

+5-5
Original file line numberDiff line numberDiff line change
@@ -4,15 +4,15 @@ ARGS=
44
FILES=
55
ENTRIES=
66
while test "" != "$1"; do
7-
case $1 in
7+
case $1 in
88
-e)
99
shift;
1010
if test "$ENTRIES" != ""; then ENTRIES="$ENTRIES; "; fi
1111
ENTRIES="$ENTRIES$1";;
12-
*.ml*) FILES="$FILES $1";;
13-
*) ARGS="$ARGS $1";;
14-
esac
15-
shift
12+
*.ml*) FILES="$FILES $1";;
13+
*) ARGS="$ARGS $1";;
14+
esac
15+
shift
1616
done
1717

1818
cat $FILES | sed -e 's/Pcaml.parse_i.*$//' > tmp.ml

camlp4/config/configure_batch

+3-3
Original file line numberDiff line numberDiff line change
@@ -58,10 +58,10 @@ touch Makefile.cnf
5858

5959
for i in utils parsing otherlibs/dynlink; do
6060
if test ! -d "$ocaml_top/$i"; then
61-
echo "Bad value $ocaml_top for option -ocaml-top"
61+
echo "Bad value $ocaml_top for option -ocaml-top"
6262
echo "There is no directory $ocaml_top/$i"
63-
echo "Configuration script failed"
64-
exit 1
63+
echo "Configuration script failed"
64+
exit 1
6565
fi
6666
done
6767

camlp4/etc/mkcamlp4.sh.tpl

+8-8
Original file line numberDiff line numberDiff line change
@@ -11,14 +11,14 @@ while test "" != "$1"; do
1111
case $1 in
1212
-I) INCL="$INCL -I $2"; shift;;
1313
*)
14-
j=`basename $1 .cmi`
15-
if test "$j.cmi" = "$1"; then
16-
first="`expr "$j" : '\(.\)' | tr 'a-z' 'A-Z'`"
17-
rest="`expr "$j" : '.\(.*\)'`"
18-
INTERFACES="$INTERFACES $first$rest"
19-
else
20-
OPTS="$OPTS $1"
21-
fi;;
14+
j=`basename $1 .cmi`
15+
if test "$j.cmi" = "$1"; then
16+
first="`expr "$j" : '\(.\)' | tr 'a-z' 'A-Z'`"
17+
rest="`expr "$j" : '.\(.*\)'`"
18+
INTERFACES="$INTERFACES $first$rest"
19+
else
20+
OPTS="$OPTS $1"
21+
fi;;
2222
esac
2323
shift
2424
done

camlp4/etc/pa_sml.ml

+1-1
Original file line numberDiff line numberDiff line change
@@ -779,7 +779,7 @@ EXTEND
779779
| Left x2 -> <:module_expr< $x1$ (struct $list:x2$ end) >>
780780
| Right x2 -> <:module_expr< $x1$ $x2$ >> ]
781781
| "let"; x1 = strdecs; "in"; x2 = module_expr; "end" ->
782-
not_impl loc "str 4"
782+
not_impl loc "str 4"
783783
| x1 = module_expr; ":"; x2 = module_type -> not_impl loc "str 5"
784784
| x1 = module_expr; x2 = ":>"; x3 = module_type ->
785785
not_impl loc "str 6" ] ]

camlp4/tools/apply.sh

+10-10
Original file line numberDiff line numberDiff line change
@@ -4,23 +4,23 @@
44
ARGS1=
55
FILE=
66
while test "" != "$1"; do
7-
case $1 in
8-
*.ml*) FILE=$1;;
9-
*) ARGS1="$ARGS1 $1";;
10-
esac
11-
shift
7+
case $1 in
8+
*.ml*) FILE=$1;;
9+
*) ARGS1="$ARGS1 $1";;
10+
esac
11+
shift
1212
done
1313

1414
head -1 $FILE >/dev/null || exit 1
1515

1616
set - `head -1 $FILE`
1717
if test "$2" = "camlp4r" -o "$2" = "camlp4"; then
18-
COMM="../boot/$2 -nolib -I ../boot -I ../etc"
19-
shift; shift
20-
ARGS2=`echo $* | sed -e "s/[()*]//g"`
18+
COMM="../boot/$2 -nolib -I ../boot -I ../etc"
19+
shift; shift
20+
ARGS2=`echo $* | sed -e "s/[()*]//g"`
2121
else
22-
COMM="../boot/camlp4 -nolib -I ../boot -I ../etc pa_o.cmo"
23-
ARGS2=
22+
COMM="../boot/camlp4 -nolib -I ../boot -I ../etc pa_o.cmo"
23+
ARGS2=
2424
fi
2525

2626
OTOP=../..

camlp4/tools/camlp4_comm.sh

+18-18
Original file line numberDiff line numberDiff line change
@@ -4,32 +4,32 @@
44
ARGS1=
55
FILE=
66
while test "" != "$1"; do
7-
case $1 in
8-
*.ml*) FILE=$1;;
9-
*) ARGS1="$ARGS1 $1";;
10-
esac
11-
shift
7+
case $1 in
8+
*.ml*) FILE=$1;;
9+
*) ARGS1="$ARGS1 $1";;
10+
esac
11+
shift
1212
done
1313

1414
head -1 $FILE >/dev/null || exit 1
1515

1616
set - `head -1 $FILE`
1717
if test "$2" = "camlp4r" -o "$2" = "camlp4"; then
18-
COMM="ocamlrun$EXE ../boot/$2$EXE -nolib -I ../boot"
18+
COMM="ocamlrun$EXE ../boot/$2$EXE -nolib -I ../boot"
1919
if test "`basename $OTOP`" != "ocaml_stuff"; then
2020
COMM="$OTOP/boot/$COMM"
2121
fi
22-
shift; shift
23-
ARGS2=`echo $* | sed -e "s/[()*]//g"`
24-
# ARGS1="$ARGS1 -verbose"
25-
echo $COMM $ARGS2 $ARGS1 $FILE
26-
$COMM $ARGS2 $ARGS1 $FILE
22+
shift; shift
23+
ARGS2=`echo $* | sed -e "s/[()*]//g"`
24+
# ARGS1="$ARGS1 -verbose"
25+
echo $COMM $ARGS2 $ARGS1 $FILE
26+
$COMM $ARGS2 $ARGS1 $FILE
2727
else
28-
if test "`basename $FILE .mli`.mli" = "$FILE"; then
29-
OFILE=`basename $FILE .mli`.ppi
30-
else
31-
OFILE=`basename $FILE .ml`.ppo
32-
fi
33-
echo cp $FILE $OFILE
34-
cp $FILE $OFILE
28+
if test "`basename $FILE .mli`.mli" = "$FILE"; then
29+
OFILE=`basename $FILE .mli`.ppi
30+
else
31+
OFILE=`basename $FILE .ml`.ppo
32+
fi
33+
echo cp $FILE $OFILE
34+
cp $FILE $OFILE
3535
fi

camlp4/tools/conv.sh

+10-10
Original file line numberDiff line numberDiff line change
@@ -4,19 +4,19 @@ DIR=`expr "$0" : "\(.*\)/.*" "|" "."`
44
INCL=
55
FILE=
66
while test "" != "$1"; do
7-
case $1 in
8-
-I) INCL="$INCL -I $2"; shift;;
9-
*) FILE=$1;;
10-
esac
11-
shift
7+
case $1 in
8+
-I) INCL="$INCL -I $2"; shift;;
9+
*) FILE=$1;;
10+
esac
11+
shift
1212
done
1313

1414
set - `head -1 $FILE`
1515
if test "$2" = "camlp4r" -o "$2" = "camlp4"; then
16-
COMM="$OTOP/boot/ocamlrun $DIR/../boot/$2 -nolib -I $DIR/../boot $INCL $DIR/../etc/pr_o.cmo"
17-
shift; shift
18-
ARGS=`echo $* | sed -e "s/[()*]//g"`
19-
$COMM $ARGS -ss $FILE
16+
COMM="$OTOP/boot/ocamlrun $DIR/../boot/$2 -nolib -I $DIR/../boot $INCL $DIR/../etc/pr_o.cmo"
17+
shift; shift
18+
ARGS=`echo $* | sed -e "s/[()*]//g"`
19+
$COMM $ARGS -ss $FILE
2020
else
21-
cat $FILE
21+
cat $FILE
2222
fi

configure

+5-5
Original file line numberDiff line numberDiff line change
@@ -88,7 +88,7 @@ while : ; do
8888
-tklibs*|--tklibs*)
8989
tk_libs=$2; shift;;
9090
-tk-no-x11|--tk-no-x11)
91-
tk_x11=no;;
91+
tk_x11=no;;
9292
-binutils*|--binutils*)
9393
binutils_dir=$2; shift;;
9494
-verbose|--verbose)
@@ -467,13 +467,13 @@ if test $withsharedlibs = "yes"; then
467467
byteccrpath="-Wl,-rpath,"
468468
mksharedlibrpath="-Wl,-rpath,"
469469
fi
470-
shared_libraries_supported=true;;
470+
shared_libraries_supported=true;;
471471
*)
472472
sharedcccompopts="-KPIC"
473473
byteccrpath="-R"
474474
mksharedlibrpath="-R"
475-
mksharedlib="/usr/ccs/bin/ld -G -o"
476-
shared_libraries_supported=true;;
475+
mksharedlib="/usr/ccs/bin/ld -G -o"
476+
shared_libraries_supported=true;;
477477
esac;;
478478
mips*-*-irix[56]*)
479479
case "$bytecc" in
@@ -1134,7 +1134,7 @@ for dir in \
11341134
/usr/unsupported/lib \
11351135
/usr/athena/lib \
11361136
/usr/lpp/Xamples/lib \
1137-
/lib/usr/lib/X11 \
1137+
/lib/usr/lib/X11 \
11381138
\
11391139
/usr/openwin/lib \
11401140
/usr/openwin/share/lib \

emacs/inf-caml.el

+9-9
Original file line numberDiff line numberDiff line change
@@ -113,8 +113,8 @@ be sent from another buffer in Caml mode.
113113
Input and output via buffer `*inferior-caml*'."
114114
(interactive
115115
(list (if (not (comint-check-proc inferior-caml-buffer-name))
116-
(read-from-minibuffer "Caml toplevel to run: "
117-
inferior-caml-program))))
116+
(read-from-minibuffer "Caml toplevel to run: "
117+
inferior-caml-program))))
118118
(caml-run-process-if-needed cmd)
119119
(switch-to-buffer-other-window inferior-caml-buffer-name))
120120

@@ -250,15 +250,15 @@ should lies."
250250
(cond ((re-search-forward
251251
" *Characters \\([01-9][01-9]*\\)-\\([1-9][01-9]*\\):\n[^W]"
252252
(point-max) t)
253-
(setq beg (string-to-int (caml-match-string 1)))
253+
(setq beg (string-to-int (caml-match-string 1)))
254254
(setq end (string-to-int (caml-match-string 2)))
255255
(switch-to-buffer buf)
256-
(goto-char orig)
257-
(forward-byte end)
258-
(setq end (point))
259-
(goto-char orig)
260-
(forward-byte beg)
261-
(setq beg (point))
256+
(goto-char orig)
257+
(forward-byte end)
258+
(setq end (point))
259+
(goto-char orig)
260+
(forward-byte beg)
261+
(setq beg (point))
262262
(setq err beg)
263263
)
264264
((looking-at

lex/Makefile

+1
Original file line numberDiff line numberDiff line change
@@ -38,6 +38,7 @@ ocamllex.opt: $(OBJS:.cmo=.cmx)
3838
clean::
3939
rm -f ocamllex ocamllex.opt
4040
rm -f *.cmo *.cmi *.cmx *.o
41+
rm -f parser.output
4142

4243
parser.ml parser.mli: parser.mly
4344
$(CAMLYACC) $(YACCFLAGS) parser.mly

0 commit comments

Comments
 (0)