2011-04-29 20:58:19 +00:00
|
|
|
#include <psyc.h>
|
|
|
|
|
#include <unistd.h>
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
#include <fcntl.h>
|
2011-05-08 21:40:26 +00:00
|
|
|
#include <lib.h>
|
2011-04-29 20:58:19 +00:00
|
|
|
|
|
|
|
|
int main() {
|
|
|
|
|
unless (psyc_getVarType(PSYC_C2ARG("_list"))) return 1;
|
|
|
|
|
unless (psyc_getVarType(PSYC_C2ARG("_list_foo"))) return 2;
|
|
|
|
|
unless (psyc_getVarType(PSYC_C2ARG("_color_red"))) return 3;
|
|
|
|
|
if (psyc_getVarType(PSYC_C2ARG("_last"))) return 4;
|
|
|
|
|
if (psyc_getVarType(PSYC_C2ARG("_lost_foo"))) return 5;
|
|
|
|
|
if (psyc_getVarType(PSYC_C2ARG("_colorful"))) return 6;
|
|
|
|
|
if (psyc_getVarType(PSYC_C2ARG("_foo"))) return 7;
|
|
|
|
|
if (psyc_getVarType(PSYC_C2ARG("bar"))) return 8;
|
|
|
|
|
if (psyc_getVarType(PSYC_C2ARG("______"))) return 9;
|
|
|
|
|
if (psyc_getVarType(PSYC_C2ARG("_"))) return 10;
|
|
|
|
|
|
|
|
|
|
puts("psyc_getVarType passed all tests.");
|
|
|
|
|
return 0; // passed all tests
|
|
|
|
|
}
|
