I updated the manual translated to Japanese.
CodePatterns-20110810
guiserver_manual-144
There are in
In newlisp_manual-10302, rev is 3.
And in
maybe.
Thanks,
- Welcome to newLISP Fan Club.
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
Pages1
#1
newLISP in the real world / about Japanese Manuals
September 03, 2011, 03:56:24 AMI updated the manual translated to Japanese.
CodePatterns-20110810
guiserver_manual-144
There are in
In newlisp_manual-10302, rev is 3.
And in
maybe.
Thanks,
#2
newLISP in the real world / About "Code Patterns in newLISP"
April 09, 2011, 01:36:06 AMI have translated "Code Patterns in newLISP" to Japanese and I'm reviewing it.
Now I have some suggestion.
The parameter p is nil when no result was received during the last
The parameter p is nil when no result was received during the last
maybe.
extract or set cookies
extract or set cookies
return(
return(
There are two places.
Thanks,
#3
newLISP in the real world / User Manual and Reference v.10.2.8 rev-20.
November 14, 2010, 12:26:45 AMIn User Manual and Reference v.10.2.8
(set 'ACTX:var 123)Quote
(set 'sm 'ACTX:var)
(string sm) → "ACTX:var"
(term 'sm) → "var"
But, actually :
Code Select > (set 'ACTX:var 123)
123
> (set 'sm 'ACTX:var)
ACTX:var
> (string sm)
"ACTX:var"
> (term 'sm)
"sm"
> (term sm)
"var"
> (term 'ACTX:var)
"var"
> I use newLISP v10.2.16.
Is it true ?
P.S.
; the code to be evaluated is given in a
; the code to be evaluated is given in a
#4
newLISP in the real world / About Users Manual v.10.2.8
September 19, 2010, 05:11:39 AMOnly on Mac OS X and other Unixes will the Cilk API parallelize tasks.Quote
Myabe, there is no verb ?
All built-in primitives in newLISP can be easily renamed:
(constant 'plus +)
Now, plus is functionally equivalent to + and runs at the same speed.
As with many scripting languages, this allows for double precision floating point arithmetic to be used throughout newLISP.
Maybe, the last sentence is not necessary or there is after next example ?
If these are solved, I will complete the Japanese translation of "Users Manual and Reference v.10.2.8" except "GNU Free Documentation License" and "GNU GENERAL PUBLIC LICENSE".
#5
newLISP in the real world / The sample code of Passing data by reference
September 15, 2010, 02:38:49 AM;; pass data by context referenceQuote
(set 'Mydb:data (sequence 1 100000))
(define (change-db obj idx value)
(setf (obj:data idx) value))
(change-db Mydb 1234 "abcdefg")
(nth (Mydb:data 1234)) → "abcdefg"
According to Users Manual and Reference,
Symbol creation in contexts
3.When an unknown symbol is encountered during code translation, a search for its definition begins inside the current context. Failing that, the search continues inside MAIN for a built-in function, context, or global symbol. If no definition is found, the symbol is created locally inside the current context.
Therefore(?),
Code Select ERR: context expected in function match : obj
called from user defined function $reader-event
I think some alternative code.
(define (change-db obj idx value)Quote
(setf ((eval (sym 'data obj)) idx) value))
(define (change-dbx obj name idx value)
(setf ((eval (sym name obj)) idx) value))
(Mydb "data" (sequence 11 20))
(define (change-dby obj idx value)
(setf ((obj "data") idx) value))
(define (change-dbz obj name idx value)
(setf ((obj (string name)) idx) value))
But these are not the disadvantage, sorry.
By the way,
Using catch and throw
As an alternative to catch, thethrow-errorfunction can be used to catch errors caused by faulty code or user-initiated exceptions.
#6
newLISP in the real world / About nil and the empty list ()
September 10, 2010, 03:57:07 AM
In newLISP, nil and the empty list () are not the same as in some other Lisps. Only in conditional expressions are they treated as a Boolean false, as in and, or, if, while, unless, until, and cond.
I think that it means the following:
1.The empty list () is treated as the Boolen false in the following functions :
and, cond,do-until, do-while, if, if-not, or, unlrss, when, while
2.The empty list () is treated as the Boolen true excluding the above primitive functions.
Then,
Code Select > (map rest '((a b) (a) ()))
((b) () ())
> (filter rest '((a b) (a) ()))
((a b) (a) ())
> (clean rest '((a b) (a) ()))
()
> (map (fn (x) (or (rest x) nil)) '((a b) (a) ()))
((b) nil nil)
> (filter (fn (x) (or (rest x) nil)) '((a b) (a) ()))
((a b))
> (clean (fn (x) (or (rest x) nil)) '((a b) (a) ()))
((a) ())
> but,
Code Select > (title-case "aBCDE")
"ABCDE"
> (title-case "aBCDE" true)
"Abcde"
> (title-case "aBCDE" '())
"ABCDE"
> It might be not problem, maybe.
#7
newLISP in the real world / Script for newLISP Function Reference Viewer.
May 14, 2010, 02:16:11 AMScreenShot is
Download URL is
Usage: newlisp newLISP-help.lsp [directory | -URL | -URL=xxx.html] [yyy.ini] [zzz.hlp]
directoy is the directory of newlisp_manual.html.
xxx.html is the url or file for reading.
yyy.ini is the initial file for Window's position and size with yyy.hlp.
zzz.hlp is the function reference data file.
and examples:
Code Select newlips newLISP-help.lsp
newlips newLISP-help.lsp /usr/share/newlisp
newlips newLISP-help.lsp -URL=/usr/share/newlisp/newlisp_manual.html <- same as the usage above.
newlips newLISP-help.lsp -URL <- The latest reference is always shown.
newlips newLISP-help.lsp -URL=http://www.newlisp.org/downloads/newlisp_manual.html <- same as the usage above.
newlips newLISP-help.lsp guiserver.hlp <- GUI Funcion Reference showing.
newlips newLISP-help.lsp newlisp.ini <- Firstly, newlisp.ini and newlisp.hlp are created. At next time, Function Reference and Window's position and size are recoverd.Thank you for reading to the last minute.
I welcome any advice, i.e. usage, code technique, mistake, etc.
#8
newLISP in the real world / A case of the function find with regular expressions.
May 12, 2010, 01:52:21 AMCode Select newLISP v.10.2.1 on Win32 IPv4, execute 'newlisp -h' for more info.
> (regex "b+" "AAAABBBAAAA" 1)
("BBB" 4 3)
> (find "b+" "AAAABBBAAAA" 1)
4
> (let (op 1) (regex "b+" "AAAABBBAAAA" op))
("BBB" 4 3)
> (let (op 1) (find "b+" "AAAABBBAAAA" op))
ERR: value expected in function find : op
> Maybe since the version of
In the find function the regex option can now be specified as nil to do an offset-based search without regular expressions.Quote
#9
newLISP Graphics & Sound / about GUI functions manual
April 15, 2010, 02:11:49 AMparameter: <float-blue - The initial blue color component.
parameter: float-blue - The initial blue color component.
parameter: <int-divider-size) - The optional size of the draggable divider in pixels.
parameter: int-divider-size - The optional size of the draggable divider in pixels.
syntax: (<font color=#CC0000>gs:undo-enable</font> sym-id <boolean-enabled)
syntax: (<font color=#CC0000>gs:undo-enable</font> sym-id boolean-enabled)
#10
newLISP in the real world / crit-chi2 and prob-chi2
February 08, 2010, 12:57:57 AMI am trying to translate the reference manual of newLISP into Japanese now.
Then, I tried the function of crit-chi2 and prob-chi2.
> (crit-chi2 0.99 1)
ERR: invalid parameter: 0.0 in function crit-chi2
> (crit-chi2 0.99 2)
9.21034045
> (gammai 1 (div (crit-chi2 0.99 2) 2))
0.9900000004
> (prob-chi2 (crit-chi2 0.99 2) 2)
0.009999999611
> (crit-chi2 0.99 3)
9.210340052
> (gammai 1.5 (div (crit-chi2 0.99 3) 2))
0.9733788431
> (gammai 1.5 (div 11.345 2))
0.9900006159
> (prob-chi2 (crit-chi2 0.99 3) 3)
0.0100000016
> (sub 1.0 (gammai 1 (div (crit-chi2 0.99 3) 2)))
0.0100000016
> (crit-chi2 0.99 4)
13.27670443
> (gammai 2 (div (crit-chi2 0.99 4) 2))
0.9900000013
> (prob-chi2 (crit-chi2 0.99 4) 4)
0.009999998736
> (prob-chi2 (crit-chi2 0.99 4) 5)
0.009999998736
>
The Chi-Squared Distribution Table
I am not good at statistics.
Are these true or nil?
Please give advice to me.
And I'm sorry, if my English usage was wrong.
Pages1