Skip to content

Speed up from-list #86

@jmbr

Description

@jmbr

It looks like it might be possible to speed up the from-list function:

MAGICL> (let* ((n 50000)
                     (xs (loop :for i :below n :collect (coerce i 'double-float))))
                (sb-ext:gc :full t)
                (time (magicl:from-list xs (list n) :type 'double-float))
                (sb-ext:gc :full t)
                (time (magicl:from-array (coerce xs '(array double-float (*))) (list n)))
                (values))
Evaluation took:
  1.544 seconds of real time
  1.544000 seconds of total run time (1.544000 user, 0.000000 system)
  100.00% CPU
  4,188,179,784 processor cycles
  3,578,512 bytes consed
  
Evaluation took:
  0.000 seconds of real time
  0.004000 seconds of total run time (0.004000 user, 0.000000 system)
  100.00% CPU
  1,477,558 processor cycles
  400,016 bytes consed

Metadata

Metadata

Assignees

Labels

Type

No type

Projects

No projects

Milestone

No milestone

Relationships

None yet

Development

No branches or pull requests

Issue actions