Skip to content
Projeler
Gruplar
Parçacıklar
Yardım
Yükleniyor...
Oturum aç / Kaydol
Gezinmeyi değiştir
C
cpython
Proje
Proje
Ayrıntılar
Etkinlik
Cycle Analytics
Depo (repository)
Depo (repository)
Dosyalar
Kayıtlar (commit)
Dallar (branch)
Etiketler
Katkıda bulunanlar
Grafik
Karşılaştır
Grafikler
Konular (issue)
0
Konular (issue)
0
Liste
Pano
Etiketler
Kilometre Taşları
Birleştirme (merge) Talepleri
0
Birleştirme (merge) Talepleri
0
CI / CD
CI / CD
İş akışları (pipeline)
İşler
Zamanlamalar
Grafikler
Paketler
Paketler
Wiki
Wiki
Parçacıklar
Parçacıklar
Üyeler
Üyeler
Collapse sidebar
Close sidebar
Etkinlik
Grafik
Grafikler
Yeni bir konu (issue) oluştur
İşler
Kayıtlar (commit)
Konu (issue) Panoları
Kenar çubuğunu aç
Batuhan Osman TASKAYA
cpython
Commits
24a45e3c
Kaydet (Commit)
24a45e3c
authored
Şub 20, 1995
tarafından
Guido van Rossum
Dosyalara gözat
Seçenekler
Dosyalara Gözat
İndir
Eposta Yamaları
Sade Fark
ported to MPW, moved main() here
üst
850f44b4
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
31 additions
and
15 deletions
+31
-15
macglue.c
Mac/Python/macglue.c
+31
-15
No files found.
Mac/Python/macglue.c
Dosyayı görüntüle @
24a45e3c
...
...
@@ -48,6 +48,9 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#ifndef HAVE_UNIVERSAL_HEADERS
#define GetResourceSizeOnDisk(x) SizeResource(x)
typedef
DlgHookYDProcPtr
DlgHookYDUPP
;
#define NewDlgHookYDProc(userRoutine) ((DlgHookYDUPP) (userRoutine))
typedef
FileFilterYDProcPtr
FileFilterYDUPP
;
#endif
#include <signal.h>
...
...
@@ -588,14 +591,12 @@ error:
return
NULL
;
}
}
/*
** Helper routine for GetDirectory
*/
static
int
myhook_proc
(
item
,
theDialog
,
dataptr
)
short
item
;
DialogPtr
theDialog
;
void
*
dataptr
;
static
pascal
short
myhook_proc
(
short
item
,
DialogPtr
theDialog
,
void
*
dataptr
)
{
if
(
item
==
SELECTCUR_ITEM
)
{
item
=
sfItemCancelButton
;
...
...
@@ -623,7 +624,7 @@ PyMac_GetDirectory(dirfss)
myhook_upp
=
NewDlgHookYDProc
(
myhook_proc
);
upp_inited
=
1
;
}
CustomGetFile
((
FileFilterUPP
)
0
,
1
,
list
,
&
reply
,
GETDIR_ID
,
where
,
myhook_upp
,
CustomGetFile
((
FileFilter
YD
UPP
)
0
,
1
,
list
,
&
reply
,
GETDIR_ID
,
where
,
myhook_upp
,
NULL
,
NULL
,
NULL
,
(
void
*
)
&
select_clicked
);
reply
.
sfFile
.
name
[
0
]
=
0
;
...
...
@@ -786,7 +787,26 @@ PyMac_BuildEventRecord(EventRecord *e)
}
/* ---------- */
#ifndef USE_MAC_SHARED_LIBRARY
/* For normal application */
void
main
()
{
int
argc
;
char
**
argv
;
#ifdef __MWERKS__
SIOUXSettings
.
asktosaveonclose
=
0
;
SIOUXSettings
.
showstatusline
=
0
;
SIOUXSettings
.
tabspaces
=
4
;
#endif
argc
=
PyMac_GetArgv
(
&
argv
);
Py_Main
(
argc
,
argv
);
}
#else
/* USE_MAC_SHARED_LIBRARY */
/* Applet support */
/* Run a compiled Python Python script from 'PYC ' resource __main__ */
...
...
@@ -828,16 +848,10 @@ PyMac_InitApplet()
{
int
argc
;
char
**
argv
;
int
err
;
#ifdef __MWERKS__
/*
** Guido: you should fix this. You should arrange to have the
** __sinit routine from macshlglue.c called so you can stuff
** resources into the lib file.
*/
#ifdef USE_MAC_SHARED_LIBRARY
PyMac_AddLibResources
();
#else
KABOO
!
KABOO
!
#endif
#ifdef __MWERKS__
SIOUXSettings
.
asktosaveonclose
=
0
;
...
...
@@ -858,3 +872,5 @@ PyMac_InitApplet()
#endif
/* XXX Should we bother to Py_Exit(sts)? */
}
#endif
/* USE_MAC_SHARED_LIBRARY */
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment