aboutsummaryrefslogtreecommitdiff
path: root/jim-readdir.c
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2010-08-17 08:21:39 +1000
committerSteve Bennett <steveb@workware.net.au>2010-10-15 11:02:50 +1000
commitcbc635e8f4de48408768053a976dc7bd7177ba7a (patch)
treebca1549fa15afc234868b5c46cd8a4a486f16b8f /jim-readdir.c
parent75af5a8f20800977aabfd95fdfc403f851f8c459 (diff)
downloadjimtcl-cbc635e8f4de48408768053a976dc7bd7177ba7a.zip
jimtcl-cbc635e8f4de48408768053a976dc7bd7177ba7a.tar.gz
jimtcl-cbc635e8f4de48408768053a976dc7bd7177ba7a.tar.bz2
Clean up the indentation mess
Use 'indent'. Not perfect, but at least consistent. Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'jim-readdir.c')
-rw-r--r--jim-readdir.c29
1 files changed, 13 insertions, 16 deletions
diff --git a/jim-readdir.c b/jim-readdir.c
index 14ee2ab..3f49ed4 100644
--- a/jim-readdir.c
+++ b/jim-readdir.c
@@ -1,3 +1,4 @@
+
/*
* (c) 2008 Steve Bennett <steveb@worware.net.au>
*
@@ -65,11 +66,10 @@
* Standard TCL result.
*-----------------------------------------------------------------------------
*/
-int
-Jim_ReaddirCmd (Jim_Interp *interp, int argc, Jim_Obj *const *argv)
+int Jim_ReaddirCmd(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
{
- const char *dirPath;
- DIR *dirPtr;
+ const char *dirPath;
+ DIR *dirPtr;
struct dirent *entryPtr;
int nocomplain = 0;
@@ -83,8 +83,8 @@ Jim_ReaddirCmd (Jim_Interp *interp, int argc, Jim_Obj *const *argv)
dirPath = Jim_GetString(argv[1 + nocomplain], NULL);
- dirPtr = opendir (dirPath);
- if (dirPtr == NULL) {
+ dirPtr = opendir(dirPath);
+ if (dirPtr == NULL) {
if (nocomplain) {
return JIM_OK;
}
@@ -95,27 +95,24 @@ Jim_ReaddirCmd (Jim_Interp *interp, int argc, Jim_Obj *const *argv)
Jim_SetResult(interp, Jim_NewListObj(interp, NULL, 0));
- while ((entryPtr = readdir (dirPtr)) != NULL) {
- if (entryPtr->d_name [0] == '.') {
- if (entryPtr->d_name [1] == '\0') {
+ while ((entryPtr = readdir(dirPtr)) != NULL) {
+ if (entryPtr->d_name[0] == '.') {
+ if (entryPtr->d_name[1] == '\0') {
continue;
}
- if ((entryPtr->d_name [1] == '.') &&
- (entryPtr->d_name [2] == '\0'))
+ if ((entryPtr->d_name[1] == '.') && (entryPtr->d_name[2] == '\0'))
continue;
}
- Jim_ListAppendElement(interp, Jim_GetResult(interp), Jim_NewStringObj(interp, entryPtr->d_name, -1));
+ Jim_ListAppendElement(interp, Jim_GetResult(interp), Jim_NewStringObj(interp,
+ entryPtr->d_name, -1));
}
- closedir (dirPtr);
+ closedir(dirPtr);
return JIM_OK;
}
int Jim_readdirInit(Jim_Interp *interp)
{
- if (Jim_PackageProvide(interp, "readdir", "1.0", JIM_ERRMSG) != JIM_OK) {
- return JIM_ERR;
- }
Jim_CreateCommand(interp, "readdir", Jim_ReaddirCmd, NULL, NULL);
return JIM_OK;
}