perl.cvs.parrot
[Top] [All Lists]

[svn:parrot] r29851 - trunk/languages/tcl/runtime/builtin

Subject: [svn:parrot] r29851 - trunk/languages/tcl/runtime/builtin
From: infinoid@xxxxxxxxxxxx
Date: Tue, 29 Jul 2008 10:46:46 -0700 (PDT)
Newsgroups: perl.cvs.parrot

Author: infinoid
Date: Tue Jul 29 10:46:46 2008
New Revision: 29851

Modified:
   trunk/languages/tcl/runtime/builtin/lsort.pir

Log:
[tcl] Fix trailing whitespace.


Modified: trunk/languages/tcl/runtime/builtin/lsort.pir
==============================================================================
--- trunk/languages/tcl/runtime/builtin/lsort.pir       (original)
+++ trunk/languages/tcl/runtime/builtin/lsort.pir       Tue Jul 29 10:46:46 2008
@@ -81,7 +81,7 @@
   if c == size goto strip_end
   $P2 = $P1
   $P1 = $P0[c]
-  
+
   if $P1 != $P2 goto strip_loop
   delete $P0[c]
   dec c

<Prev in Thread] Current Thread [Next in Thread>
  • [svn:parrot] r29851 - trunk/languages/tcl/runtime/builtin, infinoid <=