Newsgroups: fj.lang.c
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!aist-nara!ie.u-ryukyu.ac.jp!newshost.ryukyu.ad.jp!sour!merope!void
From: void@merope.opus.or.jp (Kusakabe Youichi)
Subject: Re: [Q] about a format of fscanf statement for FORTRAN data
Message-ID: <1997Apr28.074943.5817@merope.opus.or.jp>
Organization: Macintosh User Group PLEIADES in opus
X-Newsreader: TIN [version 1.2 PL0]
References: <mori-2104971946380001@senna.abiko.denken.or.jp> <E913ry.9vB@ayashi.cc.sendai-ct.ac.jp>
Date: Mon, 28 Apr 1997 07:49:43 GMT
Lines: 14
Xref: galaxy.trc.rwcp.or.jp fj.lang.c:4017
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.c&nb=4017&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

Yutaka Kaneko (kaneko@ccedu.sendai-ct.ac.jp) wrote:
:    $B6b;R!w@gBfEEGH$G$9!#<+8J%U%)%m!<$G$9!#(B
: >>     #define skipcm(p)while((isspace(*p)) || (p==',')) p++;
:        #define skipcm(p)while((isspace(*(p)))||(*(p)==',')) (p)++
: $B$,@5$7$$!#(B

$B$I$C$A$_$A(B
q = skipcm(p);
$B$_$?$$$K$O;H$($J$$$G$9$M!#(B

  $B%X(B_$B%X(B   ------------------------
$B%_!&!&(B $B%_(B  void@merope.opus.or.jp
 (  $B!k(B )$B!A(B            $BF|2<ItM[0l(B
----------------------------------
