PARAMETERS cName

IF !EMPTY(cName)
	b(cName)
	return
ENDIF


b('ghost2')
b('gserv')
b('compelec2')
b('config2')
b('password2')
b('invoicer')
*b('web')
b('gas')
*b('boleteria') 
b('json')
b('glib')
*b('v4')
*b('v5')
b('report')

ON SHUTDOWN

PROCEDURE b (cName)
	WAIT WINDOW 'Compilando '+cName+'...' nowait
	build exe &cName..exe from proj\&cName RECOMPILE 
ENDPROC
