whistlepig 0.9.1 → 0.10

data/ext/whistlepig/test-stringpool.c

@@ -1,67 +0,0 @@
-#include <string.h>
-#include "stringpool.h"
-#include "error.h"
-#include "test.h"
-
-TEST(stringpool_initial_state) {
-  stringpool* p = malloc(stringpool_initial_size());
-  stringpool_init(p);
-
-  ASSERT(!stringpool_needs_bump(p));
-
-  free(p);
-  return NO_ERROR;
-}
-
-TEST(stringpool_add_gives_unique_ids) {
-  stringpool* p = malloc(stringpool_initial_size());
-  stringpool_init(p);
-
-  uint32_t ret1 = stringpool_add(p, "potato");
-  ASSERT(ret1 > 0);
-
-  uint32_t ret2 = stringpool_add(p, "monkey");
-  ASSERT(ret2 > 0);
-
-  ASSERT(ret1 != ret2);
-
-  free(p);
-  return NO_ERROR;
-}
-
-TEST(stringpool_add_gives_ids_that_lookup_returns) {
-  stringpool* p = malloc(stringpool_initial_size());
-  stringpool_init(p);
-
-  uint32_t ret;
-  char* s;
-
-  ret = stringpool_add(p, "potato");
-  s = stringpool_lookup(p, ret);
-  ASSERT(!strcmp(s, "potato"));
-
-  ret = stringpool_add(p, "monkey");
-  s = stringpool_lookup(p, ret);
-  ASSERT(!strcmp(s, "monkey"));
-
-  free(p);
-  return NO_ERROR;
-}
-
-TEST(stringpool_detects_out_of_room) {
-  stringpool* p = malloc(stringpool_initial_size());
-  stringpool_init(p);
-
-  uint32_t ret;
-  int times = stringpool_initial_size() / 6;
-  for(int i = 0; i < times - 1; i++)  {
-    ret = stringpool_add(p, "12345");
-    ASSERT(ret != (uint32_t)-1);
-  }
-
-  ret = stringpool_add(p, "12345");
-  ASSERT(ret == (uint32_t)-1);
-
-  return NO_ERROR;
-}
-

data/ext/whistlepig/test-termhash.c

@@ -1,95 +0,0 @@
-#include "termhash.h"
-#include "test.h"
-#include "error.h"
-
-TEST(termhash_initial_state) {
-  termhash* h = malloc(termhash_initial_size());
-  termhash_init(h);
-
-  ASSERT(h->n_occupied == 0);
-  //ASSERT(!termhash_getting_full(h));
-
-  free(h);
-  return NO_ERROR;
-}
-
-TEST(termhash_lookups_on_empty) {
-  termhash* h = malloc(termhash_initial_size());
-  termhash_init(h);
-
-  term t1 = {0, 0};
-  term t2 = {10, 20};
-  term t3 = {123, 345};
-
-  ASSERT(termhash_get_val(h, t1) == (uint32_t)-1);
-  ASSERT(termhash_get_val(h, t2) == (uint32_t)-1);
-  ASSERT(termhash_get_val(h, t3) == (uint32_t)-1);
-
-  free(h);
-  return NO_ERROR;
-}
-
-TEST(termhash_overwriting) {
-  termhash* h = malloc(termhash_initial_size());
-  termhash_init(h);
-
-  term t1 = {5, 11};
-
-  ASSERT(termhash_get_val(h, t1) == (uint32_t)-1);
-  RELAY_ERROR(termhash_put_val(h, t1, 1234));
-  ASSERT(termhash_get_val(h, t1) == 1234);
-
-  RELAY_ERROR(termhash_put_val(h, t1, 2345));
-  ASSERT(termhash_get_val(h, t1) == 2345);
-
-  RELAY_ERROR(termhash_put_val(h, t1, 1));
-  ASSERT(termhash_get_val(h, t1) == 1);
-
-  free(h);
-  return NO_ERROR;
-}
-
-TEST(termhash_many_puts) { // try and force a resize
-  termhash* h = malloc(termhash_initial_size());
-  termhash_init(h);
-
-  term t1 = {1, 0};
-
-  for(int i = 1; i < 100; i++) {
-    t1.word_s = i;
-    RELAY_ERROR(termhash_put_val(h, t1, 1000 + i));
-    if(termhash_needs_bump(h)) {
-      h = realloc(h, termhash_next_size(h));
-      if(h == NULL) RAISE_SYSERROR("realloc");
-      termhash_setup(h);
-      RELAY_ERROR(termhash_bump_size(h));
-    }
-  }
-
-  t1.word_s = 55;
-  uint32_t v = termhash_get_val(h, t1);
-  ASSERT(v == 1055);
-
-  free(h);
-  return NO_ERROR;
-}
-
-TEST(termhash_detects_out_of_room) {
-  termhash* h = malloc(termhash_initial_size());
-  termhash_init(h);
-
-  term t = {1, 0};
-
-  for(int i = 0; i < 3; i++) {
-    t.word_s = i;
-    RELAY_ERROR(termhash_put_val(h, t, 100 + i));
-  }
-
-  t.word_s = 999;
-  wp_error* e = termhash_put_val(h, t, 999);
-  ASSERT(e != NULL);
-  wp_error_free(e);
-
-  free(h);
-  return NO_ERROR;
-}

