newlispfanclub.alh.net

Hi Lutz, in Perl you can iterate through the (key, value) pairs of a dictionary without loading the whole keyset into memory e.g. my %dict = (name=> 'Aragorn' , alias=> 'Strider'); while(($key, $val) = each %dict) { print "key = $key, value = $val\n"; } Python and Ruby have similar constructs. How c...

Here it is as a module: (context 'Dict) (define (Dict:Dict key value) (if value (context (context) key value) (context (context) key))) (define (get key) (Dict key)) (define (put key value) (Dict key value)) (define (keys) (map name (difference (symbols) (cons (sym (string (context)) (context)) '(Di...

The point is to localise x and y, not a and b. e.g. suppose x and y were created with set rather than let : (define (sum-sq a b) (set 'x (* a a)) (set 'y (* b b)) (+ x y)) (println (sum-sq 3 4)) (println x) (println y) In this case x and y continue to exist outside of the scope they were created in ...

Concerning Perl. Reading the PERL man-page (man perlsub): "The Perl model for function call and return values is simple: all functions are passed as parameters one single flat list of scalars, and all functions likewise return to their caller one single flat list of scalars. Any arrays or hashes in...