Создание фукнции внутри crontab файла

[sournk]

Как создать внутри crontab файла функцию, в которую можно передать имя каталога, а она вернет количество файлов в нем и его подкаталогах? Функцию эту нужно вызывать из нескольких задач одного crontab файла.

Код тела функции ясен:
0 iFileCnt !
RECURSIVE FILESONLY SKIPERRORS
FOR-FILES: "e:\zzz\*"
iFileCnt @ 1 + iFileCnt !
;FOR-FILES


А как его оформить в виде функции с возвратом значения iFileCnt и текстом "e:\zzz\*" а качестве аргумента этой функции?

[Wyz]

Как создать внутри crontab файла функцию, в которую можно передать имя каталога

Поищи "локальные переменные".

А как его оформить в виде функции с возвратом значения iFileCnt

Помощь - содержание - работа с программой - nnCron и язык - Создание и использование новых слов
Вместо переменной можно положить на стек нолик и увеличивать его в цикле. А вернуть просто - не снимай со стека.

[AlikasS]

если не оптимизируя код, то

Code: Select all

<%
USER iFileCnt
: Скокафайлов? { a u -- num }
0 iFileCnt !
RECURSIVE FILESONLY SKIPERRORS
a u FOR-FILES
iFileCnt @ 1 + iFileCnt !
;FOR-FILES
iFileCnt @
;
: Скокафайлов:  eval-string, POSTPONE Скокафайлов? ; IMMEDIATE
%>

пользоваться соотвественно

Code: Select all

S" e:\zzz\*" Скокафайлов?

или

Code: Select all

Скокафайлов: "e:\zzz\*"

после этих слов на стеке количество файлов

[VoidVolker]

Code: Select all

: Скокафайлов?   ( a u -- n )
  0 ROT ROT
  RECURSIVE FILESONLY SKIPERRORS
  FOR-FILES 1+ ;FOR-FILES
;

Кстати - вроде уже был такой вопрос.

[AlikasS]

.. и решение здесь
viewtopic.php?p=7311#p7311