comparison string.rhope @ 107:e5627038b7e7

Broken attempt at perf opt
author Mike Pavone <pavone@retrodev.com>
date Fri, 03 Sep 2010 08:11:51 -0400
parents 439db471f595
children
comparison
equal deleted inserted replaced
106:439db471f595 107:e5627038b7e7
437 If[[slicepoint]<=[0]] 437 If[[slicepoint]<=[0]]
438 { 438 {
439 left <- "" 439 left <- ""
440 right <- string 440 right <- string
441 }{ 441 }{
442 sliceoffset <- CPOff to BOff[[string]Buffer >>, 0i32, 0i32, slicepoint] 442 If[[[string]Length >>]=[[string]Byte Length]]
443 {
444 sliceoffset <- Val[slicepoint]
445 }{
446 sliceoffset <- CPOff to BOff[[string]Buffer >>, 0i32, 0i32, slicepoint]
447 }
443 left <- String Slice[string, 0i32, slicepoint, sliceoffset] 448 left <- String Slice[string, 0i32, slicepoint, sliceoffset]
444 right <- String Slice[string, sliceoffset, [[string]Length >>]-[slicepoint], [[[string]Buffer >>]Length]-[sliceoffset]] 449 right <- String Slice[string, sliceoffset, [[string]Length >>]-[slicepoint], [[[string]Buffer >>]Length]-[sliceoffset]]
445 } 450 }
446 } 451 }
447 } 452 }
641 If[[slicepoint]<=[0]] 646 If[[slicepoint]<=[0]]
642 { 647 {
643 left <- "" 648 left <- ""
644 right <- string 649 right <- string
645 }{ 650 }{
646 sliceoffset <- CPOff to BOff[[[string]Source >>]Buffer >>, 0i32, [string]Offset >>, slicepoint] 651 If[[[string]Length >>]=[[string]ByteLen >>]]
652 {
653 sliceoffset <- [[string]Offset >>]+[slicepoint]
654 }{
655 sliceoffset <- CPOff to BOff[[[string]Source >>]Buffer >>, 0i32, [string]Offset >>, slicepoint]
656 }
647 left <- String Slice[[string]Source >>, [string]Offset >>, slicepoint, [sliceoffset]-[[string]Offset >>]] 657 left <- String Slice[[string]Source >>, [string]Offset >>, slicepoint, [sliceoffset]-[[string]Offset >>]]
648 right <- String Slice[[string]Source >>, sliceoffset, [[string]Length >>]-[slicepoint], [[string]Byte Length]-[[sliceoffset]-[[string]Offset >>]]] 658 right <- String Slice[[string]Source >>, sliceoffset, [[string]Length >>]-[slicepoint], [[string]Byte Length]-[[sliceoffset]-[[string]Offset >>]]]
649 } 659 }
650 } 660 }
651 } 661 }