source: buchla-68k/libsm/strrtrm.c@ 8b685e0

/*
   =============================================================================
        strrtrm() -- trim trailing blanks from a string, in-place
        Version 1 -- 1988-08-19 -- D.N. Lynx Crowe

        Returns a pointer to the string.
   =============================================================================
*/

#include "ram.h"

int8_t *strrtrm(int8_t *s)
{
        register int8_t *lp, *rp;

        lp = s;
        rp = s;

        while (*rp)
                ++rp;

        while ((int32_t)(--rp) GE (int32_t)lp) {

                if (*rp EQ ' ')
                        *rp = '\0';
                else
                        break;
        }

        return(lp);
}