Repository navigation
Expand file tree
/
Copy pathmake.bat
More file actions
56 lines (45 loc) · 1.33 KB
/
Copy pathmake.bat
File metadata and controls
56 lines (45 loc) · 1.33 KB
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
44
45
46
47
48
49
50
51
52
53
54
55
56
@echo off
SET TERM=dumb
SET EXITCODE=0
ocaml.exe -I scripts -w -3 str.cma unix.cma .\scripts\ocp_build_glob.ml ocp_build_hack.ocp.fb ocp_build_hack.ocp
ocaml.exe -I scripts -w -3 str.cma unix.cma .\scripts\ocp_build_glob.ml ocp_build_flow.ocp.fb ocp_build_flow.ocp
if "%1" == "" goto build
if "%1" == "build" goto build
if "%1" == "all" goto build
if "%1" == "init" goto init
if "%1" == "clean" goto clean
REM Invalid argument
echo Invalid argument, please check README.win32
goto end
REM initialize ocp-build and create _obuild directory
:init
if not exist "_obuild/" ocp-build init
goto end
REM 1/ check if ocp-build init has already be done
REM 2/ generate get_build_id.gen.c
REM 3/ start build hack with ocp-build
:build
if not exist "_obuild/" ocp-build init
ocaml.exe -I scripts -w -3 unix.cma .\scripts\gen_build_id.ml .\hack\utils\get_build_id.gen.c
ocaml.exe -I scripts -w -3 unix.cma .\scripts\gen_index.ml flowlib.rc lib
ocp-build
REM If the build failed then give up
if %ERRORLEVEL% neq 0 (
SET EXITCODE=%ERRORLEVEL%
goto build_end
)
md bin 2>NUL
copy _obuild\flow\flow.asm.exe bin\flow.exe
:build_end
del lib\INDEX
goto end
REM clean _obuild directory and executables in bin/
:clean
ocp-build clean
del bin\flow.exe 2>NUL
goto end
REM execute the Flow testsuite
:end
del ocp_build_flow.ocp
del ocp_build_hack.ocp
exit /B %EXITCODE%