data/ext/whistlepig/test-tokenizer.c

@@ -1,55 +0,0 @@
-#include "test.h"
-#include "tokenizer.lex.h"
-
-#define ASSERT_NEXT_WORD(word) { \
-  int token_type = yylex(scanner); \
-  ASSERT(token_type == TOK_WORD); \
-  ASSERT(!strcmp(word, yyget_text(scanner))); \
-}
-
-#define ASSERT_DONE { \
-  int token_type = yylex(scanner); \
-  ASSERT(token_type == TOK_DONE); \
-}
-
-TEST(tokenizes_easy_words) {
-  yyscan_t scanner;
-  lexinfo charpos = {0, 0};
-
-  yylex_init_extra(&charpos, &scanner);
-
-  const char* string = "i love mice";
-  YY_BUFFER_STATE state = yy_scan_string(string, scanner);
-
-  ASSERT_NEXT_WORD("i");
-  ASSERT_NEXT_WORD("love");
-  ASSERT_NEXT_WORD("mice");
-  ASSERT_DONE;
-
-  yy_delete_buffer(state, scanner);
-  yylex_destroy(scanner);
-
-  return NO_ERROR;
-}
-
-TEST(strips_trailing_punctuation) {
-  yyscan_t scanner;
-  lexinfo charpos = {0, 0};
-
-  yylex_init_extra(&charpos, &scanner);
-
-  const char* string = "hey! this: you're <cool>";
-  YY_BUFFER_STATE state = yy_scan_string(string, scanner);
-
-  ASSERT_NEXT_WORD("hey");
-  ASSERT_NEXT_WORD("this");
-  ASSERT_NEXT_WORD("you're");
-  ASSERT_NEXT_WORD("cool");
-  ASSERT_DONE;
-
-  yy_delete_buffer(state, scanner);
-  yylex_destroy(scanner);
-
-  return NO_ERROR;
-}
-

data/ext/whistlepig/test.h

@@ -1,38 +0,0 @@
-#ifndef WP_TEST_H_
-#define WP_TEST_H_
-
-// whistlepig test header file
-// (c) 2011 William Morgan. See COPYING for license terms.
-//
-// macros for the c unit tests
-
-#define ASSERT(x) do { \
-  (*asserts)++; \
-  if(!(x)) { \
-    printf("-- test failure: (" #x ") is FALSE in %s (%s:%d)\n\n", __PRETTY_FUNCTION__, __FILE__, __LINE__); \
-    *fail = 1; \
-    return NO_ERROR; \
-  } \
-} while(0)
-
-#define TEST(x) wp_error* test_##x(int* fail, int* asserts)
-
-#define RUNTEST(x) do { \
-  int fail = 0; \
-  int this_asserts = 0; \
-  tests++; \
-  wp_error* err = test_##x(&fail, &this_asserts); \
-  asserts += this_asserts; \
-  if(fail) { \
-    printf("FAIL " #x "\n"); \
-    failures++; \
-  } \
-  else if(err) { \
-    errors++; \
-    printf(" ERR " #x "\n"); \
-    PRINT_ERROR(err, stdout); \
-  } \
-  else printf("PASS %d/%d " #x "\n", this_asserts, this_asserts); \
-} while(0)
-
-#endif

data/ext/whistlepig/timer.h

@@ -1,28 +0,0 @@
-#ifndef WP_TIMER_H_
-#define WP_TIMER_H_
-
-// whistlepig main header file
-// (c) 2011 William Morgan. See COPYING for license terms.
-//
-// just some timer macros
-
-#include <sys/time.h>
-
-#define TIMER(name) \
-  struct timeval name##_startt, name##_endt; \
-  long name##_elapsed;
-
-#define START_TIMER(name) \
-  TIMER(name) \
-  gettimeofday(&name##_startt, NULL);
-
-#define RESET_TIMER(name) gettimeofday(&name##_startt, NULL);
-
-#define MARK_TIMER(name) \
-  gettimeofday(&name##_endt, NULL); \
-  name##_elapsed = ((name##_endt.tv_sec - name##_startt.tv_sec) * 1000) + ((name##_endt.tv_usec - name##_startt.tv_usec) / 1000);
-
-#define TIMER_MS(name) name##_elapsed
-#define TIMER_MS(name) name##_elapsed
-
-#endif