Skip to content

GitLab

  • Projects
  • Groups
  • Snippets
  • Help
    • Loading...
  • Help
    • Help
    • Support
    • Community forum
    • Submit feedback
    • Contribute to GitLab
  • Sign in / Register
cmucl
cmucl
  • Project overview
    • Project overview
    • Details
    • Activity
    • Releases
  • Repository
    • Repository
    • Files
    • Commits
    • Branches
    • Tags
    • Contributors
    • Graph
    • Compare
  • Issues 26
    • Issues 26
    • List
    • Boards
    • Labels
    • Service Desk
    • Milestones
  • Merge Requests 1
    • Merge Requests 1
  • CI / CD
    • CI / CD
    • Pipelines
    • Jobs
    • Schedules
  • Operations
    • Operations
    • Incidents
    • Environments
  • Analytics
    • Analytics
    • CI / CD
    • Repository
    • Value Stream
  • Wiki
    • Wiki
  • Snippets
    • Snippets
  • Members
    • Members
  • Collapse sidebar
  • Activity
  • Graph
  • Create a new issue
  • Jobs
  • Commits
  • Issue Boards
  • cmucl
  • cmuclcmucl
  • Issues
  • #4

Closed
Open
Opened May 16, 2015 by Mark Cox@mcox

ELT on lists does not signal an error when given an invalid index.

The accessor ELT does not signal an error when given an invalid index.

(let ((f (compile nil '(lambda (list)
                         (declare (type list list)
                                  (optimize (speed 1) (safety 1) (compilation-speed 1) (space 1) (debug 1)))
                           (elt list 3)))))
     (funcall f (list 0 1 2)))
=> nil

An error is signalled when performing one of the following:

  1. SAFETY is changed to 3.
  2. The type LIST is changed to SEQUENCE.

Thanks Mark

Assignee
Assign to
None
Milestone
None
Assign milestone
Time tracking
None
Due date
None
Reference: cmucl/cmucl#4