1 /*
2     SuperCollider real time audio synthesis system
3     Copyright (c) 2002 James McCartney. All rights reserved.
4     http://www.audiosynth.com
5 
6     This program is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.
10 
11     This program is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.
15 
16     You should have received a copy of the GNU General Public License
17     along with this program; if not, write to the Free Software
18     Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301  USA
19 */
20 #pragma once
21 
22 #include "PyrObject.h"
23 
24 struct PyrFile : public PyrObjectHdr {
25     PyrSlot fileptr;
26 };
27 
28 void initFilePrimitives();
29 
30 long prFileDelete(VMGlobals* g, long numArgsPushed);
31 long prFileDeleteAll(VMGlobals* g, long numArgsPushed);
32 long prFileOpen(VMGlobals* g, long numArgsPushed);
33 long prFileClose(VMGlobals* g, long numArgsPushed);
34 long prFileSeek(VMGlobals* g, long numArgsPushed);
35 long prFilePos(VMGlobals* g, long numArgsPushed);
36 long prFileLength(VMGlobals* g, long numArgsPushed);
37 long prFileWrite(VMGlobals* g, long numArgsPushed);
38 long prFileReadLine(VMGlobals* g, long numArgsPushed);
39 
40 long prFilePutRGB(VMGlobals* g, long numArgsPushed);
41 long prFilePutInt32(VMGlobals* g, long numArgsPushed);
42 long prFilePutInt16(VMGlobals* g, long numArgsPushed);
43 long prFilePutInt8(VMGlobals* g, long numArgsPushed);
44 long prFilePutChar(VMGlobals* g, long numArgsPushed);
45 long prFilePutFloat(VMGlobals* g, long numArgsPushed);
46 long prFilePutDouble(VMGlobals* g, long numArgsPushed);
47 
48 long prFileGetRGB(VMGlobals* g, long numArgsPushed);
49 long prFileGetInt32(VMGlobals* g, long numArgsPushed);
50 long prFileGetInt16(VMGlobals* g, long numArgsPushed);
51 long prFileGetInt8(VMGlobals* g, long numArgsPushed);
52 long prFileGetChar(VMGlobals* g, long numArgsPushed);
53 long prFileGetFloat(VMGlobals* g, long numArgsPushed);
54 long prFileGetDouble(VMGlobals* g, long numArgsPushed);
55 
56 long prFilePutString(VMGlobals* g, long numArgsPushed);
57 long prFileRead(VMGlobals* g, long numArgsPushed);
58