newlispfanclub.alh.net

kosh

This: http://www.newlisp.org/downloads/development/inprogress/ now should work independent of compilers and without compiler warning messages when time_t is 64-bit on 32-bit newLISP It looks good to me :) thanks again. What version of MINGW are you running? I used MinGW gcc 4.8.1 (latest version). ...

kosh

Lutz, thank you for the merge my patch. However please modified a little. $ wget http://www.newlisp.org/downloads/development/inprogress/newlisp-10.6.1.tgz $ tar xf newlisp-10.6.1.tgz $ cd newlisp-10.6.1 $ make -f makefile_mingw_utf8 CC=gcc STRIP=touch ... $ newlisp newLISP v.10.6.1 32-bit on Win32 ...

kosh

Hi Lutz. This patch is solves about 2 problems on MinGW compile. 1. _WIN32_WINNT macros must define before windows.h and other headers Because of most of mingw headers (stdio.h, signal.h, ...) include _mingw.h and sdkddkver.h. And define _WIN32_WINNT there if not defined. diff --git a/newlisp.h b/ne...

kosh

crc32 function may return wrong value on 32-bit machine. > (crc32 "hello") 907060870 ; OK > (crc32 "HELLO") -1052482506 ; NG [0xffffffffc1446436] > (& (crc32 "HELLO") 0x00000000ffffffff) 3242484790 ; OK [0x00000000c144643] This problem occurs because of difference between internal value and CELL va...

kosh

Hi Lutz. I found unusual behavior when 'import' called from url. newLISP v.10.5.4 32-bit on BSD IPv4/6 UTF-8 libffi, options: newlisp -h > (setq url "http://lambda.que.jp/files/x.lsp") > (get-url url) "(import \"libc.so\" \"printf\")\n" > (load url) ERR: import function not found in function import ...

kosh

the qa-dot test runs but fails at semaphore To use semaphore function in cygwin, try install cygserver service. http://cygwin.com/cygwin-ug-net/using-cygserver.html $ (login as root) $ cygserver-config $ cygrunsrv --install cygserver -p /usr/sbin/cygserver $ cygrunsrv --start cygserver $ make -f ma...

kosh

