lib/clib/euslocal.h
Go to the documentation of this file.
1 #define strchr(p) ((char *)((p)->c.str.chars))
2 /*#define ckstrchr(p) (isstring(p)?strchr(p):(int)error(E_NOSTRING))*/
3 #define ckstrlength(p) (isstring(p)?strlength(p):(int)error(E_NOSTRING))
4 #define ckstrval(p) ckstrchr(p)
5 #define fvecfv(p) ((float *)((p)->c.fvec.fv))
6 #define ckfvecfv(p) (isfltvector(p)?fvecfv(p):(int)error(E_FLOATVECTOR))
7 
8 extern long larg2long();
9 
long larg2long()


euslisp
Author(s): Toshihiro Matsui
autogenerated on Mon Feb 28 2022 22:18:27