TCL

Question

engelle Yorumlar koymak Nasıl burada kod java gibi herhangi bir olasılık

proc checkPrime {no} { 
    set i 1 
    set count 0 
    while {$i < $no} { 
     if {{$no%$i} eq 0} { 
      incr count 
     } 
     if {$count eq 2} { 
      puts "the number is prime number" 
      return 
     } 
     incr i 
    } 
} 

i i satırı # koymak istemiyoruz tek bir açıklamayı içine tüm prosedürü koymak istiyorum orada

var/* .. *// ile kodlanmış tüm kod, tcl gibi. ve ben de metnin bir kısmını tek yorumunu

Answer 1

da başka herhangi bir yapının kullanılmasına ve bağ tırnak dışarı yorumladı istediğiniz şeyleri şeyler. Burada yürütmeyi engelleyen asıl mekanizma, parantez içinde yer alan şeylerin ikame edilmemesidir.

İşte benim favorilerimden bazıları. Onların kendi kendini belgeleyen çünkü onlar gibi:

set COMMENTED_OUT { 

    commented out stuff 

} 

ve ben dışarı yorumladı metnin blok kod bloğu gerçekten çünkü proc tercih etme eğilimindedir

proc COMMENTED_OUT {} { 

    commented out stuff... 

} 

. == `, dize eşitlik için` eq` kullanın: İlk yürütme yani proc kullanılarak yorumlama kadar tcl proc organları derlemek etmediğini

Not kadar ucuz

Answer 2

Bu soru belirsizdir konacaktır istiyorum. Bir kod bloğunu yorumlamak mı istiyorsunuz? önek

if { 0 } { 
    a section 
    of 
    "commented" code 
} 

boyunca # kullanım şeyle her satır ne demek istediğini bir örnek bize göstermek bu soruyu başka bir şekilde ifade edin Değilse: İki yol vardır. Apart (en tcl programcılar tanıyıp biri) deyimseldir if {0} .. den