Did you do this with a specific purpose or just for replication? Both. This repo is a replication, because it contains a set of newlisp sources. I did manually commit from SF sources. I have no idea about how to automate it :-( This git repository made for my personal development. For example, it w...

kosh

Hi.

http://repo.or.cz/w/newlisp/alt-newlisp.git

I forked newlisp mirror repository in repo.or.cz.

These original sources are available here: http://sourceforge.net/projects/newlisp/files/
All commit message are based on doc/CHANGES.

You can view the difference between commits. and clone it.

kosh

Hi. This patch is resolve problems which fail to close the file descriptor. diff --git a/nl-sock.c b/nl-sock.c index 00efa7b..9acdaa7 100644 --- a/nl-sock.c +++ b/nl-sock.c @@ -1485,7 +1485,12 @@ handle = open(logFile, O_RDWR | O_APPEND | O_BINARY | O_CREAT, if(write(handle, text, strlen(text)) < 0)...

kosh

This test code is based on JSON Checker (http://www.json.org/JSON_checker/) json-test.lsp: http://pastebin.com/9nqJHSW3 The results are here: > newlisp -v newLISP v.10.5.2 32-bit on Win32 IPv4/6 UTF-8 libffi. > newlisp json-test.lsp fail1.json -> pass : "A JSON payload should be an object or array, ...

kosh

Thanks Lutz.

Code: Select all

newLISP v.10.5.2 32-bit on Win32 IPv4/6 UTF-8 libffi, options: newlisp -h

> (json-parse [text]{"a backslash":"\\"}[/text])
(("a backslash" "\\\\"))

This retun value is maybe (("a backslash" "\\"))

Regards.

kosh

Hi. json-parse cannot handle JSON data with inner double quote chars. > (setf data [text]{"foo": ["bar", "\"baz\""]}[/text]) "{\"foo\": [\"bar\", \"\\\"baz\\\"\"]}" > (json-parse data) nil > (json-error) ("invalid JSON array format" 19) This problem doesn't occur in previous json module. > (module "...

kosh

Thanks, Lutz.

I found another problem.
division operator (/) with bigint works strangely.

Code: Select all

> (/ 123000000000L 1)
123L
> (/ 12300000000000000000000000000L 1)
12300000000000000001L
> (/ 123000000000000000000000000000L 1)
123000000001^[,),(-*,(L

regards.

kosh

hi. Does bigint function allow non-numerical characters? newLISP v.10.5.0 32-bit on Win32 IPv4/6 UTF-8 libffi, options: newlisp -h > (bigint "HELLO") 264111L > (bigint "") (null)L > (bigint "-L") ; segmentation fault and, what value returns with a floating-point string? > (int "3.14") 3 > (bigint "3...

kosh

After those 2 fixes, newlisp would compile, but behaved erroneously like this: $ newlisp newLISP v.10.4.6 on Win32 IPv4/6 UTF-8, execute 'newlisp -h' for options. > (+ 10 20 30) ERR: missing parenthesis : "...(+ 10 20 30 " > (exit) ERR: missing parenthesis : "...(exit " please try this http://newli...

kosh

Hi Lutz. in nl-filesys.c:76 /* Set binary as default file mode for Windows. See also http://www.mingw.org/MinGWiki/index.php/binary */ unsigned int _CRT_fmode = _O_BINARY; This technique cannot available because of unimplemented in MinGW64. and URL has changed to http://oldwiki.mingw.org/index.php/b...

kosh

Hello Lutz. This patch is implementation 'kill' function for MinGW (Windows). and modified 'plainProcess' and 'p_destroy' functions. int kill(pid_t pid, int sig); 'kill' function terminates specified process by process ID. However, second argument (int sig) will be ignored. diff -wru newlisp-10.4.4-...

kosh

Thanks! It works well.

kosh

Hi Lutz. This file is a script which assign a string into str. but missing [/text] tag. ;; foo.lsp (setq str [text] AAA BBB CCC EOF When execute this script, becomes the error by lack of memory. $ newlisp foo.lsp ERR: not enough memory I want to work as follows: $ newlisp foo.lsp ERR: missing end of...

kosh

Hello Lutz. This patch is for correcting XML-RPC module (xmlrpc.cgi and xmlrpc-client.lsp). example/xmlrpc.cgi: --- newlisp-10.4.0/examples/xmlrpc.cgi.orig 2012-03-07 02:42:20.000000000 +0900 +++ newlisp-10.4.0/examples/xmlrpc.cgi 2012-03-26 14:40:35.000000000 +0900 @@ -128,7 +128,7 @@ (define (syst...

kosh

According to document, '(sys-info 9)' returns a following value: Operating system constant: linux=1, bsd=2, osx=3, solaris=4, cygwin=5, win32=6, os/2=7, tru64unix=9 But in newlisp.c is written like this: #ifdef CYGWIN int opsys = 8; #endif #ifdef TRU64 int opsys = 9; #endif #ifdef AIX int opsys = 10...

kosh

I think that I probably wrote that snippet 2 years ago.
But posted to Gist(github). I do not know the Pastebin's :-P

https://gist.github.com/262332

And that snippet is may not work, because of emulate lexical-closure incompletely ...

kosh

Hi Lutz. According to cygwin mailing list, IPv6 headers don't exist in Cygwin. http://cygwin.com/ml/cygwin/2011-03/msg00459.html On Mar 15 22:07, Olivier Lefevre wrote: > I am trying to compile mtr-0.80. configure completed without > errors but make puts: > > net.h:25:25: error: netinet/ip6.h: No su...

kosh

Thanks Lutz. fixed newlisp working fine :) I found similar problem in 'get-url' with custom header. --- nl-web.orig.c 2011-07-12 01:48:20.000000000 +0900 +++ nl-web.c 2011-07-12 01:40:20.000000000 +0900 @@ -427,7 +427,7 @@ /* send optional custom header entries */ if (customHeader != NULL) - sendf(s...

kosh

Hi. When url-encoded string to "get-url" is passed, the debug output is not correctly. It happens because passing the url-encoded string directly to the varPrintf function argument. newLISP v.10.3.0 on BSD IPv4/6 UTF-8, execute 'newlisp -h' for more info. > (get-url "http://localhost/%E6%97%A5%E6%9C...

newlispfanclub.alh.net

Search found 72 matches

Re: mingw patch

Re: mingw patch

mingw patch

crc32 bug on newlisp 32-bit

[patch] require dlerror before dlsym

Re: newLISP Stable Release v.10.5.4

Re: Alternative git repository

Alternative git repository

closesocket in MinGW

JSON checker

Re: json-parse with inner double quote

json-parse with inner double quote

Re: Built-in, unlimited precision, big integer arithmetik

Re: Built-in, unlimited precision, big integer arithmetik

Re: newlisp crashes

Substitute _CRT_fmode

kill function fow MinGW

Re: [text] tag and EOF

[text] tag and EOF

Patch for xmlrpc module

ostype from sys-info

Re: Lambda calculus and newLISP

IPv6 headers in Cygwin

Re: get-url debug option insecure

get-url debug option insecure