X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=fml%2Flists.fml;h=60ebc23e7ceb2cb4e15c0a4c0ad5f394fca9a616;hb=3f6af0f3aa9f114cf562c28f2ed0b954e4c5d659;hp=346628a83bb493f369d3afcdf4d82b588164ddc8;hpb=db6a18e6dc8f76018718a603fadda55c9b036767;p=egate.git diff --git a/fml/lists.fml b/fml/lists.fml index 346628a..60ebc23 100644 --- a/fml/lists.fml +++ b/fml/lists.fml @@ -1,13 +1,14 @@ # FML list inspection # -# $Id: lists.fml,v 1.1 1995/02/07 16:09:24 adam Exp $ +# lists.fml,v 1.3 1995/02/09 14:33:38 adam Exp \set months {Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec} \set days {31 28 31 30 31 30 31 31 30 31 30 31} -\foreach m \months +Number of months: +\foreach m {\months} {Month: \m\n} \set i 1 Number of days in every month:\n -\while {\i \le 12} +\while {\i \le \llen \months} { \months \index \i : \ \days \index \i \if {\i \eq 6} {\n} \else {,\ }