/* PSPP - computes sample statistics.
Copyright (C) 1997-9, 2000, 2006 Free Software Foundation, Inc.
- Written by Ben Pfaff <blp@gnu.org>.
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License as
02110-1301, USA. */
#include <stdlib.h>
-
#include <config.h>
#include "getl.h"
#include <libpspp/version.h>
#include <libpspp/alloc.h>
-#include <data/file-name.h>
-
struct getl_source
{
struct getl_source *included_from; /* File that this is nested inside. */
/* Initialize getl. */
struct source_stream *
-create_source_stream (void)
+create_source_stream (const char *initial_include_path)
{
struct source_stream *ss = xzalloc (sizeof (*ss));
ll_init (&ss->sources);
+#if 0
ds_init_cstr (&ss->the_include_path,
fn_getenv_default ("STAT_INCLUDE_PATH", include_path));
+#endif
+ ds_init_cstr (&ss->the_include_path, initial_include_path);
+
return ss;
}