headers
Wickern, Hans- Peter | 1 Jul 2003 09:48
Picon

Re: splash-screen or progressbar and INI-files

Thanks Dave,

>In a delivered application, you can use your own splash screen via the
>:STARTUP-BITMAP-FILE argument to DELIVER. This is displayed early,
>before Lisp has started, so I think it is what you need.

Is the BMP stored inside the EXE on Delivery? (I think so, like the
Lispworks-splash)
(Sorry to ask but my package has not arrived yet)

>Just out of interest how large is the image? Can some code or data be
>loaded after startup?

Couldn't test it because of the Personal Edition. Also I am just starting
on the project and try to check everything out what I will need.
I want to store large data-tables in hash-tables inside the image.
And I want a self-contained EXE without any/less external dependies.

Hans-Peter
Permalink | Reply | 501 comments |
headers
Nick Levine | 1 Jul 2003 09:58
Favicon
Gravatar

Re: splash-screen or progressbar and INI-files

   >In a delivered application, you can use your own splash screen via
   >the :STARTUP-BITMAP-FILE argument to DELIVER. This is displayed
   >early, before Lisp has started, so I think it is what you need.

   Is the BMP stored inside the EXE on Delivery? (I think so, like the
   Lispworks-splash)

Yes, it is.

   >Just out of interest how large is the image? Can some code or data
   >be loaded after startup?

   Couldn't test it because of the Personal Edition. Also I am just
   starting on the project and try to check everything out what I will
   need.  I want to store large data-tables in hash-tables inside the
   image.  

You can definitely do this. I have an application (www.fast-index.com)
which is saved as an executable containing (if I remember right)
around 40MB of data, in hash-tables and other structures.

	   And I want a self-contained EXE without any/less external
   dependies.

Should not be a problem.

- nick
Permalink | Reply | 501 comments |
headers
Young, David | 1 Jul 2003 19:34

Adding commands to LispWorks toplevel

Greetings. Is it possible to add user-defined commands to the LispWorks
toplevel? For example, I might want to add a :PA command that changes
packages. This capability is available in Allegro, and since LispWorks is
such a stellar product I'm sure I've overlooked something. Thanks...

