使用POSIX线程模拟协程(在guile方案中)

#include <pthread.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>

typedef struct {
    void (*func)(void *);
    void *arg;
} coroutine_t;

void *coroutine_wrapper(void *arg) {
    coroutine_t *coroutine = (coroutine_t *)arg;
    coroutine->func(coroutine->arg);
    return NULL;
}

void create_coroutine(void (*func)(void *), void *arg) {
    pthread_t thread;
    coroutine_t coroutine = {func, arg};
    pthread_create(&thread, NULL, coroutine_wrapper, &coroutine);
    pthread_detach(thread); // Detach the thread to avoid memory leaks
}

void my_coroutine(void *arg) {
    int id = *(int *)arg;
    for (int i = 0; i < 5; ++i) {
        printf("Coroutine %d: %d\n", id, i);
        usleep(100000); // Sleep for 100ms
    }
}

int main() {
    int id1 = 1, id2 = 2;
    create_coroutine(my_coroutine, &id1);
    create_coroutine(my_coroutine, &id2);

    // Give some time for coroutines to run
    sleep(3);
    return 0;
}

#include <pthread.h>

pthread_mutex_t mutex = PTHREAD_MUTEX_INITIALIZER;

void safe_increment(int *value) {
    pthread_mutex_lock(&mutex);
    (*value)++;
    pthread_mutex_unlock(&mutex);
}