Last change
on this file since 29 was
29,
checked in by landauf, 17 years ago
|
updated boost from 1_33_1 to 1_34_1
|
File size:
678 bytes
|
Line | |
---|
1 | /* Copyright Vladimir Prus 2003. Distributed under the Boost */ |
---|
2 | /* Software License, Version 1.0. (See accompanying */ |
---|
3 | /* file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt) */ |
---|
4 | |
---|
5 | #include "../native.h" |
---|
6 | #include "../timestamp.h" |
---|
7 | #include "../newstr.h" |
---|
8 | |
---|
9 | LIST *path_exists( PARSE *parse, FRAME *frame ) |
---|
10 | { |
---|
11 | LIST* l = lol_get( frame->args, 0 ); |
---|
12 | |
---|
13 | time_t time; |
---|
14 | timestamp(l->string, &time); |
---|
15 | if (time != 0) |
---|
16 | { |
---|
17 | return list_new(0, newstr("true")); |
---|
18 | } |
---|
19 | else |
---|
20 | { |
---|
21 | return L0; |
---|
22 | } |
---|
23 | } |
---|
24 | |
---|
25 | void init_path() |
---|
26 | { |
---|
27 | { |
---|
28 | char* args[] = { "location", 0 }; |
---|
29 | declare_native_rule("path", "exists", args, path_exists, 1); |
---|
30 | } |
---|
31 | |
---|
32 | } |
---|
Note: See
TracBrowser
for help on using the repository browser.