2009-08-29 17:59:02 +00:00

8 lines
385 B
Plaintext

# -*- mode: snippet -*-
# key: open
# contributor: Translated from TextMate Snippet
# name: Open File
# --
open(unit=${1:iounit}, file=${2:name}, iostat=${3:ios}, &
status="${4:old/new/replace/scratch/unknown}", action="${5:read/write/readwrite}", access="${7:sequential/direct}"${7/(direct)$|.*/(?1:, recl=)/}$0)
if ( $3 /= 0 ) stop "Error opening file ${2/[\"\'](.*)[\"\']/$1/}"