My application involves a code generator. It creates a lisp function
that constructs a bunch
of function objects and returns a list of them. The function gets
written to a file and file
compiled. If there are a relatively small number (a few hundred), then
everything is fine. If there are a larger number (around 1000) then the
file compiler
dies in the code emitter with a type error.
I am using the sparc version of 19a (the 2003-12 snapshot). The problem
also occurs under
18e.
I have abstracted and simplified the situation to a file that contains a
single function that just creates
a list of function objects.
I have attached an example file that the compiler chokes on and a
transcript of a session.
Help would be appreciated.
Thanks.
-bill-
-- Attached file included as plaintext by Listar --
-- File: bb.lisp
(in-package "CL-USER")
(defun many-closure ()
(list
#'(lambda (i) (+ i 0))
#'(lambda (i) (+ i 1))
#'(lambda (i) (+ i 2))
#'(lambda (i) (+ i 3))
#'(lambda (i) (+ i 4))
#'(lambda (i) (+ i 5))
#'(lambda (i) (+ i 6))
#'(lambda (i) (+ i 7))
#'(lambda (i) (+ i 8))
#'(lambda (i) (+ i 9))
#'(lambda (i) (+ i 10))
#'(lambda (i) (+ i 11))
#'(lambda (i) (+ i 12))
#'(lambda (i) (+ i 13))
#'(lambda (i) (+ i 14))
#'(lambda (i) (+ i 15))
#'(lambda (i) (+ i 16))
#'(lambda (i) (+ i 17))
#'(lambda (i) (+ i 18))
#'(lambda (i) (+ i 19))
#'(lambda (i) (+ i 20))
#'(lambda (i) (+ i 21))
#'(lambda (i) (+ i 22))
#'(lambda (i) (+ i 23))
#'(lambda (i) (+ i 24))
#'(lambda (i) (+ i 25))
#'(lambda (i) (+ i 26))
#'(lambda (i) (+ i 27))
#'(lambda (i) (+ i 28))
#'(lambda (i) (+ i 29))
#'(lambda (i) (+ i 30))
#'(lambda (i) (+ i 31))
#'(lambda (i) (+ i 32))
#'(lambda (i) (+ i 33))
#'(lambda (i) (+ i 34))
#'(lambda (i) (+ i 35))
#'(lambda (i) (+ i 36))
#'(lambda (i) (+ i 37))
#'(lambda (i) (+ i 38))
#'(lambda (i) (+ i 39))
#'(lambda (i) (+ i 40))
#'(lambda (i) (+ i 41))
#'(lambda (i) (+ i 42))
#'(lambda (i) (+ i 43))
#'(lambda (i) (+ i 44))
#'(lambda (i) (+ i 45))
#'(lambda (i) (+ i 46))
#'(lambda (i) (+ i 47))
#'(lambda (i) (+ i 48))
#'(lambda (i) (+ i 49))
#'(lambda (i) (+ i 50))
#'(lambda (i) (+ i 51))
#'(lambda (i) (+ i 52))
#'(lambda (i) (+ i 53))
#'(lambda (i) (+ i 54))
#'(lambda (i) (+ i 55))
#'(lambda (i) (+ i 56))
#'(lambda (i) (+ i 57))
#'(lambda (i) (+ i 58))
#'(lambda (i) (+ i 59))
#'(lambda (i) (+ i 60))
#'(lambda (i) (+ i 61))
#'(lambda (i) (+ i 62))
#'(lambda (i) (+ i 63))
#'(lambda (i) (+ i 64))
#'(lambda (i) (+ i 65))
#'(lambda (i) (+ i 66))
#'(lambda (i) (+ i 67))
#'(lambda (i) (+ i 68))
#'(lambda (i) (+ i 69))
#'(lambda (i) (+ i 70))
#'(lambda (i) (+ i 71))
#'(lambda (i) (+ i 72))
#'(lambda (i) (+ i 73))
#'(lambda (i) (+ i 74))
#'(lambda (i) (+ i 75))
#'(lambda (i) (+ i 76))
#'(lambda (i) (+ i 77))
#'(lambda (i) (+ i 78))
#'(lambda (i) (+ i 79))
#'(lambda (i) (+ i 80))
#'(lambda (i) (+ i 81))
#'(lambda (i) (+ i 82))
#'(lambda (i) (+ i 83))
#'(lambda (i) (+ i 84))
#'(lambda (i) (+ i 85))
#'(lambda (i) (+ i 86))
#'(lambda (i) (+ i 87))
#'(lambda (i) (+ i 88))
#'(lambda (i) (+ i 89))
#'(lambda (i) (+ i 90))
#'(lambda (i) (+ i 91))
#'(lambda (i) (+ i 92))
#'(lambda (i) (+ i 93))
#'(lambda (i) (+ i 94))
#'(lambda (i) (+ i 95))
#'(lambda (i) (+ i 96))
#'(lambda (i) (+ i 97))
#'(lambda (i) (+ i 98))
#'(lambda (i) (+ i 99))
#'(lambda (i) (+ i 100))
#'(lambda (i) (+ i 101))
#'(lambda (i) (+ i 102))
#'(lambda (i) (+ i 103))
#'(lambda (i) (+ i 104))
#'(lambda (i) (+ i 105))
#'(lambda (i) (+ i 106))
#'(lambda (i) (+ i 107))
#'(lambda (i) (+ i 108))
#'(lambda (i) (+ i 109))
#'(lambda (i) (+ i 110))
#'(lambda (i) (+ i 111))
#'(lambda (i) (+ i 112))
#'(lambda (i) (+ i 113))
#'(lambda (i) (+ i 114))
#'(lambda (i) (+ i 115))
#'(lambda (i) (+ i 116))
#'(lambda (i) (+ i 117))
#'(lambda (i) (+ i 118))
#'(lambda (i) (+ i 119))
#'(lambda (i) (+ i 120))
#'(lambda (i) (+ i 121))
#'(lambda (i) (+ i 122))
#'(lambda (i) (+ i 123))
#'(lambda (i) (+ i 124))
#'(lambda (i) (+ i 125))
#'(lambda (i) (+ i 126))
#'(lambda (i) (+ i 127))
#'(lambda (i) (+ i 128))
#'(lambda (i) (+ i 129))
#'(lambda (i) (+ i 130))
#'(lambda (i) (+ i 131))
#'(lambda (i) (+ i 132))
#'(lambda (i) (+ i 133))
#'(lambda (i) (+ i 134))
#'(lambda (i) (+ i 135))
#'(lambda (i) (+ i 136))
#'(lambda (i) (+ i 137))
#'(lambda (i) (+ i 138))
#'(lambda (i) (+ i 139))
#'(lambda (i) (+ i 140))
#'(lambda (i) (+ i 141))
#'(lambda (i) (+ i 142))
#'(lambda (i) (+ i 143))
#'(lambda (i) (+ i 144))
#'(lambda (i) (+ i 145))
#'(lambda (i) (+ i 146))
#'(lambda (i) (+ i 147))
#'(lambda (i) (+ i 148))
#'(lambda (i) (+ i 149))
#'(lambda (i) (+ i 150))
#'(lambda (i) (+ i 151))
#'(lambda (i) (+ i 152))
#'(lambda (i) (+ i 153))
#'(lambda (i) (+ i 154))
#'(lambda (i) (+ i 155))
#'(lambda (i) (+ i 156))
#'(lambda (i) (+ i 157))
#'(lambda (i) (+ i 158))
#'(lambda (i) (+ i 159))
#'(lambda (i) (+ i 160))
#'(lambda (i) (+ i 161))
#'(lambda (i) (+ i 162))
#'(lambda (i) (+ i 163))
#'(lambda (i) (+ i 164))
#'(lambda (i) (+ i 165))
#'(lambda (i) (+ i 166))
#'(lambda (i) (+ i 167))
#'(lambda (i) (+ i 168))
#'(lambda (i) (+ i 169))
#'(lambda (i) (+ i 170))
#'(lambda (i) (+ i 171))
#'(lambda (i) (+ i 172))
#'(lambda (i) (+ i 173))
#'(lambda (i) (+ i 174))
#'(lambda (i) (+ i 175))
#'(lambda (i) (+ i 176))
#'(lambda (i) (+ i 177))
#'(lambda (i) (+ i 178))
#'(lambda (i) (+ i 179))
#'(lambda (i) (+ i 180))
#'(lambda (i) (+ i 181))
#'(lambda (i) (+ i 182))
#'(lambda (i) (+ i 183))
#'(lambda (i) (+ i 184))
#'(lambda (i) (+ i 185))
#'(lambda (i) (+ i 186))
#'(lambda (i) (+ i 187))
#'(lambda (i) (+ i 188))
#'(lambda (i) (+ i 189))
#'(lambda (i) (+ i 190))
#'(lambda (i) (+ i 191))
#'(lambda (i) (+ i 192))
#'(lambda (i) (+ i 193))
#'(lambda (i) (+ i 194))
#'(lambda (i) (+ i 195))
#'(lambda (i) (+ i 196))
#'(lambda (i) (+ i 197))
#'(lambda (i) (+ i 198))
#'(lambda (i) (+ i 199))
#'(lambda (i) (+ i 200))
#'(lambda (i) (+ i 201))
#'(lambda (i) (+ i 202))
#'(lambda (i) (+ i 203))
#'(lambda (i) (+ i 204))
#'(lambda (i) (+ i 205))
#'(lambda (i) (+ i 206))
#'(lambda (i) (+ i 207))
#'(lambda (i) (+ i 208))
#'(lambda (i) (+ i 209))
#'(lambda (i) (+ i 210))
#'(lambda (i) (+ i 211))
#'(lambda (i) (+ i 212))
#'(lambda (i) (+ i 213))
#'(lambda (i) (+ i 214))
#'(lambda (i) (+ i 215))
#'(lambda (i) (+ i 216))
#'(lambda (i) (+ i 217))
#'(lambda (i) (+ i 218))
#'(lambda (i) (+ i 219))
#'(lambda (i) (+ i 220))
#'(lambda (i) (+ i 221))
#'(lambda (i) (+ i 222))
#'(lambda (i) (+ i 223))
#'(lambda (i) (+ i 224))
#'(lambda (i) (+ i 225))
#'(lambda (i) (+ i 226))
#'(lambda (i) (+ i 227))
#'(lambda (i) (+ i 228))
#'(lambda (i) (+ i 229))
#'(lambda (i) (+ i 230))
#'(lambda (i) (+ i 231))
#'(lambda (i) (+ i 232))
#'(lambda (i) (+ i 233))
#'(lambda (i) (+ i 234))
#'(lambda (i) (+ i 235))
#'(lambda (i) (+ i 236))
#'(lambda (i) (+ i 237))
#'(lambda (i) (+ i 238))
#'(lambda (i) (+ i 239))
#'(lambda (i) (+ i 240))
#'(lambda (i) (+ i 241))
#'(lambda (i) (+ i 242))
#'(lambda (i) (+ i 243))
#'(lambda (i) (+ i 244))
#'(lambda (i) (+ i 245))
#'(lambda (i) (+ i 246))
#'(lambda (i) (+ i 247))
#'(lambda (i) (+ i 248))
#'(lambda (i) (+ i 249))
#'(lambda (i) (+ i 250))
#'(lambda (i) (+ i 251))
#'(lambda (i) (+ i 252))
#'(lambda (i) (+ i 253))
#'(lambda (i) (+ i 254))
#'(lambda (i) (+ i 255))
#'(lambda (i) (+ i 256))
#'(lambda (i) (+ i 257))
#'(lambda (i) (+ i 258))
#'(lambda (i) (+ i 259))
#'(lambda (i) (+ i 260))
#'(lambda (i) (+ i 261))
#'(lambda (i) (+ i 262))
#'(lambda (i) (+ i 263))
#'(lambda (i) (+ i 264))
#'(lambda (i) (+ i 265))
#'(lambda (i) (+ i 266))
#'(lambda (i) (+ i 267))
#'(lambda (i) (+ i 268))
#'(lambda (i) (+ i 269))
#'(lambda (i) (+ i 270))
#'(lambda (i) (+ i 271))
#'(lambda (i) (+ i 272))
#'(lambda (i) (+ i 273))
#'(lambda (i) (+ i 274))
#'(lambda (i) (+ i 275))
#'(lambda (i) (+ i 276))
#'(lambda (i) (+ i 277))
#'(lambda (i) (+ i 278))
#'(lambda (i) (+ i 279))
#'(lambda (i) (+ i 280))
#'(lambda (i) (+ i 281))
#'(lambda (i) (+ i 282))
#'(lambda (i) (+ i 283))
#'(lambda (i) (+ i 284))
#'(lambda (i) (+ i 285))
#'(lambda (i) (+ i 286))
#'(lambda (i) (+ i 287))
#'(lambda (i) (+ i 288))
#'(lambda (i) (+ i 289))
#'(lambda (i) (+ i 290))
#'(lambda (i) (+ i 291))
#'(lambda (i) (+ i 292))
#'(lambda (i) (+ i 293))
#'(lambda (i) (+ i 294))
#'(lambda (i) (+ i 295))
#'(lambda (i) (+ i 296))
#'(lambda (i) (+ i 297))
#'(lambda (i) (+ i 298))
#'(lambda (i) (+ i 299))
#'(lambda (i) (+ i 300))
#'(lambda (i) (+ i 301))
#'(lambda (i) (+ i 302))
#'(lambda (i) (+ i 303))
#'(lambda (i) (+ i 304))
#'(lambda (i) (+ i 305))
#'(lambda (i) (+ i 306))
#'(lambda (i) (+ i 307))
#'(lambda (i) (+ i 308))
#'(lambda (i) (+ i 309))
#'(lambda (i) (+ i 310))
#'(lambda (i) (+ i 311))
#'(lambda (i) (+ i 312))
#'(lambda (i) (+ i 313))
#'(lambda (i) (+ i 314))
#'(lambda (i) (+ i 315))
#'(lambda (i) (+ i 316))
#'(lambda (i) (+ i 317))
#'(lambda (i) (+ i 318))
#'(lambda (i) (+ i 319))
#'(lambda (i) (+ i 320))
#'(lambda (i) (+ i 321))
#'(lambda (i) (+ i 322))
#'(lambda (i) (+ i 323))
#'(lambda (i) (+ i 324))
#'(lambda (i) (+ i 325))
#'(lambda (i) (+ i 326))
#'(lambda (i) (+ i 327))
#'(lambda (i) (+ i 328))
#'(lambda (i) (+ i 329))
#'(lambda (i) (+ i 330))
#'(lambda (i) (+ i 331))
#'(lambda (i) (+ i 332))
#'(lambda (i) (+ i 333))
#'(lambda (i) (+ i 334))
#'(lambda (i) (+ i 335))
#'(lambda (i) (+ i 336))
#'(lambda (i) (+ i 337))
#'(lambda (i) (+ i 338))
#'(lambda (i) (+ i 339))
#'(lambda (i) (+ i 340))
#'(lambda (i) (+ i 341))
#'(lambda (i) (+ i 342))
#'(lambda (i) (+ i 343))
#'(lambda (i) (+ i 344))
#'(lambda (i) (+ i 345))
#'(lambda (i) (+ i 346))
#'(lambda (i) (+ i 347))
#'(lambda (i) (+ i 348))
#'(lambda (i) (+ i 349))
#'(lambda (i) (+ i 350))
#'(lambda (i) (+ i 351))
#'(lambda (i) (+ i 352))
#'(lambda (i) (+ i 353))
#'(lambda (i) (+ i 354))
#'(lambda (i) (+ i 355))
#'(lambda (i) (+ i 356))
#'(lambda (i) (+ i 357))
#'(lambda (i) (+ i 358))
#'(lambda (i) (+ i 359))
#'(lambda (i) (+ i 360))
#'(lambda (i) (+ i 361))
#'(lambda (i) (+ i 362))
#'(lambda (i) (+ i 363))
#'(lambda (i) (+ i 364))
#'(lambda (i) (+ i 365))
#'(lambda (i) (+ i 366))
#'(lambda (i) (+ i 367))
#'(lambda (i) (+ i 368))
#'(lambda (i) (+ i 369))
#'(lambda (i) (+ i 370))
#'(lambda (i) (+ i 371))
#'(lambda (i) (+ i 372))
#'(lambda (i) (+ i 373))
#'(lambda (i) (+ i 374))
#'(lambda (i) (+ i 375))
#'(lambda (i) (+ i 376))
#'(lambda (i) (+ i 377))
#'(lambda (i) (+ i 378))
#'(lambda (i) (+ i 379))
#'(lambda (i) (+ i 380))
#'(lambda (i) (+ i 381))
#'(lambda (i) (+ i 382))
#'(lambda (i) (+ i 383))
#'(lambda (i) (+ i 384))
#'(lambda (i) (+ i 385))
#'(lambda (i) (+ i 386))
#'(lambda (i) (+ i 387))
#'(lambda (i) (+ i 388))
#'(lambda (i) (+ i 389))
#'(lambda (i) (+ i 390))
#'(lambda (i) (+ i 391))
#'(lambda (i) (+ i 392))
#'(lambda (i) (+ i 393))
#'(lambda (i) (+ i 394))
#'(lambda (i) (+ i 395))
#'(lambda (i) (+ i 396))
#'(lambda (i) (+ i 397))
#'(lambda (i) (+ i 398))
#'(lambda (i) (+ i 399))
#'(lambda (i) (+ i 400))
#'(lambda (i) (+ i 401))
#'(lambda (i) (+ i 402))
#'(lambda (i) (+ i 403))
#'(lambda (i) (+ i 404))
#'(lambda (i) (+ i 405))
#'(lambda (i) (+ i 406))
#'(lambda (i) (+ i 407))
#'(lambda (i) (+ i 408))
#'(lambda (i) (+ i 409))
#'(lambda (i) (+ i 410))
#'(lambda (i) (+ i 411))
#'(lambda (i) (+ i 412))
#'(lambda (i) (+ i 413))
#'(lambda (i) (+ i 414))
#'(lambda (i) (+ i 415))
#'(lambda (i) (+ i 416))
#'(lambda (i) (+ i 417))
#'(lambda (i) (+ i 418))
#'(lambda (i) (+ i 419))
#'(lambda (i) (+ i 420))
#'(lambda (i) (+ i 421))
#'(lambda (i) (+ i 422))
#'(lambda (i) (+ i 423))
#'(lambda (i) (+ i 424))
#'(lambda (i) (+ i 425))
#'(lambda (i) (+ i 426))
#'(lambda (i) (+ i 427))
#'(lambda (i) (+ i 428))
#'(lambda (i) (+ i 429))
#'(lambda (i) (+ i 430))
#'(lambda (i) (+ i 431))
#'(lambda (i) (+ i 432))
#'(lambda (i) (+ i 433))
#'(lambda (i) (+ i 434))
#'(lambda (i) (+ i 435))
#'(lambda (i) (+ i 436))
#'(lambda (i) (+ i 437))
#'(lambda (i) (+ i 438))
#'(lambda (i) (+ i 439))
#'(lambda (i) (+ i 440))
#'(lambda (i) (+ i 441))
#'(lambda (i) (+ i 442))
#'(lambda (i) (+ i 443))
#'(lambda (i) (+ i 444))
#'(lambda (i) (+ i 445))
#'(lambda (i) (+ i 446))
#'(lambda (i) (+ i 447))
#'(lambda (i) (+ i 448))
#'(lambda (i) (+ i 449))
#'(lambda (i) (+ i 450))
#'(lambda (i) (+ i 451))
#'(lambda (i) (+ i 452))
#'(lambda (i) (+ i 453))
#'(lambda (i) (+ i 454))
#'(lambda (i) (+ i 455))
#'(lambda (i) (+ i 456))
#'(lambda (i) (+ i 457))
#'(lambda (i) (+ i 458))
#'(lambda (i) (+ i 459))
#'(lambda (i) (+ i 460))
#'(lambda (i) (+ i 461))
#'(lambda (i) (+ i 462))
#'(lambda (i) (+ i 463))
#'(lambda (i) (+ i 464))
#'(lambda (i) (+ i 465))
#'(lambda (i) (+ i 466))
#'(lambda (i) (+ i 467))
#'(lambda (i) (+ i 468))
#'(lambda (i) (+ i 469))
#'(lambda (i) (+ i 470))
#'(lambda (i) (+ i 471))
#'(lambda (i) (+ i 472))
#'(lambda (i) (+ i 473))
#'(lambda (i) (+ i 474))
#'(lambda (i) (+ i 475))
#'(lambda (i) (+ i 476))
#'(lambda (i) (+ i 477))
#'(lambda (i) (+ i 478))
#'(lambda (i) (+ i 479))
#'(lambda (i) (+ i 480))
#'(lambda (i) (+ i 481))
#'(lambda (i) (+ i 482))
#'(lambda (i) (+ i 483))
#'(lambda (i) (+ i 484))
#'(lambda (i) (+ i 485))
#'(lambda (i) (+ i 486))
#'(lambda (i) (+ i 487))
#'(lambda (i) (+ i 488))
#'(lambda (i) (+ i 489))
#'(lambda (i) (+ i 490))
#'(lambda (i) (+ i 491))
#'(lambda (i) (+ i 492))
#'(lambda (i) (+ i 493))
#'(lambda (i) (+ i 494))
#'(lambda (i) (+ i 495))
#'(lambda (i) (+ i 496))
#'(lambda (i) (+ i 497))
#'(lambda (i) (+ i 498))
#'(lambda (i) (+ i 499))
#'(lambda (i) (+ i 500))
#'(lambda (i) (+ i 501))
#'(lambda (i) (+ i 502))
#'(lambda (i) (+ i 503))
#'(lambda (i) (+ i 504))
#'(lambda (i) (+ i 505))
#'(lambda (i) (+ i 506))
#'(lambda (i) (+ i 507))
#'(lambda (i) (+ i 508))
#'(lambda (i) (+ i 509))
#'(lambda (i) (+ i 510))
#'(lambda (i) (+ i 511))
#'(lambda (i) (+ i 512))
#'(lambda (i) (+ i 513))
#'(lambda (i) (+ i 514))
#'(lambda (i) (+ i 515))
#'(lambda (i) (+ i 516))
#'(lambda (i) (+ i 517))
#'(lambda (i) (+ i 518))
#'(lambda (i) (+ i 519))
#'(lambda (i) (+ i 520))
#'(lambda (i) (+ i 521))
#'(lambda (i) (+ i 522))
#'(lambda (i) (+ i 523))
#'(lambda (i) (+ i 524))
#'(lambda (i) (+ i 525))
#'(lambda (i) (+ i 526))
#'(lambda (i) (+ i 527))
#'(lambda (i) (+ i 528))
#'(lambda (i) (+ i 529))
#'(lambda (i) (+ i 530))
#'(lambda (i) (+ i 531))
#'(lambda (i) (+ i 532))
#'(lambda (i) (+ i 533))
#'(lambda (i) (+ i 534))
#'(lambda (i) (+ i 535))
#'(lambda (i) (+ i 536))
#'(lambda (i) (+ i 537))
#'(lambda (i) (+ i 538))
#'(lambda (i) (+ i 539))
#'(lambda (i) (+ i 540))
#'(lambda (i) (+ i 541))
#'(lambda (i) (+ i 542))
#'(lambda (i) (+ i 543))
#'(lambda (i) (+ i 544))
#'(lambda (i) (+ i 545))
#'(lambda (i) (+ i 546))
#'(lambda (i) (+ i 547))
#'(lambda (i) (+ i 548))
#'(lambda (i) (+ i 549))
#'(lambda (i) (+ i 550))
#'(lambda (i) (+ i 551))
#'(lambda (i) (+ i 552))
#'(lambda (i) (+ i 553))
#'(lambda (i) (+ i 554))
#'(lambda (i) (+ i 555))
#'(lambda (i) (+ i 556))
#'(lambda (i) (+ i 557))
#'(lambda (i) (+ i 558))
#'(lambda (i) (+ i 559))
#'(lambda (i) (+ i 560))
#'(lambda (i) (+ i 561))
#'(lambda (i) (+ i 562))
#'(lambda (i) (+ i 563))
#'(lambda (i) (+ i 564))
#'(lambda (i) (+ i 565))
#'(lambda (i) (+ i 566))
#'(lambda (i) (+ i 567))
#'(lambda (i) (+ i 568))
#'(lambda (i) (+ i 569))
#'(lambda (i) (+ i 570))
#'(lambda (i) (+ i 571))
#'(lambda (i) (+ i 572))
#'(lambda (i) (+ i 573))
#'(lambda (i) (+ i 574))
#'(lambda (i) (+ i 575))
#'(lambda (i) (+ i 576))
#'(lambda (i) (+ i 577))
#'(lambda (i) (+ i 578))
#'(lambda (i) (+ i 579))
#'(lambda (i) (+ i 580))
#'(lambda (i) (+ i 581))
#'(lambda (i) (+ i 582))
#'(lambda (i) (+ i 583))
#'(lambda (i) (+ i 584))
#'(lambda (i) (+ i 585))
#'(lambda (i) (+ i 586))
#'(lambda (i) (+ i 587))
#'(lambda (i) (+ i 588))
#'(lambda (i) (+ i 589))
#'(lambda (i) (+ i 590))
#'(lambda (i) (+ i 591))
#'(lambda (i) (+ i 592))
#'(lambda (i) (+ i 593))
#'(lambda (i) (+ i 594))
#'(lambda (i) (+ i 595))
#'(lambda (i) (+ i 596))
#'(lambda (i) (+ i 597))
#'(lambda (i) (+ i 598))
#'(lambda (i) (+ i 599))
#'(lambda (i) (+ i 600))
#'(lambda (i) (+ i 601))
#'(lambda (i) (+ i 602))
#'(lambda (i) (+ i 603))
#'(lambda (i) (+ i 604))
#'(lambda (i) (+ i 605))
#'(lambda (i) (+ i 606))
#'(lambda (i) (+ i 607))
#'(lambda (i) (+ i 608))
#'(lambda (i) (+ i 609))
#'(lambda (i) (+ i 610))
#'(lambda (i) (+ i 611))
#'(lambda (i) (+ i 612))
#'(lambda (i) (+ i 613))
#'(lambda (i) (+ i 614))
#'(lambda (i) (+ i 615))
#'(lambda (i) (+ i 616))
#'(lambda (i) (+ i 617))
#'(lambda (i) (+ i 618))
#'(lambda (i) (+ i 619))
#'(lambda (i) (+ i 620))
#'(lambda (i) (+ i 621))
#'(lambda (i) (+ i 622))
#'(lambda (i) (+ i 623))
#'(lambda (i) (+ i 624))
#'(lambda (i) (+ i 625))
#'(lambda (i) (+ i 626))
#'(lambda (i) (+ i 627))
#'(lambda (i) (+ i 628))
#'(lambda (i) (+ i 629))
#'(lambda (i) (+ i 630))
#'(lambda (i) (+ i 631))
#'(lambda (i) (+ i 632))
#'(lambda (i) (+ i 633))
#'(lambda (i) (+ i 634))
#'(lambda (i) (+ i 635))
#'(lambda (i) (+ i 636))
#'(lambda (i) (+ i 637))
#'(lambda (i) (+ i 638))
#'(lambda (i) (+ i 639))
#'(lambda (i) (+ i 640))
#'(lambda (i) (+ i 641))
#'(lambda (i) (+ i 642))
#'(lambda (i) (+ i 643))
#'(lambda (i) (+ i 644))
#'(lambda (i) (+ i 645))
#'(lambda (i) (+ i 646))
#'(lambda (i) (+ i 647))
#'(lambda (i) (+ i 648))
#'(lambda (i) (+ i 649))
#'(lambda (i) (+ i 650))
#'(lambda (i) (+ i 651))
#'(lambda (i) (+ i 652))
#'(lambda (i) (+ i 653))
#'(lambda (i) (+ i 654))
#'(lambda (i) (+ i 655))
#'(lambda (i) (+ i 656))
#'(lambda (i) (+ i 657))
#'(lambda (i) (+ i 658))
#'(lambda (i) (+ i 659))
#'(lambda (i) (+ i 660))
#'(lambda (i) (+ i 661))
#'(lambda (i) (+ i 662))
#'(lambda (i) (+ i 663))
#'(lambda (i) (+ i 664))
#'(lambda (i) (+ i 665))
#'(lambda (i) (+ i 666))
#'(lambda (i) (+ i 667))
#'(lambda (i) (+ i 668))
#'(lambda (i) (+ i 669))
#'(lambda (i) (+ i 670))
#'(lambda (i) (+ i 671))
#'(lambda (i) (+ i 672))
#'(lambda (i) (+ i 673))
#'(lambda (i) (+ i 674))
#'(lambda (i) (+ i 675))
#'(lambda (i) (+ i 676))
#'(lambda (i) (+ i 677))
#'(lambda (i) (+ i 678))
#'(lambda (i) (+ i 679))
#'(lambda (i) (+ i 680))
#'(lambda (i) (+ i 681))
#'(lambda (i) (+ i 682))
#'(lambda (i) (+ i 683))
#'(lambda (i) (+ i 684))
#'(lambda (i) (+ i 685))
#'(lambda (i) (+ i 686))
#'(lambda (i) (+ i 687))
#'(lambda (i) (+ i 688))
#'(lambda (i) (+ i 689))
#'(lambda (i) (+ i 690))
#'(lambda (i) (+ i 691))
#'(lambda (i) (+ i 692))
#'(lambda (i) (+ i 693))
#'(lambda (i) (+ i 694))
#'(lambda (i) (+ i 695))
#'(lambda (i) (+ i 696))
#'(lambda (i) (+ i 697))
#'(lambda (i) (+ i 698))
#'(lambda (i) (+ i 699))
#'(lambda (i) (+ i 700))
#'(lambda (i) (+ i 701))
#'(lambda (i) (+ i 702))
#'(lambda (i) (+ i 703))
#'(lambda (i) (+ i 704))
#'(lambda (i) (+ i 705))
#'(lambda (i) (+ i 706))
#'(lambda (i) (+ i 707))
#'(lambda (i) (+ i 708))
#'(lambda (i) (+ i 709))
#'(lambda (i) (+ i 710))
#'(lambda (i) (+ i 711))
#'(lambda (i) (+ i 712))
#'(lambda (i) (+ i 713))
#'(lambda (i) (+ i 714))
#'(lambda (i) (+ i 715))
#'(lambda (i) (+ i 716))
#'(lambda (i) (+ i 717))
#'(lambda (i) (+ i 718))
#'(lambda (i) (+ i 719))
#'(lambda (i) (+ i 720))
#'(lambda (i) (+ i 721))
#'(lambda (i) (+ i 722))
#'(lambda (i) (+ i 723))
#'(lambda (i) (+ i 724))
#'(lambda (i) (+ i 725))
#'(lambda (i) (+ i 726))
#'(lambda (i) (+ i 727))
#'(lambda (i) (+ i 728))
#'(lambda (i) (+ i 729))
#'(lambda (i) (+ i 730))
#'(lambda (i) (+ i 731))
#'(lambda (i) (+ i 732))
#'(lambda (i) (+ i 733))
#'(lambda (i) (+ i 734))
#'(lambda (i) (+ i 735))
#'(lambda (i) (+ i 736))
#'(lambda (i) (+ i 737))
#'(lambda (i) (+ i 738))
#'(lambda (i) (+ i 739))
#'(lambda (i) (+ i 740))
#'(lambda (i) (+ i 741))
#'(lambda (i) (+ i 742))
#'(lambda (i) (+ i 743))
#'(lambda (i) (+ i 744))
#'(lambda (i) (+ i 745))
#'(lambda (i) (+ i 746))
#'(lambda (i) (+ i 747))
#'(lambda (i) (+ i 748))
#'(lambda (i) (+ i 749))
#'(lambda (i) (+ i 750))
#'(lambda (i) (+ i 751))
#'(lambda (i) (+ i 752))
#'(lambda (i) (+ i 753))
#'(lambda (i) (+ i 754))
#'(lambda (i) (+ i 755))
#'(lambda (i) (+ i 756))
#'(lambda (i) (+ i 757))
#'(lambda (i) (+ i 758))
#'(lambda (i) (+ i 759))
#'(lambda (i) (+ i 760))
#'(lambda (i) (+ i 761))
#'(lambda (i) (+ i 762))
#'(lambda (i) (+ i 763))
#'(lambda (i) (+ i 764))
#'(lambda (i) (+ i 765))
#'(lambda (i) (+ i 766))
#'(lambda (i) (+ i 767))
#'(lambda (i) (+ i 768))
#'(lambda (i) (+ i 769))
#'(lambda (i) (+ i 770))
#'(lambda (i) (+ i 771))
#'(lambda (i) (+ i 772))
#'(lambda (i) (+ i 773))
#'(lambda (i) (+ i 774))
#'(lambda (i) (+ i 775))
#'(lambda (i) (+ i 776))
#'(lambda (i) (+ i 777))
#'(lambda (i) (+ i 778))
#'(lambda (i) (+ i 779))
#'(lambda (i) (+ i 780))
#'(lambda (i) (+ i 781))
#'(lambda (i) (+ i 782))
#'(lambda (i) (+ i 783))
#'(lambda (i) (+ i 784))
#'(lambda (i) (+ i 785))
#'(lambda (i) (+ i 786))
#'(lambda (i) (+ i 787))
#'(lambda (i) (+ i 788))
#'(lambda (i) (+ i 789))
#'(lambda (i) (+ i 790))
#'(lambda (i) (+ i 791))
#'(lambda (i) (+ i 792))
#'(lambda (i) (+ i 793))
#'(lambda (i) (+ i 794))
#'(lambda (i) (+ i 795))
#'(lambda (i) (+ i 796))
#'(lambda (i) (+ i 797))
#'(lambda (i) (+ i 798))
#'(lambda (i) (+ i 799))
#'(lambda (i) (+ i 800))
#'(lambda (i) (+ i 801))
#'(lambda (i) (+ i 802))
#'(lambda (i) (+ i 803))
#'(lambda (i) (+ i 804))
#'(lambda (i) (+ i 805))
#'(lambda (i) (+ i 806))
#'(lambda (i) (+ i 807))
#'(lambda (i) (+ i 808))
#'(lambda (i) (+ i 809))
#'(lambda (i) (+ i 810))
#'(lambda (i) (+ i 811))
#'(lambda (i) (+ i 812))
#'(lambda (i) (+ i 813))
#'(lambda (i) (+ i 814))
#'(lambda (i) (+ i 815))
#'(lambda (i) (+ i 816))
#'(lambda (i) (+ i 817))
#'(lambda (i) (+ i 818))
#'(lambda (i) (+ i 819))
#'(lambda (i) (+ i 820))
#'(lambda (i) (+ i 821))
#'(lambda (i) (+ i 822))
#'(lambda (i) (+ i 823))
#'(lambda (i) (+ i 824))
#'(lambda (i) (+ i 825))
#'(lambda (i) (+ i 826))
#'(lambda (i) (+ i 827))
#'(lambda (i) (+ i 828))
#'(lambda (i) (+ i 829))
#'(lambda (i) (+ i 830))
#'(lambda (i) (+ i 831))
#'(lambda (i) (+ i 832))
#'(lambda (i) (+ i 833))
#'(lambda (i) (+ i 834))
#'(lambda (i) (+ i 835))
#'(lambda (i) (+ i 836))
#'(lambda (i) (+ i 837))
#'(lambda (i) (+ i 838))
#'(lambda (i) (+ i 839))
#'(lambda (i) (+ i 840))
#'(lambda (i) (+ i 841))
#'(lambda (i) (+ i 842))
#'(lambda (i) (+ i 843))
#'(lambda (i) (+ i 844))
#'(lambda (i) (+ i 845))
#'(lambda (i) (+ i 846))
#'(lambda (i) (+ i 847))
#'(lambda (i) (+ i 848))
#'(lambda (i) (+ i 849))
#'(lambda (i) (+ i 850))
#'(lambda (i) (+ i 851))
#'(lambda (i) (+ i 852))
#'(lambda (i) (+ i 853))
#'(lambda (i) (+ i 854))
#'(lambda (i) (+ i 855))
#'(lambda (i) (+ i 856))
#'(lambda (i) (+ i 857))
#'(lambda (i) (+ i 858))
#'(lambda (i) (+ i 859))
#'(lambda (i) (+ i 860))
#'(lambda (i) (+ i 861))
#'(lambda (i) (+ i 862))
#'(lambda (i) (+ i 863))
#'(lambda (i) (+ i 864))
#'(lambda (i) (+ i 865))
#'(lambda (i) (+ i 866))
#'(lambda (i) (+ i 867))
#'(lambda (i) (+ i 868))
#'(lambda (i) (+ i 869))
#'(lambda (i) (+ i 870))
#'(lambda (i) (+ i 871))
#'(lambda (i) (+ i 872))
#'(lambda (i) (+ i 873))
#'(lambda (i) (+ i 874))
#'(lambda (i) (+ i 875))
#'(lambda (i) (+ i 876))
#'(lambda (i) (+ i 877))
#'(lambda (i) (+ i 878))
#'(lambda (i) (+ i 879))
#'(lambda (i) (+ i 880))
#'(lambda (i) (+ i 881))
#'(lambda (i) (+ i 882))
#'(lambda (i) (+ i 883))
#'(lambda (i) (+ i 884))
#'(lambda (i) (+ i 885))
#'(lambda (i) (+ i 886))
#'(lambda (i) (+ i 887))
#'(lambda (i) (+ i 888))
#'(lambda (i) (+ i 889))
#'(lambda (i) (+ i 890))
#'(lambda (i) (+ i 891))
#'(lambda (i) (+ i 892))
#'(lambda (i) (+ i 893))
#'(lambda (i) (+ i 894))
#'(lambda (i) (+ i 895))
#'(lambda (i) (+ i 896))
#'(lambda (i) (+ i 897))
#'(lambda (i) (+ i 898))
#'(lambda (i) (+ i 899))
#'(lambda (i) (+ i 900))
#'(lambda (i) (+ i 901))
#'(lambda (i) (+ i 902))
#'(lambda (i) (+ i 903))
#'(lambda (i) (+ i 904))
#'(lambda (i) (+ i 905))
#'(lambda (i) (+ i 906))
#'(lambda (i) (+ i 907))
#'(lambda (i) (+ i 908))
#'(lambda (i) (+ i 909))
#'(lambda (i) (+ i 910))
#'(lambda (i) (+ i 911))
#'(lambda (i) (+ i 912))
#'(lambda (i) (+ i 913))
#'(lambda (i) (+ i 914))
#'(lambda (i) (+ i 915))
#'(lambda (i) (+ i 916))
#'(lambda (i) (+ i 917))
#'(lambda (i) (+ i 918))
#'(lambda (i) (+ i 919))
#'(lambda (i) (+ i 920))
#'(lambda (i) (+ i 921))
#'(lambda (i) (+ i 922))
#'(lambda (i) (+ i 923))
#'(lambda (i) (+ i 924))
#'(lambda (i) (+ i 925))
#'(lambda (i) (+ i 926))
#'(lambda (i) (+ i 927))
#'(lambda (i) (+ i 928))
#'(lambda (i) (+ i 929))
#'(lambda (i) (+ i 930))
#'(lambda (i) (+ i 931))
#'(lambda (i) (+ i 932))
#'(lambda (i) (+ i 933))
#'(lambda (i) (+ i 934))
#'(lambda (i) (+ i 935))
#'(lambda (i) (+ i 936))
#'(lambda (i) (+ i 937))
#'(lambda (i) (+ i 938))
#'(lambda (i) (+ i 939))
#'(lambda (i) (+ i 940))
#'(lambda (i) (+ i 941))
#'(lambda (i) (+ i 942))
#'(lambda (i) (+ i 943))
#'(lambda (i) (+ i 944))
#'(lambda (i) (+ i 945))
#'(lambda (i) (+ i 946))
#'(lambda (i) (+ i 947))
#'(lambda (i) (+ i 948))
#'(lambda (i) (+ i 949))
#'(lambda (i) (+ i 950))
#'(lambda (i) (+ i 951))
#'(lambda (i) (+ i 952))
#'(lambda (i) (+ i 953))
#'(lambda (i) (+ i 954))
#'(lambda (i) (+ i 955))
#'(lambda (i) (+ i 956))
#'(lambda (i) (+ i 957))
#'(lambda (i) (+ i 958))
#'(lambda (i) (+ i 959))
#'(lambda (i) (+ i 960))
#'(lambda (i) (+ i 961))
#'(lambda (i) (+ i 962))
#'(lambda (i) (+ i 963))
#'(lambda (i) (+ i 964))
#'(lambda (i) (+ i 965))
#'(lambda (i) (+ i 966))
#'(lambda (i) (+ i 967))
#'(lambda (i) (+ i 968))
#'(lambda (i) (+ i 969))
#'(lambda (i) (+ i 970))
#'(lambda (i) (+ i 971))
#'(lambda (i) (+ i 972))
#'(lambda (i) (+ i 973))
#'(lambda (i) (+ i 974))
#'(lambda (i) (+ i 975))
#'(lambda (i) (+ i 976))
#'(lambda (i) (+ i 977))
#'(lambda (i) (+ i 978))
#'(lambda (i) (+ i 979))
#'(lambda (i) (+ i 980))
#'(lambda (i) (+ i 981))
#'(lambda (i) (+ i 982))
#'(lambda (i) (+ i 983))
#'(lambda (i) (+ i 984))
#'(lambda (i) (+ i 985))
#'(lambda (i) (+ i 986))
#'(lambda (i) (+ i 987))
#'(lambda (i) (+ i 988))
#'(lambda (i) (+ i 989))
#'(lambda (i) (+ i 990))
#'(lambda (i) (+ i 991))
#'(lambda (i) (+ i 992))
#'(lambda (i) (+ i 993))
#'(lambda (i) (+ i 994))
#'(lambda (i) (+ i 995))
#'(lambda (i) (+ i 996))
#'(lambda (i) (+ i 997))
#'(lambda (i) (+ i 998))
#'(lambda (i) (+ i 999))
))
-- Attached file included as plaintext by Listar --
-- File: cmucl-19a-many-closure-bug.text
CMU Common Lisp CVS snapshot 2003-12, running on otwb-dev
With core:
/net/dlsun3004/private/projects/org/develop/CMUCL/ss2003_12/lib/cmucl/lib/lisp.core
Dumped on: Sun, 2003-11-30 06:00:03-08:00 on moria.users.earthlink.net
See <http://www.cons.org/cmucl/> for support information.
Loaded subsystems:
Python 1.1, target UltraSparc/Solaris 7
CLOS based on Gerd's PCL 2003/06/18 09:23:09
* (compile-file "/tmp/bb.lisp")
; Python version 1.1, VM version UltraSparc/Solaris 7 on 15 APR 04 10:06:00 am.
; Compiling: /tmp/bb.lisp 15 APR 04 10:03:52 am
; Converted MANY-CLOSURE.
; Compiling DEFUN MANY-CLOSURE: ; [GC threshold exceeded with 12,025,872 bytes in use.
Commencing GC.]
; [GC completed with 5,844,712 bytes retained and 6,181,160 bytes freed.]
; [GC will next occur when at least 17,844,712 bytes are in use.]
; [GC threshold exceeded with 17,856,272 bytes in use. Commencing GC.]
; [GC completed with 6,956,552 bytes retained and 10,899,720 bytes freed.]
; [GC will next occur when at least 18,956,552 bytes are in use.]
; [GC threshold exceeded with 18,985,224 bytes in use. Commencing GC.]
; [GC completed with 13,022,656 bytes retained and 5,962,568 bytes freed.]
; [GC will next occur when at least 25,022,656 bytes are in use.]
; [GC threshold exceeded with 25,044,056 bytes in use. Commencing GC.]
; [GC completed with 24,945,040 bytes retained and 99,016 bytes freed.]
; [GC will next occur when at least 36,945,040 bytes are in use.]
; [GC threshold exceeded with 36,968,400 bytes in use. Commencing GC.]
; [GC completed with 36,965,824 bytes retained and 2,576 bytes freed.]
; [GC will next occur when at least 48,965,824 bytes are in use.]
; [GC threshold exceeded with 48,994,040 bytes in use. Commencing GC.]
; [GC completed with 48,991,384 bytes retained and 2,656 bytes freed.]
; [GC will next occur when at least 60,991,384 bytes are in use.]
Type-error in KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER:
8000 is not of type (OR C:TN (SIGNED-BYTE 13) NULL C:FIXUP)
[Condition of type TYPE-ERROR]
Restarts:
0: [ABORT] Return to Top-Level.
Debug (type H for help)
(SPARC::ADD-INST-EMITTER 4
#<NEW-ASSEM:SEGMENT #x417F446D NAME= "Regular">
#<C::VOP #x41BEFA65
INFO= LIST
ARGS= #<C:TN-REF #x41EEBD0D
TN= #<TN t1[A0]>
WRITE-P= NIL
VOP= LIST>
RESULTS= #<C:TN-REF #x41EEBD35
TN= #<TN t2[A0]>
WRITE-P= T
VOP= LIST>
CODEGEN-INFO= (1000 NIL)>
#<TN t3[CNAME]>
...)[:EXTERNAL]
Source: Error finding source:
Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM: Source file no longer exists:
target:compiler/sparc/insts.lisp.
0]