libpsyc/test/getVarType.c

22 lines
749 B
C
Raw Normal View History

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_getVarType2(PSYC_C2ARG("_list"))) return 1;
unless (psyc_getVarType2(PSYC_C2ARG("_list_foo"))) return 2;
unless (psyc_getVarType2(PSYC_C2ARG("_color_red"))) return 3;
if (psyc_getVarType2(PSYC_C2ARG("_last"))) return 4;
if (psyc_getVarType2(PSYC_C2ARG("_lost_foo"))) return 5;
if (psyc_getVarType2(PSYC_C2ARG("_colorful"))) return 6;
if (psyc_getVarType2(PSYC_C2ARG("_foo"))) return 7;
if (psyc_getVarType2(PSYC_C2ARG("bar"))) return 8;
if (psyc_getVarType2(PSYC_C2ARG("______"))) return 9;
if (psyc_getVarType2(PSYC_C2ARG("_"))) return 10;
2011-04-29 20:58:19 +00:00
puts("psyc_getVarType passed all tests.");
return 0; // passed all tests
}