blob: 3695465e70959be4837261131413e23fa6f2db17 [file] [log] [blame]
wdenkfe8c2802002-11-03 00:38:21 +00001/*
2 * armboot - Startup Code for ARM720 CPU-core
3 *
4 * Copyright (c) 2001 Marius Gröger <mag@sysgo.de>
5 * Copyright (c) 2002 Alex Züpke <azu@sysgo.de>
6 *
7 * See file CREDITS for list of people who contributed to this
8 * project.
9 *
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License as
12 * published by the Free Software Foundation; either version 2 of
13 * the License, or (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
wdenkcdc7fea2004-07-11 22:27:55 +000017 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
wdenkfe8c2802002-11-03 00:38:21 +000018 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
23 * MA 02111-1307 USA
24 */
25
26
wdenkfe8c2802002-11-03 00:38:21 +000027#include <config.h>
28#include <version.h>
wdenk39539882004-07-01 16:30:44 +000029#include <asm/hardware.h>
wdenkfe8c2802002-11-03 00:38:21 +000030
31/*
32 *************************************************************************
33 *
34 * Jump vector table as in table 3.1 in [1]
35 *
36 *************************************************************************
37 */
38
39
40.globl _start
wdenkcdc7fea2004-07-11 22:27:55 +000041_start: b reset
wdenkfe8c2802002-11-03 00:38:21 +000042 ldr pc, _undefined_instruction
43 ldr pc, _software_interrupt
44 ldr pc, _prefetch_abort
45 ldr pc, _data_abort
46 ldr pc, _not_used
47 ldr pc, _irq
48 ldr pc, _fiq
49
wdenkcdc7fea2004-07-11 22:27:55 +000050_undefined_instruction: .word undefined_instruction
wdenkfe8c2802002-11-03 00:38:21 +000051_software_interrupt: .word software_interrupt
52_prefetch_abort: .word prefetch_abort
53_data_abort: .word data_abort
54_not_used: .word not_used
55_irq: .word irq
56_fiq: .word fiq
57
58 .balignl 16,0xdeadbeef
59
60
61/*
62 *************************************************************************
63 *
64 * Startup Code (reset vector)
65 *
wdenkf6e20fc2004-02-08 19:38:38 +000066 * do important init only if we don't start from RAM!
wdenkfe8c2802002-11-03 00:38:21 +000067 * relocate armboot to ram
68 * setup stack
69 * jump to second stage
70 *
71 *************************************************************************
72 */
73
wdenkfe8c2802002-11-03 00:38:21 +000074_TEXT_BASE:
75 .word TEXT_BASE
76
77.globl _armboot_start
78_armboot_start:
79 .word _start
80
81/*
wdenkf6e20fc2004-02-08 19:38:38 +000082 * These are defined in the board-specific linker script.
wdenkfe8c2802002-11-03 00:38:21 +000083 */
wdenkf6e20fc2004-02-08 19:38:38 +000084.globl _bss_start
85_bss_start:
86 .word __bss_start
87
88.globl _bss_end
89_bss_end:
90 .word _end
wdenkfe8c2802002-11-03 00:38:21 +000091
wdenkfe8c2802002-11-03 00:38:21 +000092#ifdef CONFIG_USE_IRQ
93/* IRQ stack memory (calculated at run-time) */
94.globl IRQ_STACK_START
95IRQ_STACK_START:
96 .word 0x0badc0de
97
98/* IRQ stack memory (calculated at run-time) */
99.globl FIQ_STACK_START
100FIQ_STACK_START:
101 .word 0x0badc0de
102#endif
103
104
105/*
106 * the actual reset code
107 */
108
109reset:
110 /*
111 * set the cpu to SVC32 mode
112 */
113 mrs r0,cpsr
114 bic r0,r0,#0x1f
115 orr r0,r0,#0x13
116 msr cpsr,r0
117
118 /*
119 * we do sys-critical inits only at reboot,
120 * not when booting from ram!
121 */
wdenk8aa1a2d2005-04-04 12:44:11 +0000122#ifndef CONFIG_SKIP_LOWLEVEL_INIT
wdenkfe8c2802002-11-03 00:38:21 +0000123 bl cpu_init_crit
124#endif
125
wdenk8aa1a2d2005-04-04 12:44:11 +0000126#ifndef CONFIG_SKIP_RELOCATE_UBOOT
wdenka8c7c702003-12-06 19:49:23 +0000127relocate: /* relocate U-Boot to RAM */
128 adr r0, _start /* r0 <- current position of code */
129 ldr r1, _TEXT_BASE /* test if we run from flash or RAM */
wdenkcdc7fea2004-07-11 22:27:55 +0000130 cmp r0, r1 /* don't reloc during debug */
131 beq stack_setup
132
133#if TEXT_BASE
134 ldr r2, =0x0 /* Relocate the exception vectors */
135 cmp r1, r2 /* and associated data to address */
136 ldmneia r0!, {r3-r10} /* 0x0. Do nothing if TEXT_BASE is */
137 stmneia r2!, {r3-r10} /* 0x0. Copy the first 15 words. */
138 ldmneia r0, {r3-r9}
139 stmneia r2, {r3-r9}
140 adrne r0, _start /* restore r0 */
141#endif
wdenka8c7c702003-12-06 19:49:23 +0000142
wdenkfe8c2802002-11-03 00:38:21 +0000143 ldr r2, _armboot_start
wdenkf6e20fc2004-02-08 19:38:38 +0000144 ldr r3, _bss_start
wdenkcdc7fea2004-07-11 22:27:55 +0000145 sub r2, r3, r2 /* r2 <- size of armboot */
146 add r2, r0, r2 /* r2 <- source end address */
wdenkfe8c2802002-11-03 00:38:21 +0000147
wdenkfe8c2802002-11-03 00:38:21 +0000148copy_loop:
wdenka8c7c702003-12-06 19:49:23 +0000149 ldmia r0!, {r3-r10} /* copy from source address [r0] */
150 stmia r1!, {r3-r10} /* copy to target address [r1] */
151 cmp r0, r2 /* until source end addreee [r2] */
wdenkfe8c2802002-11-03 00:38:21 +0000152 ble copy_loop
153
wdenk8aa1a2d2005-04-04 12:44:11 +0000154#endif /* CONFIG_SKIP_RELOCATE_UBOOT */
155
wdenka8c7c702003-12-06 19:49:23 +0000156 /* Set up the stack */
157stack_setup:
158 ldr r0, _TEXT_BASE /* upper 128 KiB: relocated uboot */
wdenkcdc7fea2004-07-11 22:27:55 +0000159 sub r0, r0, #CFG_MALLOC_LEN /* malloc area */
160 sub r0, r0, #CFG_GBL_DATA_SIZE /* bdinfo */
wdenka8c7c702003-12-06 19:49:23 +0000161#ifdef CONFIG_USE_IRQ
162 sub r0, r0, #(CONFIG_STACKSIZE_IRQ+CONFIG_STACKSIZE_FIQ)
163#endif
164 sub sp, r0, #12 /* leave 3 words for abort-stack */
wdenkfe8c2802002-11-03 00:38:21 +0000165
wdenkf6e20fc2004-02-08 19:38:38 +0000166clear_bss:
wdenkcdc7fea2004-07-11 22:27:55 +0000167 ldr r0, _bss_start /* find start of bss segment */
168 ldr r1, _bss_end /* stop here */
169 mov r2, #0x00000000 /* clear */
wdenkf6e20fc2004-02-08 19:38:38 +0000170
wdenkcdc7fea2004-07-11 22:27:55 +0000171clbss_l:str r2, [r0] /* clear loop... */
wdenkf6e20fc2004-02-08 19:38:38 +0000172 add r0, r0, #4
173 cmp r0, r1
wdenka1191902005-01-09 17:12:27 +0000174 ble clbss_l
wdenkf6e20fc2004-02-08 19:38:38 +0000175
wdenkfe8c2802002-11-03 00:38:21 +0000176 ldr pc, _start_armboot
177
wdenkcdc7fea2004-07-11 22:27:55 +0000178_start_armboot: .word start_armboot
wdenkfe8c2802002-11-03 00:38:21 +0000179
wdenkfe8c2802002-11-03 00:38:21 +0000180/*
181 *************************************************************************
182 *
183 * CPU_init_critical registers
184 *
185 * setup important registers
186 * setup memory timing
187 *
188 *************************************************************************
189 */
190
wdenk39539882004-07-01 16:30:44 +0000191#if defined(CONFIG_IMPA7) || defined(CONFIG_EP7312)
wdenkfe8c2802002-11-03 00:38:21 +0000192
193/* Interupt-Controller base addresses */
194INTMR1: .word 0x80000280 @ 32 bit size
195INTMR2: .word 0x80001280 @ 16 bit size
196INTMR3: .word 0x80002280 @ 8 bit size
197
198/* SYSCONs */
199SYSCON1: .word 0x80000100
200SYSCON2: .word 0x80001100
201SYSCON3: .word 0x80002200
202
203#define CLKCTL 0x6 /* mask */
204#define CLKCTL_18 0x0 /* 18.432 MHz */
205#define CLKCTL_36 0x2 /* 36.864 MHz */
206#define CLKCTL_49 0x4 /* 49.152 MHz */
207#define CLKCTL_73 0x6 /* 73.728 MHz */
208
wdenk39539882004-07-01 16:30:44 +0000209#endif
210
wdenkfe8c2802002-11-03 00:38:21 +0000211cpu_init_crit:
wdenk39539882004-07-01 16:30:44 +0000212#if defined(CONFIG_IMPA7) || defined(CONFIG_EP7312)
213
wdenkfe8c2802002-11-03 00:38:21 +0000214 /*
215 * mask all IRQs by clearing all bits in the INTMRs
216 */
217 mov r1, #0x00
218 ldr r0, INTMR1
219 str r1, [r0]
220 ldr r0, INTMR2
221 str r1, [r0]
222 ldr r0, INTMR3
223 str r1, [r0]
224
225 /*
226 * flush v4 I/D caches
227 */
228 mov r0, #0
229 mcr p15, 0, r0, c7, c7, 0 /* flush v3/v4 cache */
230 mcr p15, 0, r0, c8, c7, 0 /* flush v4 TLB */
231
232 /*
233 * disable MMU stuff and caches
234 */
235 mrc p15,0,r0,c1,c0
236 bic r0, r0, #0x00002300 @ clear bits 13, 9:8 (--V- --RS)
237 bic r0, r0, #0x0000008f @ clear bits 7, 3:0 (B--- WCAM)
238 orr r0, r0, #0x00000002 @ set bit 2 (A) Align
239 mcr p15,0,r0,c1,c0
wdenk39539882004-07-01 16:30:44 +0000240#elif defined(CONFIG_NETARM)
wdenk2d1a5372004-02-23 19:30:57 +0000241 /*
242 * prior to software reset : need to set pin PORTC4 to be *HRESET
243 */
244 ldr r0, =NETARM_GEN_MODULE_BASE
245 ldr r1, =(NETARM_GEN_PORT_MODE(0x10) | \
246 NETARM_GEN_PORT_DIR(0x10))
247 str r1, [r0, #+NETARM_GEN_PORTC]
248 /*
249 * software reset : see HW Ref. Guide 8.2.4 : Software Service register
wdenkcdc7fea2004-07-11 22:27:55 +0000250 * for an explanation of this process
wdenk2d1a5372004-02-23 19:30:57 +0000251 */
252 ldr r0, =NETARM_GEN_MODULE_BASE
253 ldr r1, =NETARM_GEN_SW_SVC_RESETA
254 str r1, [r0, #+NETARM_GEN_SOFTWARE_SERVICE]
255 ldr r1, =NETARM_GEN_SW_SVC_RESETB
256 str r1, [r0, #+NETARM_GEN_SOFTWARE_SERVICE]
257 ldr r1, =NETARM_GEN_SW_SVC_RESETA
258 str r1, [r0, #+NETARM_GEN_SOFTWARE_SERVICE]
259 ldr r1, =NETARM_GEN_SW_SVC_RESETB
260 str r1, [r0, #+NETARM_GEN_SOFTWARE_SERVICE]
261 /*
262 * setup PLL and System Config
263 */
264 ldr r0, =NETARM_GEN_MODULE_BASE
265
266 ldr r1, =( NETARM_GEN_SYS_CFG_LENDIAN | \
267 NETARM_GEN_SYS_CFG_BUSFULL | \
268 NETARM_GEN_SYS_CFG_USER_EN | \
269 NETARM_GEN_SYS_CFG_ALIGN_ABORT | \
270 NETARM_GEN_SYS_CFG_BUSARB_INT | \
271 NETARM_GEN_SYS_CFG_BUSMON_EN )
272
273 str r1, [r0, #+NETARM_GEN_SYSTEM_CONTROL]
274
275 ldr r1, =( NETARM_GEN_PLL_CTL_PLLCNT(NETARM_PLL_COUNT_VAL) | \
276 NETARM_GEN_PLL_CTL_POLTST_DEF | \
277 NETARM_GEN_PLL_CTL_INDIV(1) | \
278 NETARM_GEN_PLL_CTL_ICP_DEF | \
279 NETARM_GEN_PLL_CTL_OUTDIV(2) )
280 str r1, [r0, #+NETARM_GEN_PLL_CONTROL]
281 /*
282 * mask all IRQs by clearing all bits in the INTMRs
283 */
284 mov r1, #0
285 ldr r0, =NETARM_GEN_MODULE_BASE
286 str r1, [r0, #+NETARM_GEN_INTR_ENABLE]
wdenk39539882004-07-01 16:30:44 +0000287
288#elif defined(CONFIG_S3C4510B)
289
290 /*
291 * Mask off all IRQ sources
292 */
293 ldr r1, =REG_INTMASK
294 ldr r0, =0x3FFFFF
295 str r0, [r1]
296
297 /*
298 * Disable Cache
299 */
300 ldr r0, =REG_SYSCFG
wdenkcdc7fea2004-07-11 22:27:55 +0000301 ldr r1, =0x83ffffa0 /* cache-disabled */
wdenk39539882004-07-01 16:30:44 +0000302 str r1, [r0]
303
304#else
305#error No cpu_init_crit() defined for current CPU type
306#endif
wdenkfe8c2802002-11-03 00:38:21 +0000307
308#ifdef CONFIG_ARM7_REVD
309 /* set clock speed */
310 /* !!! we run @ 36 MHz due to a hardware flaw in Rev. D processors */
311 /* !!! not doing DRAM refresh properly! */
312 ldr r0, SYSCON3
313 ldr r1, [r0]
314 bic r1, r1, #CLKCTL
315 orr r1, r1, #CLKCTL_36
316 str r1, [r0]
317#endif
318
319 /*
320 * before relocating, we have to setup RAM timing
wdenkf6e20fc2004-02-08 19:38:38 +0000321 * because memory timing is board-dependent, you will
wdenk400558b2005-04-02 23:52:25 +0000322 * find a lowlevel_init.S in your board directory.
wdenkfe8c2802002-11-03 00:38:21 +0000323 */
324 mov ip, lr
wdenk400558b2005-04-02 23:52:25 +0000325 bl lowlevel_init
wdenkfe8c2802002-11-03 00:38:21 +0000326 mov lr, ip
327
328 mov pc, lr
329
330
wdenkfe8c2802002-11-03 00:38:21 +0000331/*
332 *************************************************************************
333 *
334 * Interrupt handling
335 *
336 *************************************************************************
337 */
338
339@
340@ IRQ stack frame.
341@
342#define S_FRAME_SIZE 72
343
344#define S_OLD_R0 68
345#define S_PSR 64
346#define S_PC 60
347#define S_LR 56
348#define S_SP 52
349
350#define S_IP 48
351#define S_FP 44
352#define S_R10 40
353#define S_R9 36
354#define S_R8 32
355#define S_R7 28
356#define S_R6 24
357#define S_R5 20
358#define S_R4 16
359#define S_R3 12
360#define S_R2 8
361#define S_R1 4
362#define S_R0 0
363
364#define MODE_SVC 0x13
365#define I_BIT 0x80
366
367/*
368 * use bad_save_user_regs for abort/prefetch/undef/swi ...
369 * use irq_save_user_regs / irq_restore_user_regs for IRQ/FIQ handling
370 */
371
372 .macro bad_save_user_regs
373 sub sp, sp, #S_FRAME_SIZE
374 stmia sp, {r0 - r12} @ Calling r0-r12
wdenkcdc7fea2004-07-11 22:27:55 +0000375 add r8, sp, #S_PC
wdenkfe8c2802002-11-03 00:38:21 +0000376
wdenkf6e20fc2004-02-08 19:38:38 +0000377 ldr r2, _armboot_start
378 sub r2, r2, #(CONFIG_STACKSIZE+CFG_MALLOC_LEN)
wdenkcdc7fea2004-07-11 22:27:55 +0000379 sub r2, r2, #(CFG_GBL_DATA_SIZE+8) @ set base 2 words into abort stack
380 ldmia r2, {r2 - r4} @ get pc, cpsr, old_r0
wdenkfe8c2802002-11-03 00:38:21 +0000381 add r0, sp, #S_FRAME_SIZE @ restore sp_SVC
382
383 add r5, sp, #S_SP
384 mov r1, lr
wdenkcdc7fea2004-07-11 22:27:55 +0000385 stmia r5, {r0 - r4} @ save sp_SVC, lr_SVC, pc, cpsr, old_r
wdenkfe8c2802002-11-03 00:38:21 +0000386 mov r0, sp
387 .endm
388
389 .macro irq_save_user_regs
390 sub sp, sp, #S_FRAME_SIZE
391 stmia sp, {r0 - r12} @ Calling r0-r12
wdenkcdc7fea2004-07-11 22:27:55 +0000392 add r8, sp, #S_PC
393 stmdb r8, {sp, lr}^ @ Calling SP, LR
394 str lr, [r8, #0] @ Save calling PC
395 mrs r6, spsr
396 str r6, [r8, #4] @ Save CPSR
397 str r0, [r8, #8] @ Save OLD_R0
wdenkfe8c2802002-11-03 00:38:21 +0000398 mov r0, sp
399 .endm
400
401 .macro irq_restore_user_regs
402 ldmia sp, {r0 - lr}^ @ Calling r0 - lr
403 mov r0, r0
404 ldr lr, [sp, #S_PC] @ Get PC
405 add sp, sp, #S_FRAME_SIZE
406 subs pc, lr, #4 @ return & move spsr_svc into cpsr
407 .endm
408
409 .macro get_bad_stack
wdenkf6e20fc2004-02-08 19:38:38 +0000410 ldr r13, _armboot_start @ setup our mode stack
411 sub r13, r13, #(CONFIG_STACKSIZE+CFG_MALLOC_LEN)
412 sub r13, r13, #(CFG_GBL_DATA_SIZE+8) @ reserved a couple spots in abort stack
wdenkfe8c2802002-11-03 00:38:21 +0000413
414 str lr, [r13] @ save caller lr / spsr
415 mrs lr, spsr
wdenkcdc7fea2004-07-11 22:27:55 +0000416 str lr, [r13, #4]
wdenkfe8c2802002-11-03 00:38:21 +0000417
418 mov r13, #MODE_SVC @ prepare SVC-Mode
419 msr spsr_c, r13
420 mov lr, pc
421 movs pc, lr
422 .endm
423
424 .macro get_irq_stack @ setup IRQ stack
425 ldr sp, IRQ_STACK_START
426 .endm
427
428 .macro get_fiq_stack @ setup FIQ stack
429 ldr sp, FIQ_STACK_START
430 .endm
431
432/*
433 * exception handlers
434 */
wdenkcdc7fea2004-07-11 22:27:55 +0000435 .align 5
wdenkfe8c2802002-11-03 00:38:21 +0000436undefined_instruction:
437 get_bad_stack
438 bad_save_user_regs
wdenkcdc7fea2004-07-11 22:27:55 +0000439 bl do_undefined_instruction
wdenkfe8c2802002-11-03 00:38:21 +0000440
441 .align 5
442software_interrupt:
443 get_bad_stack
444 bad_save_user_regs
wdenkcdc7fea2004-07-11 22:27:55 +0000445 bl do_software_interrupt
wdenkfe8c2802002-11-03 00:38:21 +0000446
447 .align 5
448prefetch_abort:
449 get_bad_stack
450 bad_save_user_regs
wdenkcdc7fea2004-07-11 22:27:55 +0000451 bl do_prefetch_abort
wdenkfe8c2802002-11-03 00:38:21 +0000452
453 .align 5
454data_abort:
455 get_bad_stack
456 bad_save_user_regs
wdenkcdc7fea2004-07-11 22:27:55 +0000457 bl do_data_abort
wdenkfe8c2802002-11-03 00:38:21 +0000458
459 .align 5
460not_used:
461 get_bad_stack
462 bad_save_user_regs
wdenkcdc7fea2004-07-11 22:27:55 +0000463 bl do_not_used
wdenkfe8c2802002-11-03 00:38:21 +0000464
465#ifdef CONFIG_USE_IRQ
466
467 .align 5
468irq:
469 get_irq_stack
470 irq_save_user_regs
wdenkcdc7fea2004-07-11 22:27:55 +0000471 bl do_irq
wdenkfe8c2802002-11-03 00:38:21 +0000472 irq_restore_user_regs
473
474 .align 5
475fiq:
476 get_fiq_stack
477 /* someone ought to write a more effiction fiq_save_user_regs */
478 irq_save_user_regs
wdenkcdc7fea2004-07-11 22:27:55 +0000479 bl do_fiq
wdenkfe8c2802002-11-03 00:38:21 +0000480 irq_restore_user_regs
481
482#else
483
484 .align 5
485irq:
486 get_bad_stack
487 bad_save_user_regs
wdenkcdc7fea2004-07-11 22:27:55 +0000488 bl do_irq
wdenkfe8c2802002-11-03 00:38:21 +0000489
490 .align 5
491fiq:
492 get_bad_stack
493 bad_save_user_regs
wdenkcdc7fea2004-07-11 22:27:55 +0000494 bl do_fiq
wdenkfe8c2802002-11-03 00:38:21 +0000495
496#endif
497
wdenk39539882004-07-01 16:30:44 +0000498#if defined(CONFIG_IMPA7) || defined(CONFIG_EP7312)
wdenkfe8c2802002-11-03 00:38:21 +0000499 .align 5
500.globl reset_cpu
501reset_cpu:
wdenkcdc7fea2004-07-11 22:27:55 +0000502 mov ip, #0
503 mcr p15, 0, ip, c7, c7, 0 @ invalidate cache
504 mcr p15, 0, ip, c8, c7, 0 @ flush TLB (v4)
505 mrc p15, 0, ip, c1, c0, 0 @ get ctrl register
506 bic ip, ip, #0x000f @ ............wcam
507 bic ip, ip, #0x2100 @ ..v....s........
508 mcr p15, 0, ip, c1, c0, 0 @ ctrl register
509 mov pc, r0
wdenk39539882004-07-01 16:30:44 +0000510#elif defined(CONFIG_NETARM)
511 .align 5
512.globl reset_cpu
513reset_cpu:
wdenk2d1a5372004-02-23 19:30:57 +0000514 ldr r1, =NETARM_MEM_MODULE_BASE
515 ldr r0, [r1, #+NETARM_MEM_CS0_BASE_ADDR]
516 ldr r1, =0xFFFFF000
517 and r0, r1, r0
518 ldr r1, =(relocate-TEXT_BASE)
519 add r0, r1, r0
520 ldr r4, =NETARM_GEN_MODULE_BASE
521 ldr r1, =NETARM_GEN_SW_SVC_RESETA
522 str r1, [r4, #+NETARM_GEN_SOFTWARE_SERVICE]
523 ldr r1, =NETARM_GEN_SW_SVC_RESETB
524 str r1, [r4, #+NETARM_GEN_SOFTWARE_SERVICE]
525 ldr r1, =NETARM_GEN_SW_SVC_RESETA
526 str r1, [r4, #+NETARM_GEN_SOFTWARE_SERVICE]
527 ldr r1, =NETARM_GEN_SW_SVC_RESETB
528 str r1, [r4, #+NETARM_GEN_SOFTWARE_SERVICE]
529 mov pc, r0
wdenk39539882004-07-01 16:30:44 +0000530#elif defined(CONFIG_S3C4510B)
531/* Nothing done here as reseting the CPU is board specific, depending
532 * on external peripherals such as watchdog timers, etc. */
533#else
534#error No reset_cpu() defined for current CPU type
wdenk2d1a5372004-02-23 19:30:57 +0000535#endif