@verb #0:"new_server_version" this none this rxdo #55
@program #0:"new_server_version" this none this
caller != this && raise(E_PERM)
"Check for rogue stuff:"
if (`function_info("verb_cache_stats") ! E_INVARG')
  "It's rogue alright!"
  "Up the max-tick counts on everything :-)"
  $server_options.fg_ticks = 200000
  $server_options.bg_ticks = 100000
  load_server_options()
  $tcm_threshold = 50
else
  "Aw, phooey!"
  $server_options.fg_ticks = 30000
  $server_options.fg_ticks = 10000
  $tcm_threshold = 25
endif
if (`function_info("fileversion") ! E_INVARG')
  "Enable FUP"
else
  "Uh-oh... Disable FUP"
endif
$version = server_version()
"Last modified by Slacker (#55) on Mon Jun 21 05:46:05 1999 MDT."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:03 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:03 2002 MDT."
.