Skip to content

Instantly share code, notes, and snippets.

@easye
Created May 8, 2018 13:33
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save easye/57be608251572da61cc46c762d7b9c00 to your computer and use it in GitHub Desktop.
Save easye/57be608251572da61cc46c762d7b9c00 to your computer and use it in GitHub Desktop.
(defun cosi-init (leader-node-ip)
"Steps necessary to initialize specials in the cosi-bls system to
create a machine local simulation network."
(let ((machine-name (machine-instance)))
(setf *local-nodes* `((,machine-name . ,leader-node-ip))
*real-nodes* (list leader-node-ip)
*leader-node* (cosi-simgen::get-local-ipv4 machine-name))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment