summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorJim Meyering <meyering@redhat.com>2009-08-11 17:17:08 +0200
committerJim Meyering <meyering@redhat.com>2009-08-13 14:45:34 +0200
commit1f0810eb3a98cbfd347af59b6b9bc624ddff6028 (patch)
tree45d9599e7d3a156665103acf4c8234d677d2d5fc /src
parentd70eb3c45bc93f9e9c7ba735e7209d0ede0e505b (diff)
downloadlibguestfs-1f0810eb3a98cbfd347af59b6b9bc624ddff6028.tar.gz
libguestfs-1f0810eb3a98cbfd347af59b6b9bc624ddff6028.tar.xz
libguestfs-1f0810eb3a98cbfd347af59b6b9bc624ddff6028.zip
generator.ml: constify do_mkdtemp
* daemon/dir.c (do_mkdtemp): Rewrite for a "const" parameter. * src/generator.ml (mkdtemp): Declare parameter to be of type Pathname.
Diffstat (limited to 'src')
-rwxr-xr-xsrc/generator.ml6
1 files changed, 2 insertions, 4 deletions
diff --git a/src/generator.ml b/src/generator.ml
index 49fd3ce8..60e3a028 100755
--- a/src/generator.ml
+++ b/src/generator.ml
@@ -2621,8 +2621,7 @@ containing C<dir>.
It is an interface to the L<scrub(1)> program. See that
manual page for more details.");
-(* FIXME: make this a WritableString? *)
- ("mkdtemp", (RString "dir", [String "template"]), 117, [],
+ ("mkdtemp", (RString "dir", [Pathname "template"]), 117, [],
[InitBasicFS, Always, TestRun (
[["mkdir"; "/tmp"];
["mkdtemp"; "/tmp/tmpXXXXXX"]])],
@@ -4762,7 +4761,7 @@ and generate_daemon_actions () =
| Pathname n ->
pr " char *%s = args.%s;\n" n n;
pr " ABS_PATH (%s, goto done);\n" n;
- | Device n ->
+ | Device n ->
pr " char *%s = args.%s;\n" n n;
pr " RESOLVE_DEVICE (%s, goto done);" n;
| String n -> pr " char *%s = args.%s;\n" n n
@@ -6843,7 +6842,6 @@ DESTROY (g)
iteri (
fun i ->
function
- (* FIXME: ? *)
| Pathname n | Device n | String n | FileIn n | FileOut n ->
pr " char *%s;\n" n
| OptString n ->