Number: 1882

Date: 16-Aug-84 15':58':28

Submitter: Sannella.PA

Source: Shrager.pa

Subject: Compiler should warn about >2 args to SETQ

Assigned To: Masinter

Attn: 

Status: Fixed

In/By: Intermezzo

Problem Type: Design - UI

Impact: Moderate

Difficulty: 

Frequency: 

Priority: Perhaps

System: Language Support

Subsystem: Compiler, Code Format

Machine: 

Disk: 

Lisp Version: 

Source Files: 

Microcode Version: 

Memory Size: 

File Server: 

Server Software Version: 

Disposition: compiler warns about extraneous arguments to SETQ, CAR/CDR chains, EQ, RETURN, and a few others that it used to just "drop on the floor".'
["Masinter.pa" "18-Sep-84 17':11':04" Assigned% To': Attn': Status':(Open->Fixed) In/By': Disposition':]

Description: '
Date': 15 Aug 84 23':02 PDT'
From': Shrager.pa'
Subject': Lisp': Compiler should warn about setq extra args'
To': LispSupport.pa'
'
Lisp System Date': 15-Aug-84 20':06':06'
Machine': Dorado (Shrager)'
Microcode version': 24,4'
Memory size': 10000'
Frequency': Always'
Impact': Serious'
'
This program runs interpreted but not compiled...no warnings are given at compile time and masterscope doesn''t complain about.  The reason it doesn''t run compiled is that the setq compiles as a bind and loses all the rest of the args.'
'
(defineq (foo () (setq a 5 (print ''foo]'
'


Workaround: 

Test Case: 

Edit-By: Masinter.pa

Edit-Date: 18-Sep-84 17':11':05