[commit] logit message demotion

[commit] logit message demotion

[Dave Brolley]

[-- Attachment #1: Type: text/plain, Size: 216 bytes --]

Hi,

I've commited the attached patch which demotes the logit message for a 
new derived operand to level 2. The default level is 1 and all the other 
level 1 messages are to log the start/end of major passes.

Dave

[-- Attachment #2: cgen-log.ChangeLog --]
[-- Type: text/plain, Size: 135 bytes --]

2005-02-16  Dave Brolley  <brolley@redhat.com>

	* operand.scm (-derived-operand-parse): Move logit message from level 1
	to level 2.


[-- Attachment #3: cgen-log.patch.txt --]
[-- Type: text/plain, Size: 1395 bytes --]

Index: cgen/operand.scm
===================================================================
RCS file: /cvs/src/src/cgen/operand.scm,v
retrieving revision 1.8
diff -c -p -r1.8 operand.scm
*** cgen/operand.scm	16 Jul 2003 05:35:47 -0000	1.8
--- cgen/operand.scm	16 Feb 2005 19:36:34 -0000
***************
*** 1,5 ****
  ; Operands
! ; Copyright (C) 2000, 2001 Red Hat, Inc.
  ; This file is part of CGEN.
  ; See file COPYING.CGEN for details.
  
--- 1,5 ----
  ; Operands
! ; Copyright (C) 2000, 2001, 2005 Red Hat, Inc.
  ; This file is part of CGEN.
  ; See file COPYING.CGEN for details.
  
***************
*** 869,875 ****
  	    ;(elm-set! result 'hw-name base-ifield)
  	    (elm-set! result 'index parsed-encoding)
  	    ; (elm-set! result 'index (hw-index-derived)) ; A temporary dummy
! 	    (logit 1 "new derived-operand; name=" name " hw-name= " (op:hw-name result) 
  		   " index=" (obj:name parsed-encoding) "\n")
  	    (derived-ifield-set-owner! parsed-encoding result)
  	    result))
--- 869,875 ----
  	    ;(elm-set! result 'hw-name base-ifield)
  	    (elm-set! result 'index parsed-encoding)
  	    ; (elm-set! result 'index (hw-index-derived)) ; A temporary dummy
! 	    (logit 2 "new derived-operand; name=" name " hw-name= " (op:hw-name result) 
  		   " index=" (obj:name parsed-encoding) "\n")
  	    (derived-ifield-set-owner! parsed-encoding result)
  	    result))