diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-10-16 11:11:54 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-10-16 11:11:54 -0700 |
commit | f03c9c05494997d4d1d64594fd357170f45d2da2 (patch) | |
tree | 4f23ed0b11ae785b9f3e2ece2c1238f0fb61bd17 | |
parent | 0cdaca2c0c78d3f8df4ca78d5e445844f0145ae4 (diff) | |
download | mu-f03c9c05494997d4d1d64594fd357170f45d2da2.tar.gz |
3507
-rw-r--r-- | 088file.mu | 8 | ||||
-rw-r--r-- | 092socket.mu | 8 | ||||
-rw-r--r-- | http-server.mu | 4 |
3 files changed, 10 insertions, 10 deletions
diff --git a/088file.mu b/088file.mu index b3c724c0..80a6be2b 100644 --- a/088file.mu +++ b/088file.mu @@ -19,7 +19,7 @@ def start-reading resources:&:resources, filename:text -> contents:&:source:char file:num <- $open-file-for-reading filename assert file, [file not found] contents:&:source:char, sink:&:sink:char <- new-channel 30 - start-running transmit-from-file file, sink + start-running receive-from-file file, sink return } # fake file system @@ -36,13 +36,13 @@ def start-reading resources:&:resources, filename:text -> contents:&:source:char loop-unless found? contents:&:source:char, sink:&:sink:char <- new-channel 30 curr-contents:text <- get tmp, contents:offset - start-running transmit-from-text curr-contents, sink + start-running receive-from-text curr-contents, sink return } return 0/not-found ] -def transmit-from-file file:num, sink:&:sink:char -> sink:&:sink:char [ +def receive-from-file file:num, sink:&:sink:char -> sink:&:sink:char [ local-scope load-ingredients { @@ -55,7 +55,7 @@ def transmit-from-file file:num, sink:&:sink:char -> sink:&:sink:char [ file <- $close-file file ] -def transmit-from-text contents:text, sink:&:sink:char -> sink:&:sink:char [ +def receive-from-text contents:text, sink:&:sink:char -> sink:&:sink:char [ local-scope load-ingredients i:num <- copy 0 diff --git a/092socket.mu b/092socket.mu index 22d8a342..250afcf6 100644 --- a/092socket.mu +++ b/092socket.mu @@ -13,11 +13,11 @@ container local-network [ # `start-reading-socket` and `start-writing-socket`, add port-connections to # the local-network. # -# For reading, `transmit-from-socket` will check for a +# For reading, `receive-from-socket` will check for a # port-connection on the port parameter that's been passed in. If there's -# no port-connectin for that port, it will return nothing and log. If -# there is a port-connection for that port, it will transmit the contents -# to the passed in sink. +# no port-connection for that port, it will return nothing and log. If there +# is a port-connection for that port, it will transmit the contents to the +# passed in sink. # # For writing, `start-writing-socket` returns a sink connecting the # caller to the socket on the passed-in port. diff --git a/http-server.mu b/http-server.mu index c5865fc4..c415b094 100644 --- a/http-server.mu +++ b/http-server.mu @@ -14,7 +14,7 @@ def main [ return-unless socket session:num <- $accept socket contents:&:source:char, sink:&:sink:char <- new-channel 30 - sink <- start-running transmit-from-socket session, sink + sink <- start-running receive-from-socket session, sink buf:&:buffer <- new-buffer 30 { c:char, done?:bool, contents <- read contents @@ -50,7 +50,7 @@ def write-to-socket session-socket:num, s:text [ } ] -def transmit-from-socket session:num, sink:&:sink:char -> sink:&:sink:char [ +def receive-from-socket session:num, sink:&:sink:char -> sink:&:sink:char [ local-scope load-ingredients { |