newlispfanclub.alh.net

Has cgi.lsp been eliminated or folded into some
other module/example?

How will wiki and blog be affected if at all?

And I can write (cons 1 '(2 3)) and get (1 2 3).
This looks okay to me.

Lutz, I did a work around in the cron.lsp so that it corrects for the timezone adjusted for daylight savings time if the computer adjusts the clock. That way crontab entries are good to go. The cron.lsp utility will automatically adjust when we go on/off daylight savings time without restarting. (If...

;; usage: newlisp compile.lsp executable source.lsp ;; Note: requires link.lsp in the same directory. ;; To compile.lsp rename this file to cnl.lsp ;; and copy and paste "link.lsp" inline replacing ;; (load "link.lsp") below with this inline copy. ;; Now you can compile cnl.lsp with: ;; ;; newlisp ...

see first cron.lsp which has been corrected

    (now) returns UTC while     (date (apply date-value (now)) returns the proper timezone corrected for daylight savings time if the computer clock is set to daylight savings time. Without parsing the output of     (date (apply date-value (now)) is there a way to determine wether or not daylight sa...

see first cron.lsp which has been corrected

Currently this is single threaded so that a long running task could overshadow an adjacent alarm if it runs past its trigger time. ;; A Unix like cron scheduler for Windows. ;; by John W. Small ;; usage: newlisp cron.lsp [crontab] ;; crontab file: ;; ;; # This is a comment! ;; ;; # Fields: ;; ;; # m...

If I try to parse:

I find the following macros useful for working with symbolic data structures. The "list-let" macro below allows you to map the elements of a list to "let" bindings. (define-macro (list-let _values _vars) (let ((bindings (map (fn (_var _value) (list _var _value)) _vars (eval _values))) (body (rest (r...

Is anyone contemplating on porting newLISP onto
mobile platforms?

NewLisp has a convenient way of synthesizing lexical scope behavior whenever you need it. (define z 3) (define foo (let ((y 2)) (expand (lambda (x) (list x y z)) 'y 'z))) (foo 1) ;; ==> (1 2 3) The "expand" built-in function takes its first argument, e.g. the lambda expression here, and expands all ...

Below is a generic way to curry arguments for user defined functions. For example (define (foo x y) (+ x y)) > (fn-let foo (x 1)) (lambda (y) (let ((x 1)) (+ x y))) fn-let creates a new lambda list with the curried arguments moved into the internalize let expression. (define-macro (fn-let _f ) (let ...

Suppose that lambda and lambda-macro were identical except that the former had strict evaluation of actual arguments and the latter lazy evaluation of actual arguments. Make this the default behavior (which it is now). But suppose newlisp had atomatized behavior like this: <pre> (lambda (x ~y) ....)...

I've been working on the uq and uq@ using your code example: (define-macro (qq s-exp) (while (set 'idx (chop (ref 'uq s-exp))) (set 'qx (pop s-exp idx)) (push (eval (first (rest qx))) s-exp idx)) s-exp) ;; now use it (set 'x 'hello) (qq ( (uq (+ 1 2)) ((uq (+ 3 4)) (uq x)))) => (3 (7 hello)) ;; some...

If newLisp is such a dog and dead (in the grave long ago) why kick it? Several things the detractors miss about newLisp. 1. It's small foot print and convenience. Perhaps they didn't miss this at all. Perhaps it is admitting "common folk" to the exclusive Lisp country club that gets their goat as if...

The following macro and function define a quasiquote / unquote mechanism in newlisp. Note the use of uq and uq@. ;; usage: (qq (x y (uq (+ 1 2)) (uq@ (list 1 2 3)))) ;; ==> (x y 3 1 2 3) (define-macro (qq s-expr) (qq-eval s-expr)) ;; Since qq is a macro you can't use (args) within. ;; Use qq-eval in...

I'm hoping something is gained execution wise over the previous two definitions of expand-let. This is Lutz's version slightly edited. (define-macro (expand-let ) (eval (cons 'let (cons (rest (args)) (list (cons 'expand (cons (first (args)) (map (fn (arg) (apply quote (list (first arg)))) (rest (arg...

I'm trying to understand the proper use of expand with macros. So I define the macro "expand-let" with the following semantics. (expand-let '(x y z) (x 1) (y 2) (z 3)) "expands" to the equivalent of (let ((x 1)(y 2)(z 3)) (expand '(x y z) 'x 'y 'z)) returning (1 2 3) The following is my implementati...

You can also have variable expansion in macros using the newLISP function 'expand' Lutz So the following would define bar as interned in the first email of this thread: > (define-macro (bar _x _y) (expand (fn () (list _x _y) '_x '_y)) > (foo 1 2) (lambda () (list 1 2)) I'm beginning to appreciate t...

define-macro is really define-lazy and not a macro at all. Thus > (define-lazy (bar _x _y) (fn () (list _x _y))) (lambda-lazy (_x _y) (lambda-strict () _x _y)) and > (bar a b) > ((lambda-lazy (_x _y) (lambda-strict () _x _y)) 'a 'b) (lambda-strict() _x _y) which models the behavior of define-macro p...

I'm trying to come up with a conceptual model of how define-macro works. >(define-macro (foo _x _x) (list _x _y)) (lambda-macro (_x _y) (list _x _y)) > (foo 1 2) (1 2) > (foo a b) (a b) So far so good. Conceptually I'm thinking the macro invocation is a two step process. > (foo a b) ((lambda-macro (...

Without resorting to define-macro and (args) what is the preferred idiom for specifying a function taking a variable number of arguments? Do you simply have to anticipate these optional arguments? (define (foo x y z) ...) But if this is the case than passing this variable number of arguments onto an...

I installed the newlisp 8.2 on windows. When I start the IDE I get this error message which doesn't seem to effective anything else negatively. Error sourcing /freewrap/newlisp-tk.tcl: couldn't change working directory to "c:/newlisp/": no such file or directory I installed newlisp in a directory di...

can do: eval of a list of elements > (map 'eval '(1 (+ 2 3))) (1 5) > Nigel Clever - Thanks! I was hoping to do something like `(html (body (@ (text blue) ...) ...) and have unquoted expressiion to fill in. I know I can use the cgi module instead and embed newlisp code instead as the dual of this a...