about summary refs log tree commit diff stats
path: root/091socket.cc
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2016-10-07 20:11:47 -0700
committerKartik K. Agaram <vc@akkartik.com>2016-10-07 20:11:47 -0700
commita7c59e3e330e83af666e70d3c8f4455ca5aebbb7 (patch)
tree041b9050fb091c4baaa601ab860ff6f0535fc9bf /091socket.cc
parent8f48273355dce35d83aa8dd715844add7df1351d (diff)
downloadmu-a7c59e3e330e83af666e70d3c8f4455ca5aebbb7.tar.gz
3476
Diffstat (limited to '091socket.cc')
-rw-r--r--091socket.cc16
1 files changed, 8 insertions, 8 deletions
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);