136 |
136 |
137 val isabelle_tool = |
137 val isabelle_tool = |
138 Isabelle_Tool("build_e", "build Isabelle E prover component from official download", |
138 Isabelle_Tool("build_e", "build Isabelle E prover component from official download", |
139 args => |
139 args => |
140 { |
140 { |
141 var download_url = default_download_url |
|
142 var target_dir = Path.current |
141 var target_dir = Path.current |
143 var runepar_url = default_runepar_url |
142 var runepar_url = default_runepar_url |
144 var version = default_version |
143 var version = default_version |
|
144 var download_url = default_download_url |
145 var verbose = false |
145 var verbose = false |
146 |
146 |
147 val getopts = Getopts(""" |
147 val getopts = Getopts(""" |
148 Usage: isabelle build_e [OPTIONS] |
148 Usage: isabelle build_e [OPTIONS] |
149 |
149 |
150 Options are: |
150 Options are: |
151 -E URL E prover download URL |
|
152 (default: """ + default_download_url + """) |
|
153 -D DIR target directory (default ".") |
151 -D DIR target directory (default ".") |
154 -R URL URL for runepar.pl by Josef Urban |
152 -R URL URL for runepar.pl by Josef Urban |
155 (default: """ + default_runepar_url + """) |
153 (default: """ + default_runepar_url + """) |
|
154 -U URL E prover download URL |
|
155 (default: \"\"\" + default_download_url + \"\"\") |
156 -V VERSION E prover version (default: """ + default_version + """) |
156 -V VERSION E prover version (default: """ + default_version + """) |
157 -v verbose |
157 -v verbose |
158 |
158 |
159 Build E prover component from the specified download URLs and version. |
159 Build E prover component from the specified download URLs and version. |
160 """, |
160 """, |
161 "E:" -> (arg => download_url = arg), |
|
162 "D:" -> (arg => target_dir = Path.explode(arg)), |
161 "D:" -> (arg => target_dir = Path.explode(arg)), |
163 "R:" -> (arg => runepar_url = arg), |
162 "R:" -> (arg => runepar_url = arg), |
|
163 "U:" -> (arg => download_url = arg), |
164 "V:" -> (arg => version = arg), |
164 "V:" -> (arg => version = arg), |
165 "v" -> (_ => verbose = true)) |
165 "v" -> (_ => verbose = true)) |
166 |
166 |
167 val more_args = getopts(args) |
167 val more_args = getopts(args) |
168 if (more_args.nonEmpty) getopts.usage() |
168 if (more_args.nonEmpty) getopts.usage() |