         fd 10
       ''', '''
       <block color="control" precedence="0">while <socket precedence="0">a</socket><indent depth="2">
-      <block color="command" precedence="0">fd <socket precedence="0">10</socket></block></indent></block>
+      <block color="command" precedence="0">fd <socket precedence="-1">10</socket></block></indent></block>
       '''
 
     testString 'One-line while statement',
       'while a then fd 10',
-      '<block color="control" precedence="0">while <socket precedence="0">a</socket> then <socket precedence="0"><block color="command" precedence="0">fd <socket precedence="0">10</socket></block></socket></block>'
+      '<block color="control" precedence="0">while <socket precedence="0">a</socket> then <socket precedence="0"><block color="command" precedence="0">fd <socket precedence="-1">10</socket></block></socket></block>'
 
     testString 'For-in, normal form',
       '''

        fd 10
      ''', '''
      <block color="control" precedence="0">for <socket precedence="0">i</socket> in <socket precedence="0">list</socket><indent depth="2">
      <block color="command" precedence="0">fd <socket precedence="0">10</socket></block></indent></block>
      '''

    testString 'One-line for-in',
      'for i in list then fd 10'
      '<block color="control" precedence="0">for <socket precedence="0">i</socket> in <socket precedence="0">list</socket> then <socket precedence="0"><block color="command" precedence="0">fd <socket precedence="0">10</socket></block></socket></block>'

    testString 'Inverted one-line for-in',
      'fd 10 for i in list',
      '<block color="control" precedence="0"><socket precedence="0"><block color="command" precedence="0">fd <socket precedence="0">10</socket></block></socket> for <socket precedence="0">i</socket> in <socket precedence="0">list</socket></block>'

    testString 'Semicolons at the root',
      'fd 10; bk 10',
      '<block color="command" precedence="0"><socket precedence="0">'+
      '<block color="command" precedence="0">fd <socket precedence="0">10</socket></block>'+
      '</socket>; <socket precedence="0">'+
      '<block color="command" precedence="0">bk <socket precedence="0">10</socket></block></socket></block>'


      '<block color="control" precedence="0">while <socket precedence="0">a</socket><indent depth="2">\n' +
      '<block color="command" precedence="0">see <socket precedence="0">hi</socket></block>\n'+
      '<block color="command" precedence="0"><socket precedence="0">'+
      '<block color="command" precedence="0">fd <socket precedence="-1">10</socket></block>'+
      '</socket>; <socket precedence="0">'+
      '<block color="command" precedence="0">bk <socket precedence="0">10</socket></block></socket></block>\n'+
      '<block color="command" precedence="0">see <socket precedence="0">bye</socket></block></indent></block>'