David E. Young
(format nil "~A <at> ~A.~A" 'dyoung 'bloodhoundinc 'com)
http://www.bloodhoundinc.com
http://lisa.sourceforge.net

"For wisdom is more precious than rubies,
and nothing you desire can compare with her."
  -- Proverbs 8:11

"But all the world understands my language."
  -- Franz Joseph Haydn (1732-1809)
Permalink | Reply | 3 comments |
headers
Larry White | 1 Jul 2003 20:32
Picon
Favicon

stack overflow with regular expressions

Hi.

When i try to use the pregexp regular expression library with Lispworks 
Personal Edition 4.2.0 for anything other than trivial matches, I get an 
error, either "Stack overflow (stack size 16000)" or "recursive stack 
overflow".   The same code works fine in CLISP.

Can someone tell me:
(1) whether or not i'm doing something wrong
(2) if this is a limitation of Lispworks
(3) if its a limitation of the personal edition
(4) if there is anything I can do about it?

Thanks.
larry

_________________________________________________________________
Add photos to your messages with MSN 8. Get 2 months FREE*.  
http://join.msn.com/?page=features/featuredemail
Permalink | Reply | 3 comments |
headers
Edi Weitz | 1 Jul 2003 20:36
Picon
Favicon

Re: Adding commands to LispWorks toplevel

"Young, David" <dyoung <at> bloodhoundinc.com> writes:

> Greetings. Is it possible to add user-defined commands to the LispWorks
> toplevel? For example, I might want to add a :PA command that changes
> packages. This capability is available in Allegro, and since LispWorks is
> such a stellar product I'm sure I've overlooked something. Thanks...

IIRC Tim Bradshaw had example code which did exactly this but
unfortunately his very informative and interesting Lisp stuff which
could once be found at

  <http://www.tfeb.org/lisp/>

seems to be gone now. (Damn! Two or three weeks ago I almost grabbed
the whole stuff with wget to have an offline copy but for some reason
didn't do it.)

Maybe he's reading this and can provide an alternative location.

Er, wait... Google might have cached it........... Yep!

  <http://216.239.57.100/search?q=cache:4Bkr63s0djYJ:www.tfeb.org/lisp/implementation-hax.html+site:tfeb.org+lisp&hl=en&ie=UTF-8&client=googlet>

Or, if that doesn't work, search Google for

  "site:tfeb.org implementation hacks"

However, Google doesn't seem to cache the Lisp files... :(

HTH,
(Continue reading)

Permalink | Reply | 1 comment |
headers
Thibault Langlois | 1 Jul 2003 20:49
Picon

Re: stack overflow with regular expressions

On Tue, 2003-07-01 at 19:32, Larry White wrote:
> Hi.
> 
> When i try to use the pregexp regular expression library with Lispworks 
> Personal Edition 4.2.0 for anything other than trivial matches, I get an 
> error, either "Stack overflow (stack size 16000)" or "recursive stack 
> overflow".   The same code works fine in CLISP.
> 
> Can someone tell me:
> (1) whether or not i'm doing something wrong
> (2) if this is a limitation of Lispworks
> (3) if its a limitation of the personal edition
> (4) if there is anything I can do about it?
> 

I think I had the same problem some time ago. 
Did you compile pregexp ?

--

-- 
Thibault Langlois <tl <at> di.fc.ul.pt>
FCUL/DI
Permalink | Reply | 0 comments |
headers
Clementson, Bill | 1 Jul 2003 20:14

RE: Adding commands to LispWorks toplevel

Tim Bradshaw used to have some instructions/code for doing this at:
http://www.tfeb.org/lisp/implementation-hax#LW-COLON-COMMANDS

Unfortunately, the site seems to be gone now. :-(

--
Bill Clementson

> -----Original Message-----
> From: Young, David [mailto:dyoung <at> bloodhoundinc.com] 
> Sent: Tuesday, July 01, 2003 11:35 AM
> To: 'lisp-hug <at> xanalys.com'
> Subject: Adding commands to LispWorks toplevel
> 
> 
> Greetings. Is it possible to add user-defined commands to the 
> LispWorks toplevel? For example, I might want to add a :PA 
> command that changes packages. This capability is available 
> in Allegro, and since LispWorks is such a stellar product I'm 
> sure I've overlooked something. Thanks...
> 
> David E. Young
> (format nil "~A <at> ~A.~A" 'dyoung 'bloodhoundinc 'com) 
http://www.bloodhoundinc.com http://lisa.sourceforge.net

"For wisdom is more precious than rubies,
and nothing you desire can compare with her."
  -- Proverbs 8:11

"But all the world understands my language."
(Continue reading)

Permalink | Reply | 0 comments |
headers
Edi Weitz | 1 Jul 2003 21:05
Picon
Favicon

Re: stack overflow with regular expressions

"Larry White" <ljw1001 <at> hotmail.com> writes:

> When i try to use the pregexp regular expression library with
> Lispworks Personal Edition 4.2.0 for anything other than trivial
> matches, I get an error, either "Stack overflow (stack size 16000)"
> or "recursive stack overflow".  The same code works fine in CLISP.
> 
> Can someone tell me:
> (1) whether or not i'm doing something wrong
> (2) if this is a limitation of Lispworks
> (3) if its a limitation of the personal edition
> (4) if there is anything I can do about it?

You might be able to extend the stack, see

  <http://www1.xanalys.com/support/lisp/kbase.nsf/51fe6e1cdfe748a180256639005a2ba9/f35acd8100dfd9ba8525670b0074a8d6?OpenDocument>

for an explanation. Don't know if this works with the Personal
Edition, though.

However, as you might know, pregexp is a CL program that was
auto-generated from a Scheme program and thus relies on tail-call
optimization (or whatever they call it nowadays). Maybe you'll have
more luck with "real" Common Lisp regex libraries like the one from
Michael Parker or (shameless self-plug) CL-PPCRE. See

  <http://www.cliki.net/Regular%20Expression>

Good luck,
Edi.
(Continue reading)

Permalink | Reply | 1 comment |
headers
David Fox | 1 Jul 2003 21:36
Favicon

Re: stack overflow with regular expressions


   > When i try to use the pregexp regular expression library with
   > Lispworks Personal Edition 4.2.0 for anything other than trivial
   > matches, I get an error, either "Stack overflow (stack size 16000)"
   > or "recursive stack overflow".  The same code works fine in CLISP.
   > 
   > Can someone tell me:
   > (1) whether or not i'm doing something wrong
   > (2) if this is a limitation of Lispworks
   > (3) if its a limitation of the personal edition
   > (4) if there is anything I can do about it?

   You might be able to extend the stack, see

     <http://www1.xanalys.com/support/lisp/kbase.nsf/51fe6e1cdfe748a180256639005a2ba9/f35acd8100dfd9ba8525670b0074a8d6?OpenDocument>

   for an explanation. Don't know if this works with the Personal
   Edition, though.

Stack extension is the same in the Personal Edition as the
Professional/Enterprise Editions.

Dave Fox
Xanalys
Compass House
Vision Park
Chivers Way
Histon
Cambridge
CB4 9AD
(Continue reading)

Permalink | Reply | 0 comments |
headers
David Fox | 1 Jul 2003 21:40
Favicon

Re: Adding commands to LispWorks toplevel


   Greetings. Is it possible to add user-defined commands to the LispWorks
   toplevel? For example, I might want to add a :PA command that changes
   packages. This capability is available in Allegro, and since LispWorks is
   such a stellar product I'm sure I've overlooked something. Thanks...

We ought to provide an interface to this, but don't currently, sorry.

For the moment, you can use the same approach as ILISP:

--------------------- lispworks.lisp ---------------------------------
(unless (fboundp 'sys::define-top-loop-handler)

  ;; Duplicated from ccl/top-loop.lisp
  (defmacro sys::get-top-loop-handler (command-name)
    `(get ,command-name 'sys::top-loop-handler))

  (defmacro sys::define-top-loop-handler (name &body body)
    (lw:with-unique-names (top-loop-handler)
      `(let ((,top-loop-handler #'(lambda (sys::line) , <at> body)))
        (mapc #'(lambda (name)
                  (setf (sys::get-top-loop-handler name) ,top-loop-handler))
         (if (consp ',name) ',name  '(,name))))))

  )

(sys::define-top-loop-handler :ilisp-send
  (values (multiple-value-list (eval (cadr sys::line))) nil))
----------------------------------------------------------------------
(Continue reading)

Permalink | Reply | 0 comments |

Gmane