protocol definition added, using SwiftForth --uplink