Files @ 17fe648a8934
Branch filter:

Location: CSY/reowolf/examples/incr_7/amy.c

MH
Partial reimplementation of compiler and TypeTable

Every type symbol and its possible polymorphic variables are now
parsed up front and put in the SymbolTable, doing away with the
complicated and error-prone NamespacedIdentifier. Still pending
changes to parts of the compiler and the runtime, so not working
at the moment.
/* This example demonstrates:
- Synchronous rounds that fail result in RECOVERY; no messages are sent or received.
*/
#include <stdio.h>
#include <string.h>
#include "../../reowolf.h"
#include "../utility.c"

int main(int argc, char** argv) {
	char * pdl_ptr = buffer_pdl("eg_protocols.pdl");
	size_t pdl_len = strlen(pdl_ptr);
	Arc_ProtocolDescription * pd = protocol_description_parse(pdl_ptr, pdl_len);
	char logpath[] = "./7_amy_log.txt";
	Connector * c = connector_new_logging(pd, logpath, sizeof(logpath)-1);
	printf("Err %s\n", reowolf_error_peek(NULL));
	
	PortId putter, getter;
	connector_add_port_pair(c, &putter, &getter);
	connector_connect(c, -1);
	connector_print_debug(c);
	
	printf("Let's try to put without get\n");
	connector_put_bytes(c, putter, "hello", 5);
	// connector_get(c, getter);
	
	int err = connector_sync(c, 5000);
	printf("Error code %d with string `%s`\n", err, reowolf_error_peek(NULL));
	
	printf("\nLet's try again, doing both\n");
	connector_put_bytes(c, putter, "hello", 5);
	connector_get(c, getter);
	err = connector_sync(c, 5000);
	printf("Error code %d with string `%s`\n", err, reowolf_error_peek(NULL));
	size_t msg_len;
	const char * msg_ptr = connector_gotten_bytes(c, getter, &msg_len);
	printf("Got msg `%.*s`\n", (int) msg_len, msg_ptr);
	
	protocol_description_destroy(pd);
	connector_destroy(c);
	free(pdl_ptr);
	return 0;
}