Mercurial > urweb
view src/c/static.c @ 1855:0480b8f29a47
Undo 'let' inlining tweak; improve optimization of 'case' of type 'transaction'
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Fri, 07 Jun 2013 16:11:52 -0400 |
parents | 2d9f831d45c9 |
children | c93fbd139732 |
line wrap: on
line source
#include "config.h" #include <stdio.h> #include <stdarg.h> #include "urweb.h" extern uw_app uw_application; static void log_debug(void *data, const char *fmt, ...) { va_list ap; va_start(ap, fmt); vprintf(fmt, ap); } int main(int argc, char *argv[]) { uw_context ctx; failure_kind fk; if (argc != 2) { fprintf(stderr, "Pass exactly one argument: the URI to run\n"); return 1; } ctx = uw_init(0, NULL, log_debug); uw_set_app(ctx, &uw_application); uw_initialize(ctx); while (1) { fk = uw_begin(ctx, argv[1]); if (fk == SUCCESS) { uw_print(ctx, 1); puts(""); return 0; } else if (fk != UNLIMITED_RETRY) { fprintf(stderr, "Error: %s\n", uw_error_message(ctx)); return 1; } uw_reset(ctx); } } void *uw_init_client_data() { return NULL; } void uw_free_client_data(void *data) { } void uw_copy_client_data(void *dst, void *src) { } void uw_do_expunge(uw_context ctx, uw_Basis_client cli, void *data) { } void uw_post_expunge(uw_context ctx, void *data) { } int uw_supports_direct_status = 0;