From a7c59e3e330e83af666e70d3c8f4455ca5aebbb7 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Fri, 7 Oct 2016 20:11:47 -0700 Subject: 3476 --- 091socket.cc | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to '091socket.cc') diff --git a/091socket.cc b/091socket.cc index 3ee272f4..b5afa26c 100644 --- a/091socket.cc +++ b/091socket.cc @@ -14,31 +14,31 @@ struct socket_t { }; :(before "End Primitive Recipe Declarations") -_SOCKET, +_OPEN_SERVER_SOCKET, :(before "End Primitive Recipe Numbers") -put(Recipe_ordinal, "$socket", _SOCKET); +put(Recipe_ordinal, "$open-server-socket", _OPEN_SERVER_SOCKET); :(before "End Primitive Recipe Checks") -case _SOCKET: { +case _OPEN_SERVER_SOCKET: { if (SIZE(inst.ingredients) != 1) { - raise << maybe(get(Recipe, r).name) << "'$socket' requires exactly one ingredient, but got '" << inst.original_string << "'\n" << end(); + raise << maybe(get(Recipe, r).name) << "'$open-server-socket' requires exactly one ingredient, but got '" << inst.original_string << "'\n" << end(); break; } if (!is_mu_number(inst.ingredients.at(0))) { - raise << maybe(get(Recipe, r).name) << "first ingredient of '$socket' should be a number, but got '" << to_string(inst.ingredients.at(0)) << "'\n" << end(); + raise << maybe(get(Recipe, r).name) << "first ingredient of '$open-server-socket' should be a number, but got '" << to_string(inst.ingredients.at(0)) << "'\n" << end(); break; } if (SIZE(inst.products) != 1) { - raise << maybe(get(Recipe, r).name) << "'$socket' requires exactly one product, but got '" << inst.original_string << "'\n" << end(); + raise << maybe(get(Recipe, r).name) << "'$open-server-socket' requires exactly one product, but got '" << inst.original_string << "'\n" << end(); break; } if (!is_mu_number(inst.products.at(0))) { - raise << maybe(get(Recipe, r).name) << "first product of '$socket' should be a number (file handle), but got '" << to_string(inst.products.at(0)) << "'\n" << end(); + raise << maybe(get(Recipe, r).name) << "first product of '$open-server-socket' should be a number (file handle), but got '" << to_string(inst.products.at(0)) << "'\n" << end(); break; } break; } :(before "End Primitive Recipe Implementations") -case _SOCKET: { +case _OPEN_SERVER_SOCKET: { int port = ingredients.at(0).at(0); socket_t* server = server_socket(port); products.resize(1); -- cgit 1.4.1-2-gfad0