niveaugourou 0

%dir(RepCourant())
GOTOFIN

§dir:ASV(base)
	Repertoire rep
	rep@ChercherPremier(&base)
	TantQue } non rep@Fini() {
	
		AUTOGOTOZ } OUQUILESTLETEXTE(&rep@Nom ^/\.[gc]pp$/) { /^
			GOTOPRINTDUTEXTE(; ConcatRep(&base &rep@Nom))
		
		AUTOGOTOZ } &rep@EstRepertoire { /^
			%dir(ConcatRep(&base &rep@Nom))
		rep@ChercherSuivant()
	FinTantQue
APLUS