ipl/packs/loadfuncpp/examples/kwd_vbl.cpp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17


/* Example of a C++ extension to icon via loadfunc,
 * without garbage collection difficulties.
 * Type 'make iexample' to build.
 * Carl Sturtivant, 2007/9/25
 */

#include "loadfuncpp.h"
using namespace Icon;

extern "C" int iexample(int argc, value argv[]) {
    safe y = argv[1];
	&progname = y;
	argv[0] = &progname;
    return SUCCEEDED;
}