[svn:parrot] r44011 - trunk/compilers/pirc/src
bacek at svn.parrot.org
bacek at svn.parrot.org
Tue Feb 16 11:12:40 UTC 2010
Author: bacek
Date: Tue Feb 16 11:12:39 2010
New Revision: 44011
URL: https://trac.parrot.org/parrot/changeset/44011
Log:
PIRC: Really use headerizer
Modified:
trunk/compilers/pirc/src/pirsymbol.c
trunk/compilers/pirc/src/pirsymbol.h
Modified: trunk/compilers/pirc/src/pirsymbol.c
==============================================================================
--- trunk/compilers/pirc/src/pirsymbol.c Tue Feb 16 11:12:18 2010 (r44010)
+++ trunk/compilers/pirc/src/pirsymbol.c Tue Feb 16 11:12:39 2010 (r44011)
@@ -167,7 +167,7 @@
*/
void
-assign_vanilla_register(NOTNULL(lexer_state * const lexer),
+assign_vanilla_register(ARGIN(lexer_state * const lexer),
ARGMOD(symbol * const sym))
{
sym->info.color = next_register(lexer, sym->info.type);
@@ -204,7 +204,7 @@
PARROT_PURE_FUNCTION
PARROT_WARN_UNUSED_RESULT
unsigned
-get_hashcode(NOTNULL(char const * const str), unsigned num_buckets)
+get_hashcode(ARGIN(char const * const str), unsigned num_buckets)
{
unsigned long key = 0;
char const *s;
@@ -226,8 +226,8 @@
*/
void
-store_bucket(NOTNULL(hashtable * const table),
- NOTNULL(bucket * const buck), unsigned long hash)
+store_bucket(ARGIN(hashtable * const table),
+ ARGIN(bucket * const buck), unsigned long hash)
{
buck->next = table->contents[hash];
table->contents[hash] = buck;
@@ -245,7 +245,7 @@
PARROT_WARN_UNUSED_RESULT
PARROT_CANNOT_RETURN_NULL
bucket *
-get_bucket(NOTNULL(hashtable * const table), unsigned long hash)
+get_bucket(ARGIN(hashtable * const table), unsigned long hash)
{
return table->contents[hash];
}
@@ -263,8 +263,8 @@
PARROT_WARN_UNUSED_RESULT
PARROT_CANNOT_RETURN_NULL
symbol *
-new_symbol(NOTNULL(lexer_state * const lexer),
- NOTNULL(char const * const name), pir_type type)
+new_symbol(ARGIN(lexer_state * const lexer),
+ ARGIN(char const * const name), pir_type type)
{
symbol *sym = pir_mem_allocate_zeroed_typed(lexer, symbol);
@@ -290,8 +290,8 @@
*/
void
-declare_local(NOTNULL(lexer_state * const lexer), pir_type type,
- NOTNULL(symbol * const list))
+declare_local(ARGIN(lexer_state * const lexer), pir_type type,
+ ARGIN(symbol * const list))
{
symbol *iter = list;
hashtable *table = &CURRENT_SUB(lexer)->symbols;
@@ -344,7 +344,7 @@
*/
void
-check_unused_symbols(NOTNULL(lexer_state * const lexer))
+check_unused_symbols(ARGIN(lexer_state * const lexer))
{
subroutine *subiter;
@@ -393,8 +393,8 @@
PARROT_WARN_UNUSED_RESULT
PARROT_CAN_RETURN_NULL
symbol *
-find_symbol(NOTNULL(lexer_state * const lexer),
- NOTNULL(char const * const name))
+find_symbol(ARGIN(lexer_state * const lexer),
+ ARGIN(char const * const name))
{
hashtable *table = &CURRENT_SUB(lexer)->symbols;
unsigned long hashcode = get_hashcode(name, table->size);
Modified: trunk/compilers/pirc/src/pirsymbol.h
==============================================================================
--- trunk/compilers/pirc/src/pirsymbol.h Tue Feb 16 11:12:18 2010 (r44010)
+++ trunk/compilers/pirc/src/pirsymbol.h Tue Feb 16 11:12:39 2010 (r44011)
@@ -79,22 +79,22 @@
/* Don't modify between HEADERIZER BEGIN / HEADERIZER END. Your changes will be lost. */
void assign_vanilla_register(
- NOTNULL(lexer_state * const lexer),
+ ARGIN(lexer_state * const lexer),
ARGMOD(symbol * const sym))
__attribute__nonnull__(1)
__attribute__nonnull__(2)
FUNC_MODIFIES(* const sym);
-void check_unused_symbols(NOTNULL(lexer_state * const lexer))
+void check_unused_symbols(ARGIN(lexer_state * const lexer))
__attribute__nonnull__(1);
int color_reg(ARGIN(lexer_state * const lexer), pir_type type, int regno)
__attribute__nonnull__(1);
void declare_local(
- NOTNULL(lexer_state * const lexer),
+ ARGIN(lexer_state * const lexer),
pir_type type,
- NOTNULL(symbol * const list))
+ ARGIN(symbol * const list))
__attribute__nonnull__(1)
__attribute__nonnull__(3);
@@ -132,33 +132,33 @@
PARROT_WARN_UNUSED_RESULT
PARROT_CAN_RETURN_NULL
symbol * find_symbol(
- NOTNULL(lexer_state * const lexer),
- NOTNULL(char const * const name))
+ ARGIN(lexer_state * const lexer),
+ ARGIN(char const * const name))
__attribute__nonnull__(1)
__attribute__nonnull__(2);
PARROT_WARN_UNUSED_RESULT
PARROT_CANNOT_RETURN_NULL
-bucket * get_bucket(NOTNULL(hashtable * const table), unsigned long hash)
+bucket * get_bucket(ARGIN(hashtable * const table), unsigned long hash)
__attribute__nonnull__(1);
PARROT_PURE_FUNCTION
PARROT_WARN_UNUSED_RESULT
-unsigned get_hashcode(NOTNULL(char const * const str), unsigned num_buckets)
+unsigned get_hashcode(ARGIN(char const * const str), unsigned num_buckets)
__attribute__nonnull__(1);
PARROT_WARN_UNUSED_RESULT
PARROT_CANNOT_RETURN_NULL
symbol * new_symbol(
- NOTNULL(lexer_state * const lexer),
- NOTNULL(char const * const name),
+ ARGIN(lexer_state * const lexer),
+ ARGIN(char const * const name),
pir_type type)
__attribute__nonnull__(1)
__attribute__nonnull__(2);
void store_bucket(
- NOTNULL(hashtable * const table),
- NOTNULL(bucket * const buck),
+ ARGIN(hashtable * const table),
+ ARGIN(bucket * const buck),
unsigned long hash)
__attribute__nonnull__(1)
__attribute__nonnull__(2);
More information about the parrot-commits
mailing list