Subject: Re: awk problems in B20.1?
From: Christian Jönsson FOA 72 <[email-masked]>
To: [email-masked]
Cc: Haobo Yu <[email-masked]>, [email-masked]
Date: Sun, 10 Oct 1999 21:37:18 +0200

Hmm, perhaps I should have added tha whole tcl procedure, because it's =

got a "nice" feauture, a return of the value of awkCode...

TestSuite instproc unforcedmakeawk { } {
        set awkCode {
            {
                if ($2 !=3D prev) {
                        print " "; print "\"flow " $2;
			if ($13 > 0 && $14 > 0) {
			    print 100.0 * $9/$13, 100.0 * $10 / $14
			}
			prev =3D $2;
                } else if ($13 > 0 && $14 > 0) {
                        print 100.0 * $9 / $13, 100.0 * $10 / $14
		}
            }
        }
        return $awkCode
}

I suspect some kind of problem with the doublequote and/or with the =

escape char "\"...

Well, that's it for now...

/ChJ

--
Want to unsubscribe from this list?
Send a message to [email-masked]