CPAN::Groonga

ort.h"

#include "const-c.inc"

#include <pthread.h>
#include <unistd.h>
#include <td/telegram/td_json_client.h>

typedef struct {
    int id;
} client_t;

pthread_mutex_t log_mutex;
char * log_buffer

_t) + message_len + 1;

    pthread_mutex_unlock(&log_mutex);
}

MODULE = Telegram::JsonAPI		PACKAGE = Telegram::JsonAPI		

INCLUDE: const-xs.inc

void
td_create_client_id()
    PPCODE:
        dSP;
 

package Telegram::JsonAPI;

use 5.018;
use strict;
use warnings;
use Carp;

require Exporter;
use AutoLoader;

our @ISA = qw(Exporter);

our %EXPORT_TAGS = ( 'all' => [ qw(
    td_create_client_id
   

SLoader;
XSLoader::load('Telegram::JsonAPI', $VERSION);

1;
__END__

=head1 NAME

Telegram::JsonAPI - Telegram TDLib's JSON API

=head1 SYNOPSIS

  use Telegram::JsonAPI qw(:all);

  td_start_log();

tra": 1.01234}');
  # start loggin progress

  while(1) {
    my $msg = decode_json(td_receive(.1));
    # Wait for a JSON message for at most 0.1 second.
    # There will be a `@client_id` field, whi