aboutsummaryrefslogtreecommitdiffstats
path: root/libparc/parc/algol/parc_Environment.c
diff options
context:
space:
mode:
Diffstat (limited to 'libparc/parc/algol/parc_Environment.c')
-rw-r--r--libparc/parc/algol/parc_Environment.c45
1 files changed, 0 insertions, 45 deletions
diff --git a/libparc/parc/algol/parc_Environment.c b/libparc/parc/algol/parc_Environment.c
deleted file mode 100644
index 2955a139..00000000
--- a/libparc/parc/algol/parc_Environment.c
+++ /dev/null
@@ -1,45 +0,0 @@
-/*
- * Copyright (c) 2017 Cisco and/or its affiliates.
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at:
- *
- * http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
- */
-
-/**
- */
-#include <config.h>
-
-#include <sys/types.h>
-#include <pwd.h>
-#include <stdlib.h>
-#include <unistd.h>
-
-#include <parc/algol/parc_Environment.h>
-#include <parc/algol/parc_File.h>
-
-const char *
-parcEnvironment_GetHomeDirectory(void)
-{
- char *result = getenv("HOME");
- return result;
-}
-
-PARCFile *
-parcEnvironment_HomeDirectory(void)
-{
- char *path;
-
- if ((path = getenv("HOME")) == NULL) {
- path = getpwuid(getuid())->pw_dir;
- }
-
- return parcFile_Create(path);
-}