<html><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div>Hi,</div><div>could anyone explain me the indentation of clozure?</div><div><br></div><div>here is two examples.</div><div>the first is from clozure 1.6trunk</div><div>the second from mcl 5.2 on ppc</div><div><br></div><div>for me the first indentation is wrong and the second is right, with the keywords lining up...</div><div>am I wrong ?</div><div><br></div><div>sincerely</div><div>joakim</div><div><br></div><div>(écrire_champ :champ (po:portée :champ 'nombre_de_instances_temporelles_inférieures </div><div> :module 'module_durée</div><div> :niveau "niveau_0" </div><div> :nom_de_partie "piccolo")</div><div> :valeurs (cv::créer_valeurs :nom_de_partie "piccolo" :index (index "piccolo" 0 nil '(1)) :print nil</div><div> :champ 'cv::durée</div><div> :traitements (list</div><div> (trai::traitements :traiteur 'ut:skala-om :args (trai:arg '(1 15)))</div><div> )))</div><div><br></div><div><br></div><div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; "><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); ">(</font><font face="Trebuchet MS" size="4" color="#dd0000" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(221, 0, 0); ">écrire_champ</font><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :champ (</font><font face="Trebuchet MS" size="4" color="#0000cc" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(0, 0, 204); ">po:portée</font><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :champ 'nombre_de_instances_temporelles_inférieures </font></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; "><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :module 'module_durée</font></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; "><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :niveau "niveau_0" </font></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; "><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :nom_de_partie "clarinette")</font></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; "><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :valeurs (</font><font face="Trebuchet MS" size="4" color="#0000cc" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(0, 0, 204); ">cv::créer_valeurs</font><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :nom_de_partie "clarinette" :index (</font><font face="Trebuchet MS" size="4" color="#dd0000" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(221, 0, 0); ">index</font><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> "clarinette" 0 nil '(1)) :print nil</font></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; "><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :champ 'cv::durée</font></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; "><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :traitements (list</font></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; "><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> (</font><font face="Trebuchet MS" size="4" color="#dd0000" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(221, 0, 0); ">trai::traitements</font><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> :traiteur 'ut:skala-om :args (</font><font face="Trebuchet MS" size="4" color="#33cc00" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(51, 204, 0); ">trai:arg</font><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> '(3 8)))</font></div><div style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; "><font face="Trebuchet MS" size="4" color="#663300" style="font: normal normal normal 13px/normal 'Trebuchet MS'; color: rgb(102, 51, 0); "> )))</font></div></div><div apple-content-edited="true"> <div style="font-size: 12px; "><font class="Apple-style-span" color="#595959" face="'Trebuchet MS'"><br class="Apple-interchange-newline"><br></font></div><div style="font-size: 12px; "><font class="Apple-style-span" color="#595959" face="'Trebuchet MS'"><br></font></div><div style="font-size: 12px; "><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">Joakim Sandgren</font></div><div style="font-size: 12px; "><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">joakim sandgren musik</font></div><div style="font-size: 12px; "><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">42, rue de Maubeuge</font></div><div style="font-size: 12px; "><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">75009 Paris</font></div><div style="font-size: 12px; "><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">France</font></div><div style="font-size: 12px; "><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959">+33 (0)1 45 26 43 90</font></div><div style="font-size: 12px; "><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959"><a href="mailto:info@joakimsandgren.com">info@joakimsandgren.com</a></font></div><div style="font-size: 12px; "><font class="Apple-style-span" face="'Trebuchet MS'" color="#595959"><a href="http://www.joakimsandgren.com/">http://www.joakimsandgren.com</a></font></div> </div><br></body></html>