Search found 33 matches
- Tue Sep 08, 2009 12:48 pm
- Forum: Whither newLISP?
- Topic: Developing commercial software
- Replies: 38
- Views: 43506
- Tue Sep 08, 2009 12:20 am
- Forum: Whither newLISP?
- Topic: Developing commercial software
- Replies: 38
- Views: 43506
- Thu Oct 30, 2008 6:23 pm
- Forum: Whither newLISP?
- Topic: Developing commercial software
- Replies: 38
- Views: 43506
- Tue Dec 04, 2007 2:52 pm
- Forum: Whither newLISP?
- Topic: Developing commercial software
- Replies: 38
- Views: 43506
- Sat Mar 10, 2007 5:30 pm
- Forum: newLISP in the real world
- Topic: Return function with variable data?
- Replies: 2
- Views: 3287
Return function with variable data?
Is something like this possible? (define (create-greeter greeting) (lambda (n) (println greeting " " n "!"))) (set 'hello-greeter (create-greeter "Hello")) (set 'goodbye-greeter (create-greeter "Goodbye")) (hello-greeter "World") (goodbye-greeter "World") The obvious desired output is: Hello World G...
- Sat Mar 10, 2007 4:21 pm
- Forum: newLISP in the real world
- Topic: sym and lookup problem
- Replies: 1
- Views: 2719
sym and lookup problem
I have the following function: (define (rowAsHash res idx) (set 'h '()) (dotimes (fidx (fieldCount res)) (push (list (sym (fieldName res fidx)) (value res idx fidx)) h)) h) fieldName returns a string. value returns the contents of the particular row/field index combo. Basically, I do: (pg:query db "...
- Fri Mar 09, 2007 2:35 pm
- Forum: newLISP newS
- Topic: PostgreSQL module
- Replies: 2
- Views: 3043
PostgreSQL module
I have created pgsql.lsp that accesses PostgreSQL from newLISP. I am planning on doing some more work on it this weekend. I have not officially released the code, but I would like if those interested would review the code and offer any suggestions. I am a new newLISP programmer and in many ways, a n...
- Fri Mar 09, 2007 3:58 am
- Forum: newLISP in the real world
- Topic: nth-set in side a function, affecting parameter value?
- Replies: 4
- Views: 4629
Ok, I figured out this to make things work, but not sure if it's the right or best or even only way to do it:
Code: Select all
(define-macro (seg-name seg val)
(if val (nth-set 0 (eval seg) val))
((eval seg) 0))
- Fri Mar 09, 2007 3:31 am
- Forum: newLISP in the real world
- Topic: nth-set in side a function, affecting parameter value?
- Replies: 4
- Views: 4629
nth-set in side a function, affecting parameter value?
I have the follow function: (define (seg-name seg val) (if val (nth-set 0 seg val)) (seg 0)) I want to be able to: (set 'seg '("NM1" "85" "DEF")) (println (seg-name seg)) ;; "NM1" (seg-name seg "HL2") (println (seg-name seg)) ;; "HL2" ---- that's what I want (println (seg-name seg)) ;; "NM1" ---- is...
- Wed Feb 21, 2007 9:21 pm
- Forum: newLISP in the real world
- Topic: Function from symbol?
- Replies: 3
- Views: 4234
Hm, my code was incorrect above. I simplified:Lutz wrote:not sure what you mean, but
Code: Select all
(set 'lst '((name 20 trim) (age 5 int)))
(print ((lst 0 2) "JEREMY ") "\n")
;; Desired output: JEREMY\n
Code: Select all
invalid function in function print : ((lst 0 2) "JEREMY ")
- Wed Feb 21, 2007 8:02 pm
- Forum: newLISP in the real world
- Topic: Function from symbol?
- Replies: 3
- Views: 4234
Function from symbol?
How can I: (define (greet who) (print "Hello " who)) (set 'lst '((name "John" who) (age 10))) ((lst 0 2) (lst 0 1)) In other words, reference a dynamic function inside a quoted list. The real reason for this is a process I created for parsing fixed width files: (define (special-conversion-function s...
- Wed Feb 21, 2007 6:29 pm
- Forum: newLISP and the O.S.
- Topic: newlisp-tk on Mac OSX?
- Replies: 10
- Views: 11509
- Wed Feb 21, 2007 2:23 pm
- Forum: newLISP and the O.S.
- Topic: newlisp-tk on Mac OSX?
- Replies: 10
- Views: 11509
- Wed Feb 21, 2007 2:18 pm
- Forum: newLISP and the O.S.
- Topic: newlisp-tk on Mac OSX?
- Replies: 10
- Views: 11509
$ ./configure Discovered Darwin MacOS X with readline suport, enter: make to make for MacOS X with readline support $ make ./build Discovered Darwin Mac OSX with readline suport: make -f makefile_darwin cc -L/usr/lib -Wall -O2 -I/usr/include -c -g -DREADLINE -DMAC_OSX newlisp.c cc -L/usr/lib -Wall -...
- Wed Feb 21, 2007 2:05 pm
- Forum: newLISP and the O.S.
- Topic: newlisp-tk on Mac OSX?
- Replies: 10
- Views: 11509
- Wed Feb 21, 2007 1:43 pm
- Forum: newLISP and the O.S.
- Topic: newlisp-tk on Mac OSX?
- Replies: 10
- Views: 11509
newlisp-tk on Mac OSX?
How do I do this? ./configure && make does not seem to do the trick for me.
- Thu Jan 11, 2007 9:00 am
- Forum: newLISP in the real world
- Topic: How to import and use C func(context_p ctx, char ** output)?
- Replies: 1
- Views: 2621
How to import and use C func(context_p ctx, char ** output)?
How can I import and use: int template_parse_string(context_p ctx, char *template_filename, char **output); ??? I know how to import and use C functions, but this one in particular is giving me problems with the char ** output parameter. This is a pointer to a string pointer. It's not an array of st...
- Wed Jan 10, 2007 2:36 pm
- Forum: newLISP in the real world
- Topic: SQL query tool question
- Replies: 1
- Views: 2727
SQL query tool question
In my time of looking at different languages, one Scheme version had a SQL query generation package that I thought made working with SQL easier. For instance: (sql:select '(a.name a.age b.date) '((as a person) (as b dobs)) '((= a.id b.id))) I was thinking of making something similar in newLISP, but ...
- Sat Dec 09, 2006 4:37 pm
- Forum: newLISP in the real world
- Topic: #newlisp
- Replies: 7
- Views: 7215
- Sat Dec 09, 2006 4:02 pm
- Forum: newLISP in the real world
- Topic: #newlisp
- Replies: 7
- Views: 7215
- Sat Dec 09, 2006 3:46 pm
- Forum: newLISP in the real world
- Topic: #newlisp
- Replies: 7
- Views: 7215
#newlisp
Anyone use it any more? #newlisp's topic still says latest release 8.7.0. I've visited it the last few days and only me and ChanServ were there... ChanServ isn't much for company :-/
Jeremy
Jeremy
- Fri Dec 08, 2006 5:23 am
- Forum: newLISP in the real world
- Topic: Easy access to parsed XML data (via xml-parse)
- Replies: 1
- Views: 2533
Easy access to parsed XML data (via xml-parse)
I am looking for easy access to small XML files. I came up with the following... Being new to newLISP and Lisp in general, I am sure someone can make the function a bit nicer. Just seems kind of, I don't know, kludgey? Any criticism would be appriciated. Does anyone have better methods at easy acces...
- Fri Dec 08, 2006 2:38 am
- Forum: newLISP newS
- Topic: let and set
- Replies: 6
- Views: 5761
By the way, if it's only 500K, it could be worth doing it in one go: (set 'f (parse (read-file "/Users/me/Desktop/data.txt") "~")) Should only take a second or so... I will be processing a hundred or so files a day, and many times I need to just read the first segment of the file. (that tells me wh...
- Thu Dec 07, 2006 8:04 pm
- Forum: newLISP newS
- Topic: load and large applications
- Replies: 3
- Views: 3556
Tps: in the future move this type of questions to the "newLISP for Win" or "newLISP for Unix" topic. We use the "news" topic for news and everything related to documentation. I was confused about that. The topic description for newLISP newS says: "News, releases, newLISP talk in general." .. The "n...
- Thu Dec 07, 2006 7:18 pm
- Forum: newLISP newS
- Topic: load and large applications
- Replies: 3
- Views: 3556
load and large applications
I have an app that I will separate into many source files (20 or so). How do you deal with load? I believe this is the only way to include multiple source files in a given program? The problem is complicated further by multiple machines that the code is run on. i.e. (load "/Users/jeremy/lisp/filea.l...