cvs commit: tcl-site/presentations/dtcl listing2.tcl order.txt

[da...@apache.org]

davidw      01/12/09 08:04:27

  Added:       presentations/dtcl listing2.tcl order.txt
  Log:
  Committed last bits of dtcl presentation.
  
  Revision  Changes    Path
  1.1                  tcl-site/presentations/dtcl/listing2.tcl
  
  Index: listing2.tcl
  ===================================================================
    <?
    set i 1
    hputs "<table>"
    
    while { $i <= 8 } {
        hputs "<tr>"
        for {set j 1} {$j <= 8} {incr j} {
            set num [ expr {$i * $j * 4 - 1} ]
            hputs [ format "<td bgcolor=%2x%2x%2x > $num $num $num </td>" \
                            $num $num $num ]
        }
        incr i
        hputs "</tr>"
    }
  
    hputs "</table>"
    ?>
  
  
  
  1.1                  tcl-site/presentations/dtcl/order.txt
  
  Index: order.txt
  ===================================================================
  index
  what
  advantages
  example1
  smalllight
  comparisons
  cgi
  php
  mod_perl
  zope
  java
  other
  how
  interpreter
  cacheing
  channel
  htmltcl
  example2
  results
  future
  conclusion