[L4alpha-cvscommit] CVS: L4Alpha/pal kernel-debugger.mar,1.6,1.7

[Daniel P. <dp...@us...>]

Update of /cvsroot/l4alpha/L4Alpha/pal
In directory usw-pr-cvs1:/tmp/cvs-serv18328/pal

Modified Files:
	kernel-debugger.mar 
Log Message:
Print the "Press a key to start debugger or h to halt ..." message
inline, and only do the hundred lines of space if actually entering
the debugger (much less annoying if you're just getting an assert).

Patch by andrewb.


Index: kernel-debugger.mar
===================================================================
RCS file: /cvsroot/l4alpha/L4Alpha/pal/kernel-debugger.mar,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** kernel-debugger.mar	13 Apr 2001 05:45:51 -0000	1.6
--- kernel-debugger.mar	17 Sep 2002 04:06:41 -0000	1.7
***************
*** 830,834 ****
  	send_ipi	t1, t7, t2
  .endc
! 		
          lda     t1, 100(zero)
          REPEAT  
--- 830,843 ----
  	send_ipi	t1, t7, t2
  .endc
! 	
! 	kmsg	<<CR><LF>>
! 	khex	t0
! 	kmsg	<" Press a key to start debugger or h to halt ...">
! 	get_char
!         cmpeq   v0, #^x68, t0                            ; halt
!         IF      t0
!                 halt
!         ENDIF
! 	
          lda     t1, 100(zero)
          REPEAT  
***************
*** 837,848 ****
                  CONT    t1
          ENDR
! 		
!         put_hex 1, 1, t0
!         put_str 17, 1 <" Press a key to start debugger or h to halt ...">
! 	get_char
!         cmpeq   v0, #^x68, t0                            ; halt
!         IF      t0
!                 halt
!         ENDIF
          clrscr	
  
--- 846,850 ----
                  CONT    t1
          ENDR
! 	
          clrscr