Changeset 94 for trunk/orca/series.c

Timestamp:

03/17/06 22:41:34 (3 years ago)

Author:

krobillard

Message:

All natives now use the OR_NATIVE macro.

Files:

• trunk/orca/series.c (modified) (27 diffs)

trunk/orca/series.c

@@ -108 +108 @@
 
 
-void orLengthQNative( OValue* a1 )
+OR_NATIVE( orLengthQNative )
 {
     int len;
@@ -142 +142 @@
 
 
-void orHeadNative( OValue* a1 )
+OR_NATIVE( orHeadNative )
 {
     if( a1->type == OT_LIST )
@@ -156 +156 @@
 
 
-void orTailNative( OValue* a1 )
+OR_NATIVE( orTailNative )
 {
     if( a1->type == OT_LIST )
@@ -173 +173 @@
 
 
-void orBackNative( OValue* a1 )
+OR_NATIVE( orBackNative )
 {
     if( a1->type == OT_LIST )
@@ -194 +194 @@
 
 
-void orNextNative( OValue* a1 )
+OR_NATIVE( orNextNative )
 {
     if( a1->type == OT_LIST )
@@ -215 +215 @@
 
 
-void orIndexQNative( OValue* a1 )
+OR_NATIVE( orIndexQNative )
 {
     if( a1->type == OT_LIST )
@@ -230 +230 @@
 
 
-void orHeadQNative( OValue* a1  )
+OR_NATIVE( orHeadQNative  )
 {
     int logic = OR_FALSE;
@@ -251 +251 @@
 
 
-void orTailQNative( OValue* a1  )
+OR_NATIVE( orTailQNative  )
 {
     int logic = OR_FALSE;
@@ -274 +274 @@
 
 
-void orClearNative( OValue* a1 )
+OR_NATIVE( orClearNative )
 {
     switch( a1->type )
@@ -413 +413 @@
 #define REF_INS_ONLY    a1+4
 
-void orInsertNative( OValue* a1 )
+OR_NATIVE( orInsertNative )
 {
     OValue* a2 = a1 + 1;
@@ -584 +584 @@
 #define REF_RM_RANGE   a1+2
 
-void orRemoveNative( OValue* a1 )
+OR_NATIVE( orRemoveNative )
 {
     int len;
@@ -827 +827 @@
 
 
-void orFirstNative( OValue* a1 )
+OR_NATIVE( orFirstNative )
 {
     if( a1->type == OT_OBJECT )
@@ -842 +842 @@
 
 
-void orSecondNative( OValue* a1 )
+OR_NATIVE( orSecondNative )
 {
     orPick( a1, 1, orRESULT );
@@ -848 +848 @@
 
 
-void orThirdNative( OValue* a1 )
+OR_NATIVE( orThirdNative )
 {
     orPick( a1, 2, orRESULT );
@@ -854 +854 @@
 
 
-void orLastNative( OValue* a1 )
+OR_NATIVE( orLastNative )
 {
     OValue* result = a1;
@@ -990 +990 @@
 
 
-void orReverseNative( OValue* a1 )
+OR_NATIVE( orReverseNative )
 {
     switch( a1->type )
@@ -1043 +1043 @@
 
 
-void orSkipNative( OValue* a1 )
+OR_NATIVE( orSkipNative )
 {
     int n;
@@ -1072 +1072 @@
 
 
-void orAtNative( OValue* a1 )
+OR_NATIVE( orAtNative )
 {
     int n;
@@ -1103 +1103 @@
 
 
-void orPickNative( OValue* a1 )
+OR_NATIVE( orPickNative )
 {
     int n;
@@ -1142 +1142 @@
   poke value index data
 */
-void orPokeNative( OValue* a1 )
+OR_NATIVE( orPokeNative )
 {
     int n;
@@ -1245 +1245 @@
     value
 */
-void orSelectNative( OValue* a1 )
+OR_NATIVE( orSelectNative )
 {
     OValue* a2 = a1 + 1;
@@ -1473 +1473 @@
 #define REF_COPY_DEEP   a1+3
 
-void orCopyNative( OValue* a1 )
+OR_NATIVE( orCopyNative )
 {
     if( (a1->type == OT_BITSET) || (a1->type == OT_MATRIX) )
@@ -1516 +1516 @@
     /only
 */
-void orChangeNative( OValue* a1 )
+OR_NATIVE( orChangeNative )
 {
     OValue* a2 = a1 + 1;
@@ -1800 +1800 @@
   value
 */
-void orFindNative( OValue* a1 )
+OR_NATIVE( orFindNative )
 {
     OValue* a2 = a1 + 1;
@@ -1911 +1911 @@
 #define REF_CASE_PART   a1+1
 
-void orLowercaseNative( OValue* a1 )
+OR_NATIVE( orLowercaseNative )
 {
     int c;
@@ -1942 +1942 @@
 
 
-void orUppercaseNative( OValue* a1 )
+OR_NATIVE( orUppercaseNative )
 {
     int c;
@@ -1977 +1977 @@
 #define REF_TRIM_TAIL   a1+3
 
-void orTrimNative( OValue* a1 )
+OR_NATIVE( orTrimNative )
 {
     OString* str = orSTRING(a1);