WebSVN – fastphp – Path Comparison – /

Regard whitespace Rev 69 → Rev 70

 /trunk/FastPHPTreeView.pas
 ,7 → 55,8
   StrUtils, Windows;
 const
-  LEN_MAGIC   = 8;
+  MAGIC_V100  = 'FAST100!';
+  UTF8_BOM    = '';
   LEN_ICON    = 4;
   LEN_LINENO  = 8;
   LEN_DESCLEN = 4;
 ,11 → 118,24
     {$REGION 'Update the treeview'}
     Self.Items.Clear;
-    magic := Read(ptr, LEN_MAGIC);
-    if magic = 'FAST100!' then
+    {$REGION 'Remove UTF8-BOMs'}
+    repeat
+      magic := Read(ptr, Length(UTF8_BOM));
+    until magic <> UTF8_BOM;
+    ptr := ptr - Length(UTF8_BOM);
+    {$ENDREGION}
+    magic := Read(ptr, length(MAGIC_V100));
+    if magic = MAGIC_V100 then
+    begin
       Rec100(nil, ptr)
+    end
     else
+    begin
       raise EFastNodeException.CreateFmt('FastNode version "%s" not supported.', [magic]);
+    end;
     {$ENDREGION}
     {$REGION 'Recover the previous current state (selected and expanded flags)'}

 /trunk/RunPHP.pas
 ,9 → 147,12
         end;
         // Signal the code explorer to terminate
+        (*
         testString := #13#10+SIGNAL_TERMINATE+#13#10;
         WriteFile(StdInPipeWrite, testString[1], Length(testString), BytesWritten, nil);
         WaitForSingleObject(PI.hProcess, INFINITE);
+        *)
+        TerminateProcess(Pi.hProcess, 0);
         CloseHandle(StdInPipeWrite);
       finally

/trunk/codeexplorer_api.inc.php
1,4 → 1,4
<?php
<?php

define('SIGNAL_END_OF_TRANSMISSION', chr(1).chr(2).chr(3).chr(4).chr(5).chr(6).chr(7).chr(8));
define('SIGNAL_TERMINATE', chr(8).chr(7).chr(6).chr(5).chr(4).chr(3).chr(2).chr(1));

/trunk/codeexplorer.php
1,4 → 1,4
<?php
<?php

// TODO: show full signature of each element?