/[gcl]/gcl/cmpnew/gcl_cmploc.lsp
ViewVC logotype

Diff of /gcl/cmpnew/gcl_cmploc.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1.2.1 by camm, Sun Sep 14 02:30:33 2003 UTC revision 1.1.2.2 by camm, Mon Dec 1 16:50:55 2003 UTC
# Line 198  Line 198 
198    
199  (defun wt-integer-loc (loc &optional type  (defun wt-integer-loc (loc &optional type
200                             &aux (avma t)(first (and (consp loc) (car loc))))                             &aux (avma t)(first (and (consp loc) (car loc))))
201      (declare (ignore type))
202    (case first    (case first
203      (inline-fixnum      (inline-fixnum
204       (wt "stoi(")       (wt "stoi(")

Legend:
Removed from v.1.1.2.1  
changed lines
  Added in v.1.1.2.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26