#include <locale.h>
#include <stdio.h>
#include <stdlib.h>

#include "mex.h"

void
mexFunction (int nlhs, mxArray* plhs[],
             int nrhs, const mxArray* prhs[])
{
  char *lang_env = getenv ("LANG");
  mexPrintf ("LANG: %s\n", lang_env ? lang_env : "is not set");
  mexPrintf ("LC_COLLATE: %s\n", setlocale (LC_COLLATE, NULL));
  mexPrintf ("LC_CTYPE: %s\n", setlocale (LC_CTYPE, NULL));
  mexPrintf ("LC_MONETARY: %s\n", setlocale (LC_MONETARY, NULL));
  mexPrintf ("LC_NUMERIC: %s\n", setlocale (LC_NUMERIC, NULL));
  mexPrintf ("LC_TIME: %s\n", setlocale (LC_TIME, NULL));
  mexPrintf ("LC_MESSAGES: %s\n", setlocale (LC_MESSAGES, NULL));
  mexPrintf ("LC_ALL: %s\n", setlocale (LC_ALL, NULL));
}