"panic" test program

crux-00011: $SRC/silly/str.c

#include "str/str.h"
#include "utils/panic.h"

int
main (int argc, char * argv[])
{
  struct str s = {0};
  int x;

  for (x = 1; x < argc; ++x)
    {
      str_append0 (&s, argv[x]);
      str_adjoin (&s, ' ');
    }

  *str_view (&s, str_length (&s) - 1, 1) = '\n';

  str_adjoin (&s, 0);

  panic (str_view (&s, 0, str_length (&s)));

  return 3;                     /* not reached, hopefully */
}



/*

    This file is part of Crux.

    Crux is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    Crux is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with Crux.  If not, see <http://www.gnu.org/licenses/>.

*/