view plugins/perl/common/Stringref.xs @ 13845:d0ff520f87da

[gaim-migrate @ 16301] This is tcl /cmd support. It doesn't currently let tcl plugins return error message (I couldn't ever get that to work). But other than that it works. Ethan please look over this when you get a chance. committer: Tailor Script <tailor@pidgin.im>
author Etan Reisner <pidgin@unreliablesource.net>
date Wed, 21 Jun 2006 04:57:27 +0000
parents 96f9b4798012
children
line wrap: on
line source

#include "module.h"

MODULE = Gaim::Stringref  PACKAGE = Gaim::Stringref  PREFIX = gaim_stringref_
PROTOTYPES: ENABLE

int
gaim_stringref_cmp(s1, s2)
	Gaim::Stringref s1
	Gaim::Stringref s2

size_t
gaim_stringref_len(stringref)
	Gaim::Stringref stringref

Gaim::Stringref
gaim_stringref_new(class, value)
	const char *value
    C_ARGS:
	value

Gaim::Stringref
gaim_stringref_new_noref(class, value)
	const char *value
    C_ARGS:
	value

Gaim::Stringref
gaim_stringref_ref(stringref)
	Gaim::Stringref stringref

void
gaim_stringref_unref(stringref)
	Gaim::Stringref stringref

const char *
gaim_stringref_value(stringref)
	Gaim::Stringref stringref