CHANGE: replaced port/locals with port/extra

Oldes · Feb 8, 2022 · c54b352 · c54b352
1 parent c6efa2a
commit c54b352
Show file tree

Hide file tree

Showing 8 changed files with 92 additions and 92 deletions.
diff --git a/src/boot/sysobj.reb b/src/boot/sysobj.reb
@@ -247,8 +247,8 @@ standard: object [
 		actor:		; port action handler (script driven)
 		awake:		; port awake function (event driven)
 		state:		; internal state values (private)
+		extra:		; user-defined storage of local data
 		data:		; data buffer (usually binary or block)
-		locals:		; user-defined storage of local data
 ;		stats:		; stats on operation (optional)
 	]
 

diff --git a/src/core/p-checksum.c b/src/core/p-checksum.c
@@ -133,7 +133,7 @@
 ***********************************************************************/
 {
 	//REBVAL *data = BLK_SKIP(port, STD_PORT_DATA);
-	REBVAL *ctx  = BLK_SKIP(port, STD_PORT_LOCALS);
+	REBVAL *ctx  = BLK_SKIP(port, STD_PORT_EXTRA);
 
 	if(!IS_BINARY(ctx)) {
 		SET_BINARY(ctx, Make_Binary(ctx_size));
@@ -224,7 +224,7 @@
 	req = Use_Port_State(port, RDI_CHECKSUM, sizeof(REBREQ));
 
 	data = BLK_SKIP(port, STD_PORT_DATA); //will hold result
-	ctx  = BLK_SKIP(port, STD_PORT_LOCALS);
+	ctx  = BLK_SKIP(port, STD_PORT_EXTRA);
 	int ctx_size = 0, blk_size = 0;
 
 	Init_sizes(method, &blk_size, &ctx_size);

diff --git a/src/mezz/prot-http.reb b/src/mezz/prot-http.reb
@@ -1,6 +1,6 @@
 REBOL [
 	System: "REBOL [R3] Language Interpreter and Run-time Environment"
-	Title: "REBOL 3 HTTP protocol scheme"
+	Title: "Rebol3 HTTP protocol scheme"
 	Name: http
 	Type: module
 	Rights: {
@@ -141,7 +141,7 @@ read-sync-awake: func [event [event!] /local error][
 ]
 http-awake: func [event /local port http-port state awake res][
 	port: event/port
-	http-port: port/locals
+	http-port: port/extra
 	state: http-port/state
 	if any-function? :http-port/awake [state/awake: :http-port/awake]
 	awake: :state/awake
@@ -792,7 +792,7 @@ sys/make-scheme [
 			]
 
 			conn/awake: :http-awake
-			conn/locals: port
+			conn/extra: port
 			sys/log/info 'HTTP ["Opening connection:^[[22m" conn/spec/ref]
 			open conn