valid_int_p

one of the documented procedures in this installation of the ACS
Usage:
valid_int_p   number
What it does:
Checks if a number is a valid integer
Defined in: /web/philip/tcl/events-defs.tcl

Source code:


    if {[regexp {[^0-9]} $number match]} {
	return 0
    } else {
	return 1
    }


philg@mit.edu