[Simple-evcorr-users] is there something like a switch statement or best alternative?

[Bond Masuda]

Hi,

I need to do something like this:

lcall %result %input -> ( sub { ... } ) ; \
switch %result  \
    case 'x': ( <action list A> ) \
    case 'y': ( <action list B> ) \
    case 'z': ( <action list C> )


right now, I'm implementing this like this:

lcall %result %input -> ( sub {...} ); \
if %result ( \
    eval %is_x ( \
        if( %result eq 'x' ) { return 1; } \
        return 0; \
    );\
    if %is_x ( \
        <action list A> \
    );\
    eval %is_y ( \
        if( %result eq 'y' ) { return 1; } \
        return 0; \
    );\
    if %is_y ( \
        <action list B> \
    );\
    eval %is_z ( \
        if( %result eq 'z' ) { return 1; } \
        return 0; \
    );\
    if %is_z ( \
        <action list C> \
    );\
);

I'm hoping someone can show me a better way.

Thank you,
Bond


------------------------------------------------------------------------------
_______________________________________________
Simple-evcorr-users mailing list
Simple-evcorr-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/simple-evcorr-users