ECL (Embeddable Common-Lisp) 12.5.1
(git:6e1c455e5207b3592125c52a7ec39fa353bc8a9d)
> (lambda (p3)
(declare (optimize (speed 1) (safety 0) (debug 2) (space 0))
(type (eql 4432671931722342132) p3))
(if nil "W" p3))
#<bytecompiled-function 0000000003c2f1e0>
> (funcall (compile nil *) 4432671931722342132)
;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3, Debug=0
;;;
;;; End of Pass 1.
7052856
This is on Linux/AMD64.
--
Eric Marsden
------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and
threat landscape has changed and how IT managers can respond. Discussions
will include endpoint security, mobile security and the latest in malware
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
Ecls-list mailing list
Ecls-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ecls-list
