Mercurial > urweb
view src/c/static.c @ 2040:8ea382a57ce2
Fix index-matching bug in MonoReduce effect calculation
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Mon, 21 Jul 2014 08:11:03 -0400 |
parents | c93fbd139732 |
children | 8ecbd1100227 |
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_(void *data, const char *fmt, ...) { va_list ap; va_start(ap, fmt); vprintf(fmt, ap); } static uw_loggers loggers = {NULL, log_, log_}; 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, &loggers); 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;