[commit: ghc] ghc-lwc: removed tabs from tab free files (b9a149d)
Sivaramakrishnan Krishnamoorthy Chandrasekaran
kc at galois.com
Sun May 6 18:14:17 CEST 2012
Repository : ssh://darcs.haskell.org//srv/darcs/ghc
On branch : ghc-lwc
http://hackage.haskell.org/trac/ghc/changeset/b9a149d7e207e06258df0dbe0da70970af759442
>---------------------------------------------------------------
commit b9a149d7e207e06258df0dbe0da70970af759442
Author: kc <chandras at cs.purdue.edu>
Date: Sun May 6 11:26:43 2012 -0400
removed tabs from tab free files
>---------------------------------------------------------------
compiler/cmm/PprC.hs | 6 +++---
libraries/base/tests/all.T | 34 +++++++++++++++++-----------------
rts/Capability.c | 4 ++--
rts/RtsMain.c | 4 ++--
4 files changed, 24 insertions(+), 24 deletions(-)
diff --git a/compiler/cmm/PprC.hs b/compiler/cmm/PprC.hs
index bb9c7aa..295ad2c 100644
--- a/compiler/cmm/PprC.hs
+++ b/compiler/cmm/PprC.hs
@@ -946,10 +946,10 @@ te_Stmt :: CmmStmt -> TE ()
te_Stmt (CmmAssign r e) = te_Reg r >> te_Expr e
te_Stmt (CmmStore l r) = te_Expr l >> te_Expr r
te_Stmt (CmmCall target rs es _) = do {
- te_Target target;
+ te_Target target;
mapM_ (te_temp.hintlessCmm) rs;
- mapM_ (te_Expr.hintlessCmm) es
- }
+ mapM_ (te_Expr.hintlessCmm) es
+ }
te_Stmt (CmmCondBranch e _) = te_Expr e
te_Stmt (CmmSwitch e _) = te_Expr e
te_Stmt (CmmJump e _) = te_Expr e
diff --git a/libraries/base/tests/all.T b/libraries/base/tests/all.T
index aaa476c..dadb5ef 100644
--- a/libraries/base/tests/all.T
+++ b/libraries/base/tests/all.T
@@ -48,10 +48,10 @@ test('hGetBuf003', normal, compile_and_run, [''])
test('hPutBuf001', normal, compile_and_run, [''])
test('hPutBuf002', extra_clean(['hPutBuf002.out']), compile_and_run, [''])
-test('char001', normal, compile_and_run, [''])
-test('char002', normal, compile_and_run, [''])
+test('char001', normal, compile_and_run, [''])
+test('char002', normal, compile_and_run, [''])
-test('cstring001', normal, compile_and_run, [''])
+test('cstring001', normal, compile_and_run, [''])
test('length001',
# This fails without -O, as it relies on a RULE being applied
@@ -59,28 +59,28 @@ test('length001',
compile_and_run,
[''])
-test('ratio001', normal, compile_and_run, [''])
+test('ratio001', normal, compile_and_run, [''])
-test('rand001', reqlib('random'), compile_and_run, [''])
-test('reads001', normal, compile_and_run, [''])
-test('show001', normal, compile_and_run, [''])
-test('text001', normal, compile_and_run, [''])
+test('rand001', reqlib('random'), compile_and_run, [''])
+test('reads001', normal, compile_and_run, [''])
+test('show001', normal, compile_and_run, [''])
+test('text001', normal, compile_and_run, [''])
-test('tup001', normal, compile_and_run, [''])
+test('tup001', normal, compile_and_run, [''])
-test('addr001', normal, compile_and_run, [''])
+test('addr001', normal, compile_and_run, [''])
test('dynamic001', normal, compile_and_run, [''])
test('dynamic002', normal, compile_and_run, [''])
test('dynamic003', extra_run_opts('+RTS -K32m -RTS'), compile_and_run, [''])
test('dynamic004', normal, compile_and_run, [''])
test('dynamic005', normal, compile_and_run, [''])
test('enum01', skip_if_fast, compile_and_run, ['-cpp'])
-test('enum02', skip_if_fast, compile_and_run, ['-cpp'])
-test('enum03', skip_if_fast, compile_and_run, ['-cpp'])
-test('enum04', normal, compile_and_run, [''])
-test('exceptionsrun001', normal, compile_and_run, [''])
-test('exceptionsrun002', normal, compile_and_run, [''])
-test('list001' , skip_if_fast, compile_and_run, [''])
+test('enum02', skip_if_fast, compile_and_run, ['-cpp'])
+test('enum03', skip_if_fast, compile_and_run, ['-cpp'])
+test('enum04', normal, compile_and_run, [''])
+test('exceptionsrun001', normal, compile_and_run, [''])
+test('exceptionsrun002', normal, compile_and_run, [''])
+test('list001' , skip_if_fast, compile_and_run, [''])
test('list002', skip_if_fast, compile_and_run, [''])
test('list003', skip_if_fast, compile_and_run, [''])
@@ -95,7 +95,7 @@ test('memo002',
[skip_if_fast,
extra_run_opts('20'),
extra_clean(['Memo2.hi', 'Memo2.o'])],
- multimod_compile_and_run, ['memo002',''])
+ multimod_compile_and_run, ['memo002',''])
test('packedstring001', reqlib('packedstring'), compile_and_run, ['-package packedstring'])
diff --git a/rts/Capability.c b/rts/Capability.c
index 56ba68a..4a82227 100644
--- a/rts/Capability.c
+++ b/rts/Capability.c
@@ -506,7 +506,7 @@ releaseCapability_ (Capability* cap,
// ThreadBlocked, but the thread may be back on the run queue
// by now.
task = cap->run_queue_hd->bound->task;
- giveCapabilityToTask(cap, task);
+ giveCapabilityToTask(cap, task);
return;
}
@@ -529,7 +529,7 @@ releaseCapability_ (Capability* cap,
!emptyRunQueue(cap) || !emptyInbox(cap) ||
(!cap->disabled && !emptySparkPoolCap(cap)) || globalWorkToDo()) {
if (cap->spare_workers) {
- giveCapabilityToTask(cap, cap->spare_workers);
+ giveCapabilityToTask(cap, cap->spare_workers);
// The worker Task pops itself from the queue;
return;
}
diff --git a/rts/RtsMain.c b/rts/RtsMain.c
index 435df42..821403a 100644
--- a/rts/RtsMain.c
+++ b/rts/RtsMain.c
@@ -59,9 +59,9 @@ static void real_main(void)
/* ToDo: want to start with a larger stack size */
{
- Capability *cap = rts_lock();
+ Capability *cap = rts_lock();
rts_evalLazyIO(&cap,progmain_closure, NULL);
- status = rts_getSchedStatus(cap);
+ status = rts_getSchedStatus(cap);
rts_unlock(cap);
}
More information about the Cvs-ghc
mailing list