[svn:parrot] r44016 - trunk/compilers/pirc/src

[bacek at svn.parrot.org]

Author: bacek
Date: Tue Feb 16 11:54:20 2010
New Revision: 44016
URL: https://trac.parrot.org/parrot/changeset/44016

Log:
PIRC: Add ASSERT_ARGS

Modified:
   trunk/compilers/pirc/src/pirregalloc.c

Modified: trunk/compilers/pirc/src/pirregalloc.c
==============================================================================
--- trunk/compilers/pirc/src/pirregalloc.c	Tue Feb 16 11:54:01 2010	(r44015)
+++ trunk/compilers/pirc/src/pirregalloc.c	Tue Feb 16 11:54:20 2010	(r44016)
@@ -161,6 +161,7 @@
 lsr_allocator *
 new_linear_scan_register_allocator(ARGIN_NULLOK(struct lexer_state *lexer))
 {
+    ASSERT_ARGS(new_linear_scan_register_allocator)
     lsr_allocator *lsr = (lsr_allocator *)mem_sys_allocate_zeroed(sizeof (lsr_allocator));
 
     lsr->lexer = lexer;
@@ -198,6 +199,7 @@
 void
 destroy_linear_scan_register_allocator(ARGMOD(lsr_allocator *lsr))
 {
+    ASSERT_ARGS(destroy_linear_scan_register_allocator)
     pir_type type;
     live_interval *i;
 
@@ -342,6 +344,7 @@
 new_live_interval(ARGIN(lsr_allocator * const lsr),
         unsigned firstuse_location, pir_type type)
 {
+    ASSERT_ARGS(new_live_interval)
     live_interval *i;
     /* check whether there's an interval object that we can re-use, to prevent
      * memory malloc() and free()s.
@@ -615,6 +618,7 @@
 void
 linear_scan_register_allocation(ARGIN(lsr_allocator * const lsr))
 {
+    ASSERT_ARGS(linear_scan_register_allocation)
     live_interval * i;
     pir_type type = 0; /* types run from 0 to 4; see pircompunit.h */