201 |
201 |
202 /* output log */ |
202 /* output log */ |
203 |
203 |
204 val meta_info = |
204 val meta_info = |
205 (if (build_tags.isEmpty) Nil |
205 (if (build_tags.isEmpty) Nil |
206 else List(Build_Log.Field.build_tags -> Word.implode(build_tags))) ::: |
206 else List(Build_Log.Prop.build_tags -> Word.implode(build_tags))) ::: |
207 List( |
207 List( |
208 Build_Log.Field.build_group_id -> build_group_id, |
208 Build_Log.Prop.build_group_id -> build_group_id, |
209 Build_Log.Field.build_id -> (build_host + ":" + build_start.time.ms), |
209 Build_Log.Prop.build_id -> (build_host + ":" + build_start.time.ms), |
210 Build_Log.Field.build_engine -> BUILD_HISTORY, |
210 Build_Log.Prop.build_engine -> BUILD_HISTORY, |
211 Build_Log.Field.build_host -> build_host, |
211 Build_Log.Prop.build_host -> build_host, |
212 Build_Log.Field.build_start -> Build_Log.print_date(build_start), |
212 Build_Log.Prop.build_start -> Build_Log.print_date(build_start), |
213 Build_Log.Field.build_end -> Build_Log.print_date(build_end), |
213 Build_Log.Prop.build_end -> Build_Log.print_date(build_end), |
214 Build_Log.Field.isabelle_version -> isabelle_version) |
214 Build_Log.Prop.isabelle_version -> isabelle_version) |
215 |
215 |
216 val ml_statistics = |
216 val ml_statistics = |
217 build_info.finished_sessions.flatMap(session_name => |
217 build_info.finished_sessions.flatMap(session_name => |
218 { |
218 { |
219 val session_log = isabelle_output_log + Path.explode(session_name).ext("gz") |
219 val session_log = isabelle_output_log + Path.explode(session_name).ext("gz") |