mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-16 14:21:48 -08:00
Code Issues Projects Releases Packages Wiki Activity

Change message of ext:storage-exhausted

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2009-05-19 23:54:13 +02:00
parent cd04aa7d21
commit d47f073596
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/clos/conditions.lsp
View file

@ -557,7 +557,8 @@ or return to an outer frame, undoing all the function calls so far."
(define-condition ext:storage-exhausted (storage-condition) ()
(:REPORT
(lambda (condition stream)
(format stream "Memory limit reached. Please jump to an outer point or quit program."))))
(format stream "Memory limit reached. Please jump to an outer pointer, quit program and enlarge the
memory limits before executing the program again."))))
(define-condition type-error (error)
((datum :INITARG :DATUM :READER type-error-datum)