yasnippet/extras/imported/f90-mode/Open/Output File.yasnippet

8 lines
272 B
Plaintext

# -*- mode: snippet -*-
# key: open
# contributor: Translated from TextMate Snippet
# name: Output File
# --
open(unit=${1:iounit}, file=${2:name}, iostat=${3:ios}, status="${4:new}", action="${5:write}")
if ( $3 /= 0 ) stop "Error opening file ${2/[\"\'](.*)[\"\']/$1/}"