vurtun

struct gui_bnd {int min, mid, max, ext;};
struct gui_box {
    struct gui_bnd x;
    struct gui_bnd y;
};
#define gui_box(x,y,w,h) (struct gui_box){{x,x+(w>>1),x+w,w},{y,y+(h>>1),y+h,h}}
#define gui_min_max(a,b) (struct gui_bnd){a,a+((b-a)>>1),b,b-a}
#define gui_min_ext(m,e) (struct gui_bnd){m,m+(e>>1),m+e,e}
#define gui_max_ext(m,e) (struct gui_bnd){m-e,m-(e>>1),m,e}
#define gui_mid_min(c,m) (struct gui_bnd){m,c,m+c-m,(m-c)<<1}

vurtun

static unsigned
wang_hash(unsigned u)
{
    u = ((u ^ 61) ^ (u >> 16)) * 9;
    u = (u ^ (u >> 4)) * 0x27d4eb2d;
    return u ^ (u >> 15);
}
static unsigned
rand_lcg(unsigned *rng)
{

vurtun

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <assert.h>

#define UTF_INVALID 0xFFFD

static const char*
utf_dec(unsigned *dst, const char *p, const char *e)
{

vurtun

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <ctype.h>
#include <assert.h>

static int
str_fzy(const char *str, const char *ptn)
{
    const char *pat = ptn;

vurtun

static float
scalbnf(float x, int n)
{
	union {float f; unsigned i;} u;
	float y = x;
	if (n > 127) {
		y *= 0x1p127f;
		n -= 127;
		if (n > 127) {
			y *= 0x1p127f;

vurtun

static char*
sys_clip_get(struct sys *s, Atom selection, Atom target)
{
    assert(s);
    struct sys_x11 *x11 = s->platform;

    /* blocking wait for clipboard data */
    XEvent notify;
    XConvertSelection(x11->dpy, selection, target, selection, x11->helper, CurrentTime);
    while (!XCheckTypedWindowEvent(x11->dpy, x11->helper, SelectionNotify, &notify)) {

vurtun

#include <stdio.h>
#include <stdlib.h>
#include <stdint.h>
#include <assert.h>
#include <string.h>
#include <stdarg.h>
#include <limits.h>

#define cast(t,p) ((t)(p))
#define szof(a) ((int)sizeof(a))

vurtun

struct lzw {
    int bitcnt;
    int bits, off;
};
static int
lzw_compressed_size(int size)
{
    return size*2;
}
static unsigned char*

vurtun

// --- Library --------------------------------------------------------------------------
#include <string.h>
#include <assert.h>

struct ui_box {int x,y,w,h;};
typedef unsigned long long ui_id;
struct ui_node {
    int parent;
    int lst, end, nxt;
    int siz[2];

vurtun

This is a short post related to Opaque object representations from Our Machinery. I have to begin that my understanding of how Our Machineries tech is somewhat limit and it is currently rather late in the day, so please bear with me. As far as I understood how modules work is similar to how Quake 2 did their modules. A module has both a struct for export and one for import containing a number of function pointer. At load time the module gets a filled out import struct and fills out its own export struct with its own functions and returns it.

As for the allocators. I would have guessed tha