diff --git a/src/u_makeproject.pas b/src/u_makeproject.pas
index 9e4752a6..d184fcc6 100644
--- a/src/u_makeproject.pas
+++ b/src/u_makeproject.pas
@@ -379,6 +379,8 @@ begin
 end;
 
 procedure TMakeProject.compile;
+var
+  p: string;
 begin
   if fMakeProc.isAssigned and fMakeProc.Active then
   begin
@@ -391,6 +393,7 @@ begin
   fMsgs.clearByData(fAsProjectItf);
   subjProjCompiling(fProjectSubject, fAsProjectItf);
 
+  p := shortenPath(fFilename);
   fMakeProc := TDexedProcess.create(nil);
   fMakeProc.executable := 'make';
   fMakeProc.Parameters.AddStrings([ '-f', fFilename]);
@@ -402,6 +405,7 @@ begin
   fMakeProc.XTermProgram:=consoleProgram;
   fMakeProc.OnTerminate:= @makeProcTerminated;
   fMakeProc.OnReadData:= @makeProcOutput;
+  fMsgs.message('compiling ' + p, fAsProjectItf, amcProj, amkInf);
   fMakeProc.execute;
 end;