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] 


Reply via email to