' doc.bi #pragma once type DocState path as string modified as integer end type declare sub Doc_Init( byref d as DocState ) declare sub Doc_SetPath( byref d as DocState, byref p as string ) declare sub Doc_SetModified( byref d as DocState, byval m as integer )