Это понятно, но...

G_Z 25.05.2004 18:24 / 25.05.2004 18:25

Конечно, здесь написание пустых ключей не более, чем любопытство, и как ни странно - работает!..
(естественно поправил на $hash_add[$.$random_digit(1)])

т.е. никакого копирования 500КБ таблицы не будет. будет передана одна внутренняя переменная-указатель на эту таблицу.

Догадывался.
Ну что ж, тогда хорошо.
Согласен.

не вижу в коде, где вы в $result кладете таблицу.

Вот тут:

$result[

	$random_digits[^table::create{number}]
...
]

Которую затем заполняю.

вижу, что туда попадет пачка пробельных символов.

Бог с ними, главное таблица есть :)
С табуляторами и переводами логичнее читать.

P.S. copy/paste метода из http://www.parser.ru/forum/?id=29788 и... endless loop detected...

О как!
Т.е. у Вас def работает правильно.
А сервер под какой ОС?

А вот так?:

@random_digits[table_limit;random_limit][table_limit;random_limit]

^if(!def $table_limit){$table_limit(1)}
^if(!def $random_limit){$random_limit(1)}

#^if($random_limit > $table_limit){$random_limit($table_limit)}

$random_digits_hash[^hash::create[]]
$counter(0)
$result[

	$random_digits[^table::create{number}]

	^while($random_digits_hash < $table_limit){
		$random_digit(^math:random($random_limit))
		^if(!def $random_digits_hash.[$random_digit]){
			$hash_add[$.$random_digit(1)]
			^random_digits_hash.add[$hash_add]
		}
	^counter.inc[]
	}

	^random_digits_hash.foreach[key;value]{
		^random_digits.append{$key}
	}
==$counter==  
]

Copy/paste из моего файла.

---