RE: [Gcl-devel] CLCS - internal-program-error class not defined.

[Mike Thomas]

PS.  I wrote

| I know nothing about the conditions system and I'm pressed for time so I
| thought I'd leave this with you.


However, based on the definition of internal-simple-program-error, the
following seems to restore order:

(define-condition internal-program-error
   (internal-simple-error program-error) () )

.....
Compiling C:/lang/source/gcl/starsim-jpm/f20/address-objects.lisp.
Error in LET [or a callee]: *MAXIMUM-NUMBER-OF-DIMENSIONS* is not a
variable.

Fast links are on: do (use-fast-links nil) for debugging
Broken at LET.  Type :H for Help.
 1 (Continue) (SYSTEM:ERROR-SET
                  '(EVAL '(IF (< *MAXIMUM-NUMBER-OF-DIMENSIONS* 0)