From 6f991bf7dbfc282e42e16cfd2abfd6093cbc90ad Mon Sep 17 00:00:00 2001
From: midipix <writeonce@midipix.org>
Date: Fri, 18 Mar 2016 20:20:15 -0400
Subject: utility: slbt_output_compile(): initial implementation.

---
 include/slibtool/slibtool.h      |  1 +
 project/common.mk                |  1 +
 src/output/slbt_output_compile.c | 27 +++++++++++++++++++++++++++
 3 files changed, 29 insertions(+)
 create mode 100644 src/output/slbt_output_compile.c

diff --git a/include/slibtool/slibtool.h b/include/slibtool/slibtool.h
index ab337a8..963b9e9 100644
--- a/include/slibtool/slibtool.h
+++ b/include/slibtool/slibtool.h
@@ -160,6 +160,7 @@ slbt_api int  slbt_unmap_input		(struct slbt_input *);
 
 /* utility api */
 slbt_api int  slbt_output_config	(const struct slbt_driver_ctx *);
+slbt_api int  slbt_output_compile	(const struct slbt_driver_ctx *, const struct slbt_exec_ctx *);
 
 #ifdef __cplusplus
 }
diff --git a/project/common.mk b/project/common.mk
index bd342f8..7dd48ba 100644
--- a/project/common.mk
+++ b/project/common.mk
@@ -4,6 +4,7 @@ COMMON_SRCS = \
 	src/logic/slbt_exec_compile.c \
 	src/logic/slbt_exec_ctx.c \
 	src/logic/slbt_map_input.c \
+	src/output/slbt_output_compile.c \
 	src/output/slbt_output_config.c \
 	src/skin/slbt_skin_default.c \
 
diff --git a/src/output/slbt_output_compile.c b/src/output/slbt_output_compile.c
new file mode 100644
index 0000000..c86148a
--- /dev/null
+++ b/src/output/slbt_output_compile.c
@@ -0,0 +1,27 @@
+/*******************************************************************/
+/*  slibtool: a skinny libtool implementation, written in C        */
+/*  Copyright (C) 2016  Z. Gilboa                                  */
+/*  Released under the Standard MIT License; see COPYING.SLIBTOOL. */
+/*******************************************************************/
+
+#include <stdio.h>
+#include <slibtool/slibtool.h>
+
+int slbt_output_compile(
+	const struct slbt_driver_ctx *	dctx,
+	const struct slbt_exec_ctx *	ectx)
+{
+	char ** parg;
+
+	if (fprintf(stdout,"%s: compile:",dctx->program) < 0)
+		return -1;
+
+	for (parg=ectx->argv; *parg; parg++)
+		if (fprintf(stdout," %s",*parg) < 0)
+			return -1;
+
+	if (fputc('\n',stdout) < 0)
+		return -1;
+
+	return 0;
+}
-- 
cgit v1.2.3