#!/bin/sh # (C) 2011 by Eugeniy Mikhailov, # vim:set ft=tcl: \ exec tclsh "$0" "$@" package require sqlite3 package require md5 package require json::write source ./profiler.tcl source ./GradeBook_lib.tcl if { $argc < 1 } { puts {tests built in library functions} puts {Usage:} puts " $argv0 database_name" puts {} puts {Example:} puts [concat " $argv0" { 2013_Spring_Phys742}] exit } set dbfile [lindex $argv 0] sqlite3 db $dbfile calculteWeightedTotals global TimeProfilerMode if { [info exists TimeProfilerMode] } { TimeProfilerDump description } db close # vim: ts=2 sw=2 foldmethod=indent: