Author: paultcochrane
Date: Sun Sep 30 15:04:23 2007
New Revision: 21688
Modified:
trunk/languages/dotnet/doc/stacktoregister.pod
trunk/languages/dotnet/ops/dotnet.ops
Log:
[dotnet] Shortening lines in accordance with coding standards.
Modified: trunk/languages/dotnet/doc/stacktoregister.pod
==============================================================================
--- trunk/languages/dotnet/doc/stacktoregister.pod (original)
+++ trunk/languages/dotnet/doc/stacktoregister.pod Sun Sep 30 15:04:23 2007
@@ -311,11 +311,13 @@
In addition to this, without analysing the basic blocks[2] that make up the
code to determine when it can be avoided, it is necesary to push all cached
-items onto the stack before a branch or a conditional branch takes place or a
-label is found. While this and a full set of optimizations to minimize stack
-use are possible, this path will not be explored. Given that there are
essentially unlimited registers available to use, it would be desirable to
+items onto the stack before a branch or a conditional branch takes place or
+a label is found. While this and a full set of optimizations to minimize
+stack use are possible, this path will not be explored. Given that there are
+essentially unlimited registers available to use, it would be desirable to
completely do away with having a stack. Doing stack operations costs v-table
-calls, which harms performance and makes poor use of the Parrot execution
model.
+calls, which harms performance and makes poor use of the Parrot execution
+model.
=head3 Mapping Stack Locations To Registers
Modified: trunk/languages/dotnet/ops/dotnet.ops
==============================================================================
--- trunk/languages/dotnet/ops/dotnet.ops (original)
+++ trunk/languages/dotnet/ops/dotnet.ops Sun Sep 30 15:04:23 2007
@@ -20,11 +20,13 @@
#define MIN_INT8 (-MAX_INT8 -1)
#define CHECK_ADD_OVERFLOW(a,b) \
- (Parrot_Int4)(b) >= 0 ? (Parrot_Int4)(MAX_INT4) - (Parrot_Int4)(b) <
(Parrot_Int4)(a) ? -1 : 0 \
+ (Parrot_Int4)(b) >= 0 ? \
+ (Parrot_Int4)(MAX_INT4) - (Parrot_Int4)(b) < (Parrot_Int4)(a) ? -1
: 0 \
: (Parrot_Int4)(MIN_INT4) - (Parrot_Int4)(b) > (Parrot_Int4)(a) ? +1 : 0
#define CHECK_SUB_OVERFLOW(a,b) \
- (Parrot_Int4)(b) < 0 ? (Parrot_Int4)(MAX_INT4) + (Parrot_Int4)(b) <
(Parrot_Int4)(a) ? -1 : 0 \
+ (Parrot_Int4)(b) < 0 ? \
+ (Parrot_Int4)(MAX_INT4) + (Parrot_Int4)(b) < (Parrot_Int4)(a) ? -1
: 0 \
: (Parrot_Int4)(MIN_INT4) + (Parrot_Int4)(b) > (Parrot_Int4)(a) ? +1 : 0
#define CHECK_ADD_OVERFLOW_UN(a,b) \
@@ -34,11 +36,11 @@
(Parrot_UInt4)(a) < (Parrot_UInt4)(b) ? -1 : 0
#define CHECK_ADD_OVERFLOW64(a,b) \
- (HUGEINTVAL)(b) >= 0 ? (HUGEINTVAL)(MAX_INT8) - (HUGEINTVAL)(b) <
(HUGEINTVAL)(a) ? -1 : 0 \
+ (HUGEINTVAL)(b) >= 0 ? (HUGEINTVAL)(MAX_INT8) - (HUGEINTVAL)(b) <
(HUGEINTVAL)(a) ? -1 : 0 \
: (HUGEINTVAL)(MIN_INT8) - (HUGEINTVAL)(b) > (HUGEINTVAL)(a) ? +1 : 0
#define CHECK_SUB_OVERFLOW64(a,b) \
- (HUGEINTVAL)(b) < 0 ? (HUGEINTVAL)(MAX_INT8) + (HUGEINTVAL)(b) <
(HUGEINTVAL)(a) ? -1 : 0 \
+ (HUGEINTVAL)(b) < 0 ? (HUGEINTVAL)(MAX_INT8) + (HUGEINTVAL)(b) <
(HUGEINTVAL)(a) ? -1 : 0 \
: (HUGEINTVAL)(MIN_INT8) + (HUGEINTVAL)(b) > (HUGEINTVAL)(a) ? +1 : 0
#define CHECK_ADD_OVERFLOW64_UN(a,b) \
@@ -51,9 +53,12 @@
((Parrot_Int4)(a) == 0) || ((Parrot_Int4)(b) == 0) ? 0 : \
(((Parrot_Int4)(a) > 0) && ((Parrot_Int4)(b) == -1)) ? FALSE : \
(((Parrot_Int4)(a) < 0) && ((Parrot_Int4)(b) == -1)) ? (a == -
MAX_INT4) : \
- (((Parrot_Int4)(a) > 0) && ((Parrot_Int4)(b) > 0)) ? (Parrot_Int4)(a)
> ((MAX_INT4) / (Parrot_Int4)(b)) : \
- (((Parrot_Int4)(a) > 0) && ((Parrot_Int4)(b) < 0)) ? (Parrot_Int4)(a)
> ((MIN_INT4) / (Parrot_Int4)(b)) : \
- (((Parrot_Int4)(a) < 0) && ((Parrot_Int4)(b) > 0)) ? (Parrot_Int4)(a)
< ((MIN_INT4) / (Parrot_Int4)(b)) : \
+ (((Parrot_Int4)(a) > 0) && ((Parrot_Int4)(b) > 0)) ? \
+ (Parrot_Int4)(a) > ((MAX_INT4) / (Parrot_Int4)(b)) : \
+ (((Parrot_Int4)(a) > 0) && ((Parrot_Int4)(b) < 0)) ? \
+ (Parrot_Int4)(a) > ((MIN_INT4) / (Parrot_Int4)(b)) : \
+ (((Parrot_Int4)(a) < 0) && ((Parrot_Int4)(b) > 0)) ? \
+ (Parrot_Int4)(a) < ((MIN_INT4) / (Parrot_Int4)(b)) : \
(Parrot_Int4)(a) < ((MAX_INT4) / (Parrot_Int4)(b))
#define CHECK_MUL_OVERFLOW_UN(a,b) \
@@ -64,9 +69,12 @@
((HUGEINTVAL)(a) == 0) || ((HUGEINTVAL)(b) == 0) ? 0 : \
(((HUGEINTVAL)(a) > 0) && ((HUGEINTVAL)(b) == -1)) ? FALSE : \
(((HUGEINTVAL)(a) < 0) && ((HUGEINTVAL)(b) == -1)) ? (a == - MAX_INT8)
: \
- (((HUGEINTVAL)(a) > 0) && ((HUGEINTVAL)(b) > 0)) ? (HUGEINTVAL)(a) >
((MAX_INT8) / (HUGEINTVAL)(b)) : \
- (((HUGEINTVAL)(a) > 0) && ((HUGEINTVAL)(b) < 0)) ? (HUGEINTVAL)(a) >
((MIN_INT8) / (HUGEINTVAL)(b)) : \
- (((HUGEINTVAL)(a) < 0) && ((HUGEINTVAL)(b) > 0)) ? (HUGEINTVAL)(a) <
((MIN_INT8) / (HUGEINTVAL)(b)) : \
+ (((HUGEINTVAL)(a) > 0) && ((HUGEINTVAL)(b) > 0)) ? \
+ (HUGEINTVAL)(a) > ((MAX_INT8) / (HUGEINTVAL)(b)) : \
+ (((HUGEINTVAL)(a) > 0) && ((HUGEINTVAL)(b) < 0)) ? \
+ (HUGEINTVAL)(a) > ((MIN_INT8) / (HUGEINTVAL)(b)) : \
+ (((HUGEINTVAL)(a) < 0) && ((HUGEINTVAL)(b) > 0)) ? \
+ (HUGEINTVAL)(a) < ((MIN_INT8) / (HUGEINTVAL)(b)) : \
(HUGEINTVAL)(a) < ((MAX_INT8) / (HUGEINTVAL)(b))
#define CHECK_MUL_OVERFLOW64_UN(a,b) \
