RE: [h-e-w] Help with defadvice

[Gallucci, David]

Here's something we use. It is a batch for the .Net version ( 7.1 actually ). 
Not a makefile, but then again you don't have to regen makefiles either. You 
can do a setq compile-command like so:

(setq compile-command "d:/myprojects/solutions/buildsolution.bat") 

You can modify to suit your needs. 

Hope this helps,

Dave Gallucci

---------------------

ECHO OFF

REM Get name of solution from current directory. There should be only one!
FOR /f "DELIMS==" %%a in ('DIR /b/a *.sln') DO SET ROOTNAME=%%~na

REM Derive variables based on root name
SET BUILDLOG=%ROOTNAME%.log
SET SOLUTION=%ROOTNAME%.sln
DEL %BUILDLOG%

CLS
ECHO.
ECHO.***************************************************************************
ECHO.
ECHO        Building Project(s) Based on %SOLUTION% Solution File.
ECHO        Results will be written to %BUILDLOG%
ECHO.
ECHO.***************************************************************************

CALL "%VS71COMNTOOLS%vsvars32.bat" >nul
ECHO OFF
ECHO.
ECHO        Build in progress. Please wait...
ECHO.
ECHO.
devenv %SOLUTION% /rebuild "Release" /out %BUILDLOG%
CLS
ECHO.
ECHO        Build complete. See %BUILDLOG% for results.
ECHO.
ECHO.
PAUSE

---------------------


-----Original Message-----
From: Peter Lee [mailto:address@hidden
Sent: Thursday, June 19, 2003 11:31 AM
To: Ken Goldman
Cc: address@hidden
Subject: Re: [h-e-w] Help with defadvice


>>>> Ken Goldman writes:

    Ken> What I do on windows is go into MSDev once and export a
    Ken> makefile.  Then I can use 'make' from emacs just like I would
    Ken> compile any other source.

It's a pain to have to regen a makefile though whenever the project
changes.

I've been using the following:

(defun vc-build ()
  "Builds vc project"
  (interactive)
  (let ((compilation-read-command nil))
    (compile "msdev d:/src/someproj/some.dsw /MAKE \"MyProj - Win32 Debug\"")))
(global-set-key [f7] 'vc-build)

I've been meaning to write some lisp to find the dsw based on my
current working dir and then parse that dsw for a list of
projects/configurations which would be shown in a completion buffer to
the command.

But I typically work with the same project for a few days at a time so
I've lazily just updated the above function to reflect what I'm
working on.

If I ever get around to actually doing the above I'll post the code
(ugly as it will be given my lisp abilities).