diff --git a/mach/proto/libg/.distr b/mach/proto/libg/.distr
index 9d0e2d62a..a0876cf41 100644
--- a/mach/proto/libg/.distr
+++ b/mach/proto/libg/.distr
@@ -13,3 +13,4 @@ proto.libem
 proto.libend
 proto.liboc
 proto.make
+compmodule
diff --git a/mach/proto/libg/compmodule b/mach/proto/libg/compmodule
new file mode 100755
index 000000000..07a125032
--- /dev/null
+++ b/mach/proto/libg/compmodule
@@ -0,0 +1,6 @@
+if ${MACH?} ${MACHFL?} -c $1 1>&2
+then
+	echo `basename $1 $2`.${SUF?}
+else
+	exit 1
+fi