mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

Use mktemp to create a truely unique temporary file name. Thanks to

Browse source 
Stefan Nordhausen!
This commit is contained in:
Marius Vollmer 2004-01-10 21:20:55 +00:00
parent c95243c71c
commit 27fca65629
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/guile-snarf.in
View file

@ -1,7 +1,7 @@
#!/bin/sh
# Extract the initialization actions from source files.
#
# Copyright (C) 1996, 97, 98, 99, 2000, 2001, 2002 Free Software Foundation, Inc.
# Copyright (C) 1996, 97, 98, 99, 2000, 2001, 2002, 2004 Free Software Foundation, Inc.
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@ -69,7 +69,7 @@ fi
# set vars and handler -- handle CPP override
cpp_ok_p=false
temp="/tmp/snarf.$$"
temp=`mktemp -t guile-snarf.XXXXXX` || exit 1
if [ x"$CPP" = x ] ; then cpp="@CPP@" ; else cpp="$CPP" ; fi
trap "rm -f $temp" 0 1 2 15