1 files changed, 24 insertions, 0 deletions
diff --git a/src/output/slbt_output_machine.c b/src/output/slbt_output_machine.c
new file mode 100644
index 0000000..800142e
--- /dev/null
+++ b/src/output/slbt_output_machine.c
@@ -0,0 +1,24 @@
+/*******************************************************************/
+/*  slibtool: a skinny libtool implementation, written in C        */
+/*  Copyright (C) 2016--2021  Z. Gilboa                            */
+/*  Released under the Standard MIT License; see COPYING.SLIBTOOL. */
+/*******************************************************************/
+
+#include <slibtool/slibtool.h>
+#include "slibtool_driver_impl.h"
+#include "slibtool_dprintf_impl.h"
+#include "slibtool_errinfo_impl.h"
+
+int slbt_output_machine(const struct slbt_driver_ctx * dctx)
+{
+	const struct slbt_common_ctx *	cctx;
+	int				fdout;
+
+	cctx     = dctx->cctx;
+	fdout    = slbt_driver_fdout(dctx);
+
+	if (slbt_dprintf(fdout,"%s\n",cctx->host.host) < 0)
+		return SLBT_SYSTEM_ERROR(dctx,0);
+
+	return 0;
+}