[q-lang-cvs] q/examples csv.q,1.2,1.3 except.q,1.18,1.19
Brought to you by:
agraef
Menu
▾
▴
[q-lang-cvs] q/examples csv.q,1.2,1.3 except.q,1.18,1.19
|
From: Albert G. <ag...@us...> - 2008-01-23 05:57:25
|
Update of /cvsroot/q-lang/q/examples In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv23520/examples Modified Files: csv.q except.q Log Message: fixes for latest clib Index: except.q =================================================================== RCS file: /cvsroot/q-lang/q/examples/except.q,v retrieving revision 1.18 retrieving revision 1.19 diff -C2 -d -r1.18 -r1.19 *** except.q 29 Sep 2007 08:10:14 -0000 1.18 --- except.q 23 Jan 2008 05:57:22 -0000 1.19 *************** *** 209,212 **** --- 209,244 ---- bstr B = throw (clib_err (bstr B)); bytes B = throw (clib_err (bytes B)); + get_int8 B I = throw (clib_err (get_int8 B I)); + get_int16 B I = throw (clib_err (get_int16 B I)); + get_int32 B I = throw (clib_err (get_int32 B I)); + get_uint8 B I = throw (clib_err (get_uint8 B I)); + get_uint16 B I = throw (clib_err (get_uint16 B I)); + get_uint32 B I = throw (clib_err (get_uint32 B I)); + get_float B I = throw (clib_err (get_float B I)); + get_double B I = throw (clib_err (get_double B I)); + put_int8 B I X = throw (clib_err (put_int8 B I X)); + put_int16 B I X = throw (clib_err (put_int16 B I X)); + put_int32 B I X = throw (clib_err (put_int32 B I X)); + put_uint8 B I X = throw (clib_err (put_uint8 B I X)); + put_uint16 B I X = throw (clib_err (put_uint16 B I X)); + put_uint32 B I X = throw (clib_err (put_uint32 B I X)); + put_float B I X = throw (clib_err (put_float B I X)); + put_double B I X = throw (clib_err (put_double B I X)); + int8_list B = throw (clib_err (int8_list B)); + int16_list B = throw (clib_err (int16_list B)); + int32_list B = throw (clib_err (int32_list B)); + uint8_list B = throw (clib_err (uint8_list B)); + uint16_list B = throw (clib_err (uint16_list B)); + uint32_list B = throw (clib_err (uint32_list B)); + float_list B = throw (clib_err (float_list B)); + double_list B = throw (clib_err (double_list B)); + int8_vect Xs = throw (clib_err (int8_vect Xs)); + int16_vect Xs = throw (clib_err (int16_vect Xs)); + int32_vect Xs = throw (clib_err (int32_vect Xs)); + uint8_vect Xs = throw (clib_err (uint8_vect Xs)); + uint16_vect Xs = throw (clib_err (uint16_vect Xs)); + uint32_vect Xs = throw (clib_err (uint32_vect Xs)); + float_vect Xs = throw (clib_err (float_vect Xs)); + double_vect Xs = throw (clib_err (double_vect Xs)); fdopen FD MODE = throw (clib_err (fdopen FD MODE)); freopen NAME MODE F = throw (clib_err (freopen NAME MODE F)); *************** *** 272,275 **** --- 304,319 ---- jacobi M N = throw (clib_err (jacobi M N)); sort P Xs = throw (clib_err (sort P Xs)); + fnmatch PATTERN S = throw (clib_err (fnmatch PATTERN S)); + glob PATTERN = throw (clib_err (glob PATTERN)); + regmatch OPTS REGEX S = throw (clib_err (regmatch OPTS REGEX S)); + regnext = throw (clib_err regnext); + regdone = throw (clib_err regdone); + regex OPTS REGEX S EXPR = throw (clib_err (regex OPTS REGEX S EXPR)); + regstart = throw (clib_err regstart); + regskip = throw (clib_err regskip); + reg N = throw (clib_err (reg N)); + regpos N = throw (clib_err (regpos N)); + regend N = throw (clib_err (regend N)); + regs = throw (clib_err regs); /* complex *******************************************************************/ *************** *** 684,697 **** dcngettext DOMAIN MSGID1 MSGID2 N CATEGORY = throw (system_err (dcngettext DOMAIN MSGID1 MSGID2 N CATEGORY)); - fnmatch PATTERN S = throw (system_err (fnmatch PATTERN S)); - glob PATTERN = throw (system_err (glob PATTERN)); - regmatch OPTS REGEX S = throw (system_err (regmatch OPTS REGEX S)); - regnext = throw (system_err regnext); - regdone = throw (system_err regdone); - regex OPTS REGEX S EXPR = throw (system_err (regex OPTS REGEX S EXPR)); - regstart = throw (system_err regstart); - regskip = throw (system_err regskip); - reg N = throw (system_err (reg N)); - regpos N = throw (system_err (regpos N)); - regend N = throw (system_err (regend N)); - regs = throw (system_err regs); --- 728,729 ---- Index: csv.q =================================================================== RCS file: /cvsroot/q-lang/q/examples/csv.q,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** csv.q 28 Sep 2007 22:40:58 -0000 1.2 --- csv.q 23 Jan 2008 05:57:22 -0000 1.3 *************** *** 46,51 **** */ - from system import regex, reg, regs, regskip; - public csvreadfile F, csvreadline F, csvread S; public csvwritefile F L, csvwriteline F L, csvwrite L; --- 46,49 ---- |
