Method code for $daemon.startup()

[Turn off line numbering]
  1: arg @args;
  2: var match, port, rx, str, o, ports, msg;
  3: 
  4: (> .perms(caller(), 'system) <);
  5: rx = tostr(.objname());
  6: rx = "-(p)" + substr(rx, 1, ("_" in rx) - 1) + "=(.*)";
  7: if (find str in (args) where ((match = regexp(str, rx)))) {
  8:     [o, ports] = match;
  9:     ports = .parse_port(ports);
 10:     if (strcmp(o, "p") == 0)
 11:         ports = listen + [ports];
 12: } else {
 13:     ports = listen;
 14: }
 15: (> .start_listening(@ports) <);

// Created 22-Aug-1995 as a part of ColdCore, see: @help Credit

Tlon