File: ex.tcl

package info (click to toggle)
pcb-rnd 2.1.1-1
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 29,260 kB
  • sloc: ansic: 198,059; sh: 5,767; yacc: 5,568; makefile: 2,519; awk: 1,737; lex: 1,073; python: 519; lisp: 169; tcl: 67; xml: 40; perl: 34; ruby: 5
file content (8 lines) | stat: -rw-r--r-- 190 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
 
proc hello {} {
	message "Hello world!"
	return 0
}

fgw_func_reg "hello"
set cookie [scriptcookie]
createmenu "/main_menu/Plugins/script/hello" "hello()" "Prints hello! in the log" $cookie