Mercurial > repos > rhope
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 } |