Menu
▾
▴
ro-oslib-commits — list to notify of all commits to OSLib
You can subscribe to this list here.
| 2002 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
(39) |
Dec
(23) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2003 |
Jan
(4) |
Feb
(8) |
Mar
|
Apr
|
May
|
Jun
(25) |
Jul
(2) |
Aug
(3) |
Sep
(9) |
Oct
|
Nov
(2) |
Dec
(21) |
| 2004 |
Jan
(57) |
Feb
|
Mar
|
Apr
|
May
(49) |
Jun
|
Jul
(8) |
Aug
(5) |
Sep
(2) |
Oct
(2) |
Nov
(2) |
Dec
|
| 2005 |
Jan
(2) |
Feb
|
Mar
(12) |
Apr
|
May
(5) |
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
(17) |
| 2006 |
Jan
(5) |
Feb
(1) |
Mar
|
Apr
|
May
|
Jun
(3) |
Jul
(4) |
Aug
(5) |
Sep
|
Oct
|
Nov
|
Dec
|
| 2007 |
Jan
(3) |
Feb
|
Mar
|
Apr
(18) |
May
(13) |
Jun
(17) |
Jul
|
Aug
|
Sep
|
Oct
|
Nov
(4) |
Dec
|
|
From: <th...@us...> - 2002-12-21 12:06:41
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/Computer/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv27855/Source/Computer/oslib
Modified Files:
CD.swi
Log Message:
Added definition for CD_SCSIUserOp.
Index: CD.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/Computer/oslib/CD.swi,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** CD.swi 2 Dec 2002 18:28:09 -0000 1.2
--- CD.swi 21 Dec 2002 12:06:38 -0000 1.3
***************
*** 2,6 ****
AUTHOR "Simon Middleton, Uniqueway Ltd; Jonathan Coxhead, jon...@do..., 12 July 1995";
! NEEDS OS;
CONST
--- 2,6 ----
AUTHOR "Simon Middleton, Uniqueway Ltd; Jonathan Coxhead, jon...@do..., 12 July 1995";
! NEEDS OS, SCSI;
CONST
***************
*** 479,483 ****
CD_UseReadDataScatter = CD_RegisterFlags: &40000,
CD_UseSeekDataProprietary = CD_RegisterFlags: &80000,
! CD_UseSeekDataScatter = CD_RegisterFlags: &100000;
TYPE
CD_RegisterBlock =
--- 479,484 ----
CD_UseReadDataScatter = CD_RegisterFlags: &40000,
CD_UseSeekDataProprietary = CD_RegisterFlags: &80000,
! CD_UseSeekDataScatter = CD_RegisterFlags: &100000,
! CD_UseSCSIOp = CD_RegisterFlags: &200000 "RISC O S 5+";
TYPE
CD_RegisterBlock =
***************
*** 607,609 ****
SWI CD_SetAudioParms = (NUMBER &4126A "Gets audio parameters - see
! individual reason codes - version 2.22+", ABSENT)
--- 608,626 ----
SWI CD_SetAudioParms = (NUMBER &4126A "Gets audio parameters - see
! individual reason codes - version 2.22+", ABSENT);
!
! SWI CD_SCSIUserOp =
! ( NUMBER &4126B "RISC O S 5+",
! ENTRY
! ( R0 = .Bits: op,
! R1 = .Int: block_size,
! R2 -> SCSI_OpBlock: block,
! R3 = .Ref .Data: start_addr,
! R4 = .Int: length,
! R5 = .Int: timeout,
! R7 -> CD_ControlBlock: control
! ),
! EXIT
! ( R3 = .Ref .Data: next_addr,
! R4! = .Int: undone
! ) )
|
|
From: <th...@us...> - 2002-12-21 12:06:41
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs
In directory sc8-pr-cvs1:/tmp/cvs-serv27855/docs
Modified Files:
ChangeLog
Log Message:
Added definition for CD_SCSIUserOp.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v
retrieving revision 1.28
retrieving revision 1.29
diff -C2 -d -r1.28 -r1.29
*** ChangeLog 21 Dec 2002 11:50:30 -0000 1.28
--- ChangeLog 21 Dec 2002 12:06:37 -0000 1.29
***************
*** 11,14 ****
--- 11,15 ----
by OS_PlatformFeatures. (Tom Hughes)
- Adds new definitions for UCS font manager. (Tom Hughes)
+ - Defines CD_SCSIUserOp. (Tom Hughes)
OSLib Version 6.40 - Tony van der Hoff - 28/11/2002
|
|
From: <th...@us...> - 2002-12-21 11:50:33
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs
In directory sc8-pr-cvs1:/tmp/cvs-serv24778/docs
Modified Files:
ChangeLog
Log Message:
Added new type and SWI definitions for the UCS font manager.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v
retrieving revision 1.27
retrieving revision 1.28
diff -C2 -d -r1.27 -r1.28
*** ChangeLog 21 Dec 2002 11:17:30 -0000 1.27
--- ChangeLog 21 Dec 2002 11:50:30 -0000 1.28
***************
*** 10,13 ****
--- 10,14 ----
- Adds several new 32-bit related flags that can be returned
by OS_PlatformFeatures. (Tom Hughes)
+ - Adds new definitions for UCS font manager. (Tom Hughes)
OSLib Version 6.40 - Tony van der Hoff - 28/11/2002
|
|
From: <th...@us...> - 2002-12-21 11:50:33
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv24778/Source/User/oslib
Modified Files:
Font.swi
Log Message:
Added new type and SWI definitions for the UCS font manager.
Index: Font.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/Font.swi,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** Font.swi 13 Mar 2002 13:45:06 -0000 1.4
--- Font.swi 21 Dec 2002 11:50:31 -0000 1.5
***************
*** 38,41 ****
--- 38,43 ----
// V6.22 TV
Font_BlendFont = Font_StringFlags: 0b100000000000 "Use when painting or scanning",
+ Font_Given16Bit = Font_StringFlags: 0b1000000000000 "Use when painting or scanning - RISC O S 5+",
+ Font_Given32Bit = Font_StringFlags: 0b10000000000000 "Use when painting or scanning - RISC O S 5+",
Font_ReturnCaretPos = Font_StringFlags: 0b100000000000000000 "Use when scanning",
Font_ReturnBBox = Font_StringFlags: 0b1000000000000000000 "Use when scanning",
***************
*** 598,601 ****
--- 600,634 ----
Font_ShortKernPair: pairs ...
): short_info
+ ),
+
+ Font_ShortKernPairUCS =
+ .Struct
+ ( .Char: c1,
+ .Char: c2,
+ .Short: kern
+ ),
+
+ Font_LongKernPairUCS =
+ .Struct
+ ( .Short: c1,
+ .Short: c2,
+ .Short: xkern,
+ .Short: ykern
+ ),
+
+ Font_KernInfoUCS =
+ .Union
+ ( .Struct
+ ( [256] .Int: table,
+ .Int: size,
+ Font_KernFlags: flags,
+ Font_LongKernPairUCS: pairs ...
+ ): long_info,
+ .Struct
+ ( [256] .Int: table,
+ .Int: size,
+ Font_KernFlags: flags,
+ Font_ShortKernPairUCS: pairs ...
+ ): short_info
);
***************
*** 611,615 ****
// R4 = .Ref Font_MiscInfo: misc_info,
R4 = .Ref Font_MetricsMiscInfo: misc_info, // TV V6.33
! R5 = .Ref Font_KernInfo: kern_info,
R6 # 0, //zero
R7 # 0 //zero
--- 644,648 ----
// R4 = .Ref Font_MiscInfo: misc_info,
R4 = .Ref Font_MetricsMiscInfo: misc_info, // TV V6.33
! R5 = .Ref Font_KernInfo: kern_info "ignored in RISC O S 5+",
R6 # 0, //zero
R7 # 0 //zero
***************
*** 627,630 ****
--- 660,690 ----
);
+ SWI
+ Font_ReadFontMetricsUCS = //not RISC O S 2
+ ( NUMBER 0x4009F "Reads the full metrics information held in a font's
+ IntMetrics file for UCS fonts - RISC O S 5+",
+ ENTRY
+ ( R0 = Font_F: font,
+ R1 # 0, // not useful with UCS fonts
+ R2 # 0, // not useful with UCS fonts
+ R3 # 0, // not useful with UCS fonts
+ // R4 = .Ref Font_MiscInfo: misc_info,
+ R4 = .Ref Font_MetricsMiscInfo: misc_info, // TV V6.33
+ R5 # 0, // ignored by the UCS font manager
+ R6 = .Ref Font_KernInfoUCS: kern_info,
+ R7 # 0 //zero
+ ),
+ EXIT
+ ( R0 = Font_MetricFlags: flags,
+ R1?,
+ R2?,
+ R3?,
+ R4 = .Int: misc_info_size,
+ R5?,
+ R6 = .Int: kern_info_size,
+ R7? //undefined
+ )
+ );
+
TYPE Font_DecodeFlags = .Bits;
CONST
***************
*** 738,741 ****
--- 798,813 ----
EXIT
( R2! = Font_CharacteristicFlags: flags
+ ) ),
+
+ Font_EnumerateCharacters =
+ ( NUMBER 0x400A9 "Enumerate mapped characters - RISC O S 5+",
+ ENTRY
+ ( R0 = Font_F: font,
+ R1 = .Int: character
+ ),
+ EXIT
+ ( R0?,
+ R1 = .Int: next_character,
+ R2 = .Int: internal_character_code
) );
|
|
From: <th...@us...> - 2002-12-21 11:17:34
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/Core/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv18366/Source/Core/oslib
Modified Files:
OS.swi
Log Message:
Add new OS_PlatformFeatures flags for 32-bit operating systems.
Index: OS.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/Core/oslib/OS.swi,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** OS.swi 2 Dec 2002 17:24:15 -0000 1.10
--- OS.swi 21 Dec 2002 11:17:31 -0000 1.11
***************
*** 2293,2297 ****
OS_PlatformFeatureFlags: %100,
OS_PlatformPipelineLength2 = OS_PlatformFeatureFlags: %1000,
! OS_PlatformFullEarlyDataAborts = OS_PlatformFeatureFlags: %10000;
SWI OS_PlatformFeatures = //RO3.7+
--- 2293,2299 ----
OS_PlatformFeatureFlags: %100,
OS_PlatformPipelineLength2 = OS_PlatformFeatureFlags: %1000,
! OS_PlatformFullEarlyDataAborts = OS_PlatformFeatureFlags: %10000,
! OS_Platform32BitOS = OS_PlatformFeatureFlags: %100000 "RISC O S 5+",
! OS_Platform26BitModeNotAvailable = OS_PlatformFeatureFlags: %1000000 "RISC O S 5+";
SWI OS_PlatformFeatures = //RO3.7+
|
|
From: <th...@us...> - 2002-12-21 11:17:33
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs
In directory sc8-pr-cvs1:/tmp/cvs-serv18366/docs
Modified Files:
ChangeLog
Log Message:
Add new OS_PlatformFeatures flags for 32-bit operating systems.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v
retrieving revision 1.26
retrieving revision 1.27
diff -C2 -d -r1.26 -r1.27
*** ChangeLog 21 Dec 2002 11:01:35 -0000 1.26
--- ChangeLog 21 Dec 2002 11:17:30 -0000 1.27
***************
*** 8,11 ****
--- 8,13 ----
- Defines Service_TaskManagerAcknowledgements. (Tom Hughes)
- Defines Draw_FillClipped and Draw_StrokeClipped. (Tom Hughes)
+ - Adds several new 32-bit related flags that can be returned
+ by OS_PlatformFeatures. (Tom Hughes)
OSLib Version 6.40 - Tony van der Hoff - 28/11/2002
|
|
From: <th...@us...> - 2002-12-21 11:01:40
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv14983/Source/User/oslib
Modified Files:
Draw.swi
Log Message:
Define Draw_FillClipped and Draw_StrokeClipped.
Index: Draw.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/Draw.swi,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Draw.swi 9 Mar 2002 11:12:51 -0000 1.1
--- Draw.swi 21 Dec 2002 11:01:36 -0000 1.2
***************
*** 125,128 ****
--- 125,136 ----
TYPE Draw_Path = .Struct ([1] Draw_PathElement: elements);
+ TYPE
+ Draw_ClipDescriptor =
+ .Struct
+ ( .Ref Draw_Path: path,
+ Draw_FillStyle: fill_style,
+ OS_Trfm: trfm
+ );
+
CONST
//Draw module errors
***************
*** 216,219 ****
--- 224,255 ----
),
EXIT (R0! = .Ref .Data: end_or_used)
+ ),
+
+ Draw_FillClipped =
+ ( NUMBER 0x4070C "Processes a path and sends it to the VDU, filling the
+ interior portion and clipping against the clip descriptor - RISC
+ O S 5+",
+ ENTRY
+ ( R0 -> Draw_Path: path,
+ R1 = Draw_FillStyle: fill_style,
+ R2 -> OS_Trfm: trfm,
+ R3 = .Int: flatness,
+ R4 -> Draw_ClipDescriptor: clip_descriptor
+ )
+ ),
+
+ Draw_StrokeClipped =
+ ( NUMBER 0x4070E "Processes a path and sends it to the VDU after clipping
+ against the clip descriptor - RISC O S 5+",
+ ENTRY
+ ( R0 -> Draw_Path: path,
+ R1 = Draw_FillStyle: fill_style,
+ R2 -> OS_Trfm: trfm,
+ R3 = .Int: flatness,
+ R4 = .Int: thickness,
+ R5 -> Draw_LineStyle: line_style,
+ R6 -> Draw_DashPattern: dash_pattern,
+ R7 -> Draw_ClipDescriptor: clip_descriptor
+ )
);
|
|
From: <th...@us...> - 2002-12-21 11:01:40
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs
In directory sc8-pr-cvs1:/tmp/cvs-serv14983/docs
Modified Files:
ChangeLog
Log Message:
Define Draw_FillClipped and Draw_StrokeClipped.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v
retrieving revision 1.25
retrieving revision 1.26
diff -C2 -d -r1.25 -r1.26
*** ChangeLog 15 Dec 2002 14:42:32 -0000 1.25
--- ChangeLog 21 Dec 2002 11:01:35 -0000 1.26
***************
*** 7,10 ****
--- 7,11 ----
- Defines Message_ScreenEdgeNotification. (Tom Hughes)
- Defines Service_TaskManagerAcknowledgements. (Tom Hughes)
+ - Defines Draw_FillClipped and Draw_StrokeClipped. (Tom Hughes)
OSLib Version 6.40 - Tony van der Hoff - 28/11/2002
|
|
From: <th...@us...> - 2002-12-15 14:42:37
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv24940/Source/User/oslib
Modified Files:
TaskManager.swi
Log Message:
Added Service_TaskManagerAcknowledgements.
Index: TaskManager.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/TaskManager.swi,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** TaskManager.swi 20 Nov 2002 19:33:51 -0000 1.2
--- TaskManager.swi 15 Dec 2002 14:42:32 -0000 1.3
***************
*** 53,56 ****
--- 53,72 ----
TaskManager_ShutdownPowerOff = TaskManager_ShutdownFlags: %1000000 "RISC O S 4+";
+ TYPE TaskManager_GroupID = .Bits;
+ CONST
+ TaskManager_GroupOverview = TaskManager_GroupID: 0x0000
+ "system overview - for RISCOS Ltd use only",
+ TaskManager_GroupRequired = TaskManager_GroupID: 0x1000
+ "system required components - for RISCOS Ltd use only",
+ TaskManager_GroupSubsidiary = TaskManager_GroupID: 0x2000
+ "subsidiary components - for RISCOS Ltd use only",
+ TaskManager_GroupCommercial = TaskManager_GroupID: 0x3000
+ "commercial components",
+ TaskManager_GroupFreeware = TaskManager_GroupID: 0x4000
+ "freeware components",
+ TaskManager_GroupUser = TaskManager_GroupID: 0x5000
+ "user components - for private use only",
+ TaskManager_GroupMask = TaskManager_GroupID: 0xf000;
+
SWI
TaskManager_Shutdown =
***************
*** 65,67 ****
--- 81,91 ----
ENTRY
( R0 -> .Char: path_name
+ ) );
+
+ SWI
+ Service_TaskManagerAcknowledgements =
+ ( NUMBER 0x30,
+ ENTRY
+ ( R1 # 0x42680 "Notify Task Manager of licence acknowledgements - RISC O S 4 only",
+ R2 = .Ref .Asm: add_message
) )
|
|
From: <th...@us...> - 2002-12-15 14:42:35
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs
In directory sc8-pr-cvs1:/tmp/cvs-serv24940/docs
Modified Files:
ChangeLog
Log Message:
Added Service_TaskManagerAcknowledgements.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v
retrieving revision 1.24
retrieving revision 1.25
diff -C2 -d -r1.24 -r1.25
*** ChangeLog 15 Dec 2002 14:23:44 -0000 1.24
--- ChangeLog 15 Dec 2002 14:42:32 -0000 1.25
***************
*** 6,9 ****
--- 6,10 ----
- Defines Debugger_DisassembleThumb. (Tom Hughes)
- Defines Message_ScreenEdgeNotification. (Tom Hughes)
+ - Defines Service_TaskManagerAcknowledgements. (Tom Hughes)
OSLib Version 6.40 - Tony van der Hoff - 28/11/2002
|
|
From: <th...@us...> - 2002-12-15 14:23:46
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs
In directory sc8-pr-cvs1:/tmp/cvs-serv20388/docs
Modified Files:
ChangeLog
Log Message:
Added Message_ScreenEdgeNotification.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v
retrieving revision 1.23
retrieving revision 1.24
diff -C2 -d -r1.23 -r1.24
*** ChangeLog 15 Dec 2002 12:24:19 -0000 1.23
--- ChangeLog 15 Dec 2002 14:23:44 -0000 1.24
***************
*** 5,8 ****
--- 5,9 ----
other new ADFS SWIs which are, as yet, undocumented. (Tom Hughes)
- Defines Debugger_DisassembleThumb. (Tom Hughes)
+ - Defines Message_ScreenEdgeNotification. (Tom Hughes)
OSLib Version 6.40 - Tony van der Hoff - 28/11/2002
|
|
From: <th...@us...> - 2002-12-15 14:23:46
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv20388/Source/User/oslib
Modified Files:
Wimp.swi
Log Message:
Added Message_ScreenEdgeNotification.
Index: Wimp.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/Wimp.swi,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** Wimp.swi 2 Dec 2002 18:28:14 -0000 1.10
--- Wimp.swi 15 Dec 2002 14:23:44 -0000 1.11
***************
*** 382,403 ****
//WIMP messages (these must be cast)
CONST
! Message_MenuWarning = .Bits: 0x400C0,
! Message_ModeChange = .Bits: 0x400C1,
! Message_TaskInitialise = .Bits: 0x400C2,
! Message_TaskCloseDown = .Bits: 0x400C3,
! Message_SlotSize = .Bits: 0x400C4,
! Message_SetSlot = .Bits: 0x400C5,
! Message_TaskNameRq = .Bits: 0x400C6,
! Message_TaskNameIs = .Bits: 0x400C7,
! Message_TaskStarted = .Bits: 0x400C8,
! Message_MenusDeleted = .Bits: 0x400C9,
! Message_Iconise = .Bits: 0x400CA,
! Message_WindowClosed = .Bits: 0x400CB,
! Message_WindowInfo = .Bits: 0x400CC,
! Message_Swap = .Bits: 0x400CD,
! Message_ToolsChanged = .Bits: 0x400CE,
! Message_FontChanged = .Bits: 0x400CF,
! Message_IconiseAt = .Bits: 0x400D0 "RISC O S 4+",
! Message_ToggleBackdrop = .Bits: 0x400D1 "RISC O S 4.20+";
//Flags for Wimp_DragBox - RISC O S 4+
--- 382,404 ----
//WIMP messages (these must be cast)
CONST
! Message_MenuWarning = .Bits: 0x400C0,
! Message_ModeChange = .Bits: 0x400C1,
! Message_TaskInitialise = .Bits: 0x400C2,
! Message_TaskCloseDown = .Bits: 0x400C3,
! Message_SlotSize = .Bits: 0x400C4,
! Message_SetSlot = .Bits: 0x400C5,
! Message_TaskNameRq = .Bits: 0x400C6,
! Message_TaskNameIs = .Bits: 0x400C7,
! Message_TaskStarted = .Bits: 0x400C8,
! Message_MenusDeleted = .Bits: 0x400C9,
! Message_Iconise = .Bits: 0x400CA,
! Message_WindowClosed = .Bits: 0x400CB,
! Message_WindowInfo = .Bits: 0x400CC,
! Message_Swap = .Bits: 0x400CD,
! Message_ToolsChanged = .Bits: 0x400CE,
! Message_FontChanged = .Bits: 0x400CF,
! Message_IconiseAt = .Bits: 0x400D0 "RISC O S 4+",
! Message_ToggleBackdrop = .Bits: 0x400D1 "RISC O S 4.20+",
! Message_ScreenEdgeNotification = .Bits: 0x400D2 "RISC O S 4.20+";
//Flags for Wimp_DragBox - RISC O S 4+
***************
*** 1029,1032 ****
--- 1030,1042 ----
TYPE
+ Wimp_ScreenEdgeNotificationFlags = .Bits;
+
+ CONST
+ Wimp_ScreenEdgeNotificationLeft = Wimp_ScreenEdgeNotificationFlags: 0x1,
+ Wimp_ScreenEdgeNotificationBottom = Wimp_ScreenEdgeNotificationFlags: 0x2,
+ Wimp_ScreenEdgeNotificationRight = Wimp_ScreenEdgeNotificationFlags: 0x4,
+ Wimp_ScreenEdgeNotificationTop = Wimp_ScreenEdgeNotificationFlags: 0x8;
+
+ TYPE
Wimp_MessageMenuWarning =
.Struct
***************
*** 1120,1123 ****
--- 1130,1138 ----
),
+ Wimp_MessageScreenEdgeNotification =
+ .Struct
+ ( Wimp_ScreenEdgeNotificationFlags: flags
+ ),
+
// New style Message Blocks
***************
*** 1216,1219 ****
--- 1231,1239 ----
.Struct: Wimp_MessageHeader
( Wimp_ToggleBackdropFlags: flags
+ ),
+
+ Wimp_FullMessageScreenEdgeNotification =
+ .Struct: Wimp_MessageHeader
+ ( Wimp_ScreenEdgeNotificationFlags: flags
);
|
|
From: <th...@us...> - 2002-12-15 12:24:23
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs
In directory sc8-pr-cvs1:/tmp/cvs-serv24877/docs
Modified Files:
ChangeLog
Log Message:
Added Debugger_DisassembleThumb.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v
retrieving revision 1.22
retrieving revision 1.23
diff -C2 -d -r1.22 -r1.23
*** ChangeLog 15 Dec 2002 11:35:33 -0000 1.22
--- ChangeLog 15 Dec 2002 12:24:19 -0000 1.23
***************
*** 4,7 ****
--- 4,8 ----
- Defines ADFS_DiscOp64 for RISC O S 5 and adds placeholders for two
other new ADFS SWIs which are, as yet, undocumented. (Tom Hughes)
+ - Defines Debugger_DisassembleThumb. (Tom Hughes)
OSLib Version 6.40 - Tony van der Hoff - 28/11/2002
|
|
From: <th...@us...> - 2002-12-15 12:24:23
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/Core/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv24877/Source/Core/oslib
Modified Files:
Debugger.swi
Log Message:
Added Debugger_DisassembleThumb.
Index: Debugger.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/Core/oslib/Debugger.swi,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Debugger.swi 9 Mar 2002 10:57:59 -0000 1.1
--- Debugger.swi 15 Dec 2002 12:24:20 -0000 1.2
***************
*** 15,21 ****
Error_DebugNoWorkspace = .Bits: &808 "No room for debug module workspace";
! SWI Debugger_Disassemble = (NUMBER 0x40380 "Disassembles an instruction",
! ENTRY (R0 = .Int: instruction, R1 = .Ref .Int: address),
! EXIT (R1 -> .String: disassembly, R2 = .Int: used))
//SWI Debugger_Flags = (NUMBER 0x40381*, "Darren Salt's Debugger Plus", ABSENT)
--- 15,41 ----
Error_DebugNoWorkspace = .Bits: &808 "No room for debug module workspace";
! SWI
! Debugger_Disassemble =
! ( NUMBER 0x40380 "Disassembles an instruction",
! ENTRY
! ( R0 = .Int: instruction,
! R1 = .Ref .Int: address
! ),
! EXIT
! ( R1 -> .String: disassembly,
! R2 = .Int: used
! ) );
!
! SWI
! Debugger_DisassembleThumb =
! ( NUMBER 0x40381 "Disassembles a thumb instruction - RISC O S 4+",
! ENTRY
! ( R0 = .Int: instruction,
! R1 = .Ref .Int: address
! ),
! EXIT
! ( R1 -> .String: disassembly,
! R2 = .Int: used
! ) )
//SWI Debugger_Flags = (NUMBER 0x40381*, "Darren Salt's Debugger Plus", ABSENT)
|
|
From: <th...@us...> - 2002-12-15 11:35:39
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/Computer/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv12911/Source/Computer/oslib
Modified Files:
ADFS.swi
Log Message:
Defines ADFS_DiscOp64 for RISC O S 5 and adds placeholders for two other
new ADFS SWIs which are, as yet, undocumented.
Index: ADFS.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/Computer/oslib/ADFS.swi,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** ADFS.swi 9 Mar 2002 10:52:15 -0000 1.1
--- ADFS.swi 15 Dec 2002 11:35:33 -0000 1.2
***************
*** 53,63 ****
SWI ADFSDiscOp_ReadSectorsViaCache = (NUMBER 0x40240,
ENTRY (R1 # 9 "Reads sectors of a disc using the RMA cache", R1 | .Bits: flags,
! R2 = FileCore_DiscAddress: disc_addr,
R3 = .Ref .Data: data,
! R4 = .Int: size,
R6 = .Int: cache_handle),
EXIT (R2 = FileCore_DiscAddress: next_disc_addr,
R3 = .Ref .Data: next_data,
! R4! = .Int: unread,
R6 = .Int: cache_handle_out));
--- 53,63 ----
SWI ADFSDiscOp_ReadSectorsViaCache = (NUMBER 0x40240,
ENTRY (R1 # 9 "Reads sectors of a disc using the RMA cache", R1 | .Bits: flags,
! R2 = FileCore_DiscAddress: disc_addr,
R3 = .Ref .Data: data,
! R4 = .Int: size,
R6 = .Int: cache_handle),
EXIT (R2 = FileCore_DiscAddress: next_disc_addr,
R3 = .Ref .Data: next_data,
! R4! = .Int: unread,
R6 = .Int: cache_handle_out));
***************
*** 229,251 ****
ENTRY (R1 # 8 "Steps a floppy disc out one track", R1 | .Bits: flags));
! SWI ADFSSectorDiscOp_ReadSectorsViaCache =
(
NUMBER 0x4024D,
! ENTRY
(
R1 # 9 "Reads sectors of a disc using the RMA cache", R1 | .Bits: flags,
! R2 = FileCore_SectorDiscAddress: disc_addr,
R3 = .Ref .Data: data,
R4 = .Int: size, R6 = .Int: cache_handle
),
! EXIT
(
R2 = FileCore_SectorDiscAddress: next_disc_addr,
R3 = .Ref .Data: next_data,
! R4! = .Int: unread,
R6 = .Int: cache_handle_out
)
);
!
SWI ADFSSectorDiscOp_Specify = (NUMBER 0x4024D,
ENTRY (R1 # 15 "Does a specify operation on a hard disc", R1 | .Bits: flags,
--- 229,251 ----
ENTRY (R1 # 8 "Steps a floppy disc out one track", R1 | .Bits: flags));
! SWI ADFSSectorDiscOp_ReadSectorsViaCache =
(
NUMBER 0x4024D,
! ENTRY
(
R1 # 9 "Reads sectors of a disc using the RMA cache", R1 | .Bits: flags,
! R2 = FileCore_SectorDiscAddress: disc_addr,
R3 = .Ref .Data: data,
R4 = .Int: size, R6 = .Int: cache_handle
),
! EXIT
(
R2 = FileCore_SectorDiscAddress: next_disc_addr,
R3 = .Ref .Data: next_data,
! R4! = .Int: unread,
R6 = .Int: cache_handle_out
)
);
!
SWI ADFSSectorDiscOp_Specify = (NUMBER 0x4024D,
ENTRY (R1 # 15 "Does a specify operation on a hard disc", R1 | .Bits: flags,
***************
*** 262,265 ****
--- 262,342 ----
EXIT (R0 = .Bits: free_lo,
R1 = .Int: free_hi, R2 = .Int: max));
+
+ SWI ADFS_IDEDeviceInfo = (NUMBER 0x40253 "RISC O S 5+", ABSENT);
+
+ SWI ADFS_DiscOp64 = (NUMBER 0x40254 "Performs various operations on a
+ disc - see individual reason codes - RISC O S 5+", ABSENT);
+ SWI ADFSDiscOp64_Verify = (NUMBER 0x40254,
+ ENTRY (R1 # 0 "Verifies a disc - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr, R4 = .Int: size),
+ EXIT (R2 = FileCore_DiscAddress64: next_disc_addr,
+ R4! = .Int: unverified));
+ SWI ADFSDiscOp64_ReadSectors = (NUMBER 0x40254,
+ ENTRY (R1 # 1 "Reads sectors from a disc - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr, R3 = .Ref .Data: data,
+ R4 = .Int: size),
+ EXIT (R2 = FileCore_DiscAddress64: next_disc_addr,
+ R3 = .Ref .Data: next_data,
+ R4! = .Int: unread));
+ SWI ADFSDiscOp64_WriteSectors = (NUMBER 0x40254,
+ ENTRY (R1 # 2 "Writes sectors to a disc - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr, R3 -> .Data: data,
+ R4 = .Int: size),
+ EXIT (R2 = FileCore_DiscAddress64: next_disc_addr,
+ R3 -> .Data: next_data,
+ R4! = .Int: unwritten));
+ SWI ADFSDiscOp64_ReadTrack = (NUMBER 0x40254,
+ ENTRY (R1 # 3 "Reads a track from a floppy disc - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr, R3 = .Ref .Data: data));
+ SWI ADFSDiscOp64_ReadId = (NUMBER 0x40254,
+ ENTRY (R1 # 3 "Reads a hard disc ID - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr, R3 = .Ref .Data: data));
+ SWI ADFSDiscOp64_WriteTrack = (NUMBER 0x40254,
+ ENTRY (R1 # 4 "Writes a track to a disc - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr, R3 -> .Data: data));
+ SWI ADFSDiscOp64_FormatTrack = (NUMBER 0x40254,
+ ENTRY (R1 # 4 "Formats a track of a disc - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr, R3 # 0,
+ R4 -> FileCore_TrackFormat: format));
+ SWI ADFSDiscOp64_Seek = (NUMBER 0x40254,
+ ENTRY (R1 # 5 "Seeks to a disc location - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr));
+ SWI ADFSDiscOp64_Restore = (NUMBER 0x40254,
+ ENTRY (R1 # 6 "Does a restore operation for a disc - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr));
+ SWI ADFSDiscOp64_StepIn = (NUMBER 0x40254,
+ ENTRY (R1 # 7 "Steps a floppy disc in one track - RISC O S 5+",
+ R1 | .Bits: flags));
+ SWI ADFSDiscOp64_StepOut = (NUMBER 0x40254,
+ ENTRY (R1 # 8 "Steps a floppy disc out one track - RISC O S 5+",
+ R1 | .Bits: flags));
+
+ SWI ADFSDiscOp64_ReadSectorsViaCache = (NUMBER 0x40254,
+ ENTRY (R1 # 9 "Reads sectors of a disc using the RMA cache - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr,
+ R3 = .Ref .Data: data,
+ R4 = .Int: size,
+ R6 = .Int: cache_handle),
+ EXIT (R2 = FileCore_DiscAddress64: next_disc_addr,
+ R3 = .Ref .Data: next_data,
+ R4! = .Int: unread,
+ R6 = .Int: cache_handle_out));
+
+ SWI ADFSDiscOp64_Specify = (NUMBER 0x40254,
+ ENTRY (R1 # 15 "Does a specify operation on a hard disc - RISC O S 5+",
+ R1 | .Bits: flags,
+ R2 = FileCore_DiscAddress64: disc_addr));
+
+ SWI ADFS_ATAPIOp = (NUMBER 0x40255 "RISC O S 5", ABSENT);
SWI
|
|
From: <th...@us...> - 2002-12-15 11:35:39
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs In directory sc8-pr-cvs1:/tmp/cvs-serv12911/docs Modified Files: ChangeLog Log Message: Defines ADFS_DiscOp64 for RISC O S 5 and adds placeholders for two other new ADFS SWIs which are, as yet, undocumented. Index: ChangeLog =================================================================== RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v retrieving revision 1.21 retrieving revision 1.22 diff -C2 -d -r1.21 -r1.22 *** ChangeLog 2 Dec 2002 18:28:16 -0000 1.21 --- ChangeLog 15 Dec 2002 11:35:33 -0000 1.22 *************** *** 1,2 **** --- 1,8 ---- + OSLib Next Version + ------------------ + * Enhancements: + - Defines ADFS_DiscOp64 for RISC O S 5 and adds placeholders for two + other new ADFS SWIs which are, as yet, undocumented. (Tom Hughes) + OSLib Version 6.40 - Tony van der Hoff - 28/11/2002 ------------------ |
|
From: <to...@us...> - 2002-12-02 18:28:47
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Tools/DefMod2/defmod/sources
In directory sc8-pr-cvs1:/tmp/cvs-serv7748/OSLib/!OsLib/Tools/DefMod2/defmod/sources
Modified Files:
hdr.c
Log Message:
Various bug fixes for OSLib 6.40
Index: hdr.c
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Tools/DefMod2/defmod/sources/hdr.c,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** hdr.c 11 Mar 2002 15:09:05 -0000 1.1
--- hdr.c 2 Dec 2002 18:28:14 -0000 1.2
***************
*** 283,287 ****
// the struct is based upon another
sprintf( v1, "%s_MEMBERS", t->data AS list.base->data AS id );
! Emit (file, v, v1 );
}
--- 283,288 ----
// the struct is based upon another
sprintf( v1, "%s_MEMBERS", t->data AS list.base->data AS id );
! // Emit (file, v, v1 ); // TV 20021128
! Emit (file, "$label", v1 );
}
|
|
From: <to...@us...> - 2002-12-02 18:28:22
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs
In directory sc8-pr-cvs1:/tmp/cvs-serv7748/OSLib/!OsLib/docs
Modified Files:
ChangeLog
Log Message:
Various bug fixes for OSLib 6.40
Index: ChangeLog
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v
retrieving revision 1.20
retrieving revision 1.21
diff -C2 -d -r1.20 -r1.21
*** ChangeLog 2 Dec 2002 17:24:13 -0000 1.20
--- ChangeLog 2 Dec 2002 18:28:16 -0000 1.21
***************
*** 41,44 ****
--- 41,46 ----
bison. Castle 32-bit compiler. (Tony van der Hoff)
- Defmod build is is now free of warning messages. (Tony van der Hoff)
+ - Instated pre-release test for assembler headers similar to that used for
+ C headers. (Tony van der Hoff)
* Bug Fixes:
***************
*** 59,67 ****
This is not 100% backward compatible as it may cause a compiler warning (not
an error). (Jan-Jaap van der Geer)
! - Removed all references to OS_F in Arcweb module. 8-bit file handles were never
! supported. (Tom Hughes)
- Fixed assembly error when including HDR.OSF32. (Philip Ludlam)
- Fixed all instances in Iconbar.swi of Toolbox_o in favour of Toolbox_O.
! (Philip Ludlam)
* CVS release:
--- 61,74 ----
This is not 100% backward compatible as it may cause a compiler warning (not
an error). (Jan-Jaap van der Geer)
! - Removed all references to OS_F in Arcweb module. 8-bit file handles were
! never supported. (Tom Hughes)
- Fixed assembly error when including HDR.OSF32. (Philip Ludlam)
- Fixed all instances in Iconbar.swi of Toolbox_o in favour of Toolbox_O.
! (Philip Ludlam)
! - Fixed duplicate symbols in assembler headers. In order to preserve
! compatibility in C headers, this is achieved by a name case change for the
! constants. (Philip Ludlam)
! - Fixed Defmod generating bad Macro definitions for nested macros in Assembler
! Headers. (Tony van der Hoff)
* CVS release:
|
|
From: <th...@us...> - 2002-12-02 17:24:18
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/Core/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv7528/Source/Core/oslib
Modified Files:
OS.swi
Log Message:
Added OS_ReadLine32, OS_HeapSort32 and OS_SubstituteArgs32.
Index: OS.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/Core/oslib/OS.swi,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** OS.swi 28 Nov 2002 13:08:59 -0000 1.9
--- OS.swi 2 Dec 2002 17:24:15 -0000 1.10
***************
*** 609,614 ****
"OS_CLI vector"));
SWI OS_ReadLine =
! ( NUMBER 0xE "Reads a line from the input stream",
ENTRY
( R0 = .Ref .String: buffer,
--- 609,621 ----
"OS_CLI vector"));
+ TYPE OSReadLine_Flags = .Bits;
+ CONST OSReadLine_GivenEchoCharacter = OSReadLine_Flags: 0x40000000,
+ OSReadLine_SuppressInvalid = OSReadLine_Flags: 0x80000000,
+ OSReadLine_EchoCharacter = OSReadLine_Flags: 0xFF,
+ OSReadLine_EchoCharacterShift = .Int: 0;
+
SWI OS_ReadLine =
! ( NUMBER 0xE "Reads a line from the input stream - prefer OS_ReadLine32
! on RISC O S 5+",
ENTRY
( R0 = .Ref .String: buffer,
***************
*** 627,631 ****
SWI OS_ReadLineGivenEcho =
( NUMBER 0xE "Reads a line from the input stream, using the given echo
! character",
ENTRY
( R0 # &40000000,
--- 634,638 ----
SWI OS_ReadLineGivenEcho =
( NUMBER 0xE "Reads a line from the input stream, using the given echo
! character - use OS_ReadLine32 on RISC O S 5+",
ENTRY
( R0 # &40000000,
***************
*** 646,650 ****
SWI OS_ReadLineSuppressInvalid =
( NUMBER 0xE "Reads a line from the input stream, not echoing invalid
! characters",
ENTRY
( R0 # &80000000,
--- 653,657 ----
SWI OS_ReadLineSuppressInvalid =
( NUMBER 0xE "Reads a line from the input stream, not echoing invalid
! characters - use OS_ReadLine32 on RISC O S 5+",
ENTRY
( R0 # &80000000,
***************
*** 664,668 ****
SWI OS_ReadLineGivenEchoSuppressInvalid =
( NUMBER 0xE "Reads a line from the input stream, using the given echo
! character and not echoing invalid characters",
ENTRY
( R0 # &C0000000,
--- 671,676 ----
SWI OS_ReadLineGivenEchoSuppressInvalid =
( NUMBER 0xE "Reads a line from the input stream, using the given echo
! character and not echoing invalid characters - use OS_ReadLine3
! on RISC O S 5+",
ENTRY
( R0 # &C0000000,
***************
*** 681,684 ****
--- 689,709 ----
) );
+ SWI OS_ReadLine32 =
+ ( NUMBER 0x7D "Reads a line from the input stream - RISC O S 5+",
+ ENTRY
+ ( R0 = .Ref .String: buffer,
+ R1 = .Int: size,
+ R2 = .Char: min_char,
+ R3 = .Char: max_char,
+ R4 = OSReadLine_Flags: flags
+ ),
+ EXIT
+ ( R0?,
+ R1 = .Int: used,
+ R2?,
+ R3?,
+ FLAGS!
+ ) );
+
SWI
ReadLineV =
***************
*** 690,694 ****
R3 = .Char: max_char,
R4 = .Char: echo,
! R9 # &0E "OS_ReadLine vector"
),
EXIT
--- 715,738 ----
R3 = .Char: max_char,
R4 = .Char: echo,
! R9 # &0E "OS_ReadLine vector - use ReadLine32V on RISC O S 5+"
! ),
! EXIT
! ( R0?,
! R1 = .Int: used,
! R2?,
! R3?,
! FLAGS!
! ) );
!
! SWI
! ReadLine32V =
! ( NUMBER 0x34,
! ENTRY
! ( R0 = .Ref .String: buffer,
! R1 = .Int: size,
! R2 = .Char: min_char,
! R3 = .Char: max_char,
! R4 = OSReadLine_Flags: flags,
! R9 # &0E "OS_ReadLine vector - RISC O S 5+"
),
EXIT
***************
*** 1424,1427 ****
--- 1468,1474 ----
);
+ TYPE OS_SubstituteArgsFlags = .Bits;
+ CONST OS_SubstituteArgsIgnoreExtras = OS_SubstituteArgsFlags: 0x80000000;
+
SWI OS_SubstituteArgs =
( NUMBER 0x43 "Substitutes command line arguments",
***************
*** 1437,1440 ****
--- 1484,1501 ----
) );
+ SWI OS_SubstituteArgs32 =
+ ( NUMBER 0x7E "Substitutes command line arguments - RISC O S 5+",
+ ENTRY
+ ( R0 -> .String: args,
+ R1 = .Ref .String: buffer,
+ R2 = .Int: size,
+ R3 -> .String: source,
+ R4 = .Int: source_size,
+ R5 = OS_SubstituteArgsFlags: flags
+ ),
+ EXIT
+ ( R2! = .Int: used
+ ) );
+
SWI OS_PrettyPrint =
( NUMBER 0x44 "Writes a string with some formatting to all of the
***************
*** 1581,1591 ****
//Flags for OS_HeapSort (set in R1!)
CONST
! OS_SortGivenWorkspace = .Bits: 0b100000000000000000000000000000,
! OS_SortBuildArray = .Bits: 0b1000000000000000000000000000000,
! OS_SortObjects = .Bits: 0b10000000000000000000000000000000;
SWI OS_HeapSort =
! ( NUMBER 0x4F "Heap-sorts a list of objects",
ENTRY
( R0 = .Int: count,
--- 1642,1654 ----
//Flags for OS_HeapSort (set in R1!)
+ TYPE OS_HeapSortFlags;
CONST
! OS_SortGivenWorkspace = OS_HeapSortFlags: 0b100000000000000000000000000000,
! OS_SortBuildArray = OS_HeapSortFlags: 0b1000000000000000000000000000000,
! OS_SortObjects = OS_HeapSortFlags: 0b10000000000000000000000000000000;
SWI OS_HeapSort =
! ( NUMBER 0x4F "Heap-sorts a list of objects - prefer OS_HeapSort32
! on RISC O S 5+",
ENTRY
( R0 = .Int: count,
***************
*** 1596,1599 ****
--- 1659,1675 ----
R5 = .Int: object_size,
R6 = .Ref Void: workspace
+ ) );
+
+ SWI OS_HeapSort32 =
+ ( NUMBER 0x7F "Heap-sorts a list of objects - RISC O S 5+",
+ ENTRY
+ ( R0 = .Int: count,
+ R1 = .Ref .Int: array,
+ R2 = OS_SortType: compare_fn,
+ R3 = .Ref .Data: handle, //should be int, like other handles
+ R4 = .Ref .Data: objects,
+ R5 = .Int: object_size,
+ R6 = .Ref Void: workspace,
+ R7 = OS_HeapSortFlags: flags
) );
|
|
From: <th...@us...> - 2002-12-02 17:24:18
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/docs
In directory sc8-pr-cvs1:/tmp/cvs-serv7528/docs
Modified Files:
ChangeLog
Log Message:
Added OS_ReadLine32, OS_HeapSort32 and OS_SubstituteArgs32.
Index: ChangeLog
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/docs/ChangeLog,v
retrieving revision 1.19
retrieving revision 1.20
diff -C2 -d -r1.19 -r1.20
*** ChangeLog 28 Nov 2002 13:09:00 -0000 1.19
--- ChangeLog 2 Dec 2002 17:24:13 -0000 1.20
***************
*** 32,35 ****
--- 32,37 ----
- Distribution now includes 32-bit neutral version of OSLibSupport32
library. (Tony van der Hoff)
+ - Added OS_ReadLine32, OS_HeapSort32 and OS_SubstituteArgs32 for 32 bit
+ support in RISC O S 5. (Tom Hughes)
* Build Environment
|
|
From: <th...@us...> - 2002-12-02 17:03:26
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv19429
Modified Files:
ZLib.swi
Log Message:
Fix duplicate formal parameter names.
Index: ZLib.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/ZLib.swi,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** ZLib.swi 22 Sep 2002 13:49:40 -0000 1.1
--- ZLib.swi 2 Dec 2002 17:03:18 -0000 1.2
***************
*** 395,409 ****
( R0 -> .Char: filename,
R1 -> .Char: mode,
! R2 = .Bits: load_address,
! R3 = .Bits: exec_address,
! R4 = .Int: size,
! R5 = FileSwitch_Attr: attr
),
EXIT
( R0! = ZLib_GZipHandle: handle,
! R2 = .Bits: load_address,
! R3 = .Bits: exec_address,
! R4 = .Int: size,
! R5 = FileSwitch_Attr: attr
) );
--- 395,409 ----
( R0 -> .Char: filename,
R1 -> .Char: mode,
! R2 = .Bits: load_address_in,
! R3 = .Bits: exec_address_in,
! R4 = .Int: size_in,
! R5 = FileSwitch_Attr: attr_in
),
EXIT
( R0! = ZLib_GZipHandle: handle,
! R2 = .Bits: load_address_out,
! R3 = .Bits: exec_address_out,
! R4 = .Int: size_out,
! R5 = FileSwitch_Attr: attr_out
) );
|
|
From: <th...@us...> - 2002-11-28 23:34:28
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv27578
Modified Files:
Zipper.swi
Log Message:
Fix typo.
Index: Zipper.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/Zipper.swi,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Zipper.swi 28 Nov 2002 23:31:28 -0000 1.2
--- Zipper.swi 28 Nov 2002 23:34:25 -0000 1.3
***************
*** 48,52 ****
.Bits: exec_addr,
FileSwitch_Attr: attr
! ): riscos_tyle,
.Struct
( .Int: centiseconds,
--- 48,52 ----
.Bits: exec_addr,
FileSwitch_Attr: attr
! ): riscos_style,
.Struct
( .Int: centiseconds,
|
|
From: <th...@us...> - 2002-11-28 23:31:31
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv24530
Modified Files:
Zipper.swi
Log Message:
Added some missing type and constant definitions.
Index: Zipper.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/Zipper.swi,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Zipper.swi 22 Sep 2002 13:49:40 -0000 1.1
--- Zipper.swi 28 Nov 2002 23:31:28 -0000 1.2
***************
*** 24,27 ****
--- 24,70 ----
Zipper_NoDiscard = Zipper_OpenFlags: 0x80000000;
+ TYPE
+ Zipper_CompressionDetails = .Bits;
+
+ CONST
+ Zipper_CompressionMethod = Zipper_CompressionDetails: 0xff,
+ Zipper_CompressionMethodShift = .Int: 0,
+ Zipper_CompressionLevel = Zipper_CompressionDetails: 0xf00,
+ Zipper_CompressionLevelShift = .Int: 8;
+
+ CONST
+ Zipper_CompressionMethodStore = Zipper_CompressionDetails: 0,
+ Zipper_CompressionMethodDeflate = Zipper_CompressionDetails: 8;
+
+ CONST
+ Zipper_CompressionLevelMinimum = Zipper_CompressionDetails: 1,
+ Zipper_CompressionLevelMaximum = Zipper_CompressionDetails: 9;
+
+ TYPE
+ Zipper_TimeSpecifier =
+ .Union
+ ( .Struct
+ ( .Bits: load_addr,
+ .Bits: exec_addr,
+ FileSwitch_Attr: attr
+ ): riscos_tyle,
+ .Struct
+ ( .Int: centiseconds,
+ .Int: seconds,
+ .Int: minutes,
+ .Int: hours,
+ .Int: date,
+ .Int: month,
+ .Int: year
+ ): zip_style
+ );
+
+ TYPE
+ Zipper_FileAttributes =
+ .Struct
+ ( .Bits: internal,
+ .Bits: external
+ );
+
SWI
Zipper_UnZipOpen =
|
|
From: <to...@us...> - 2002-11-28 13:09:03
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/Toolbox/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv19925/OSLib/!OsLib/Source/Toolbox/oslib
Modified Files:
FontDbox.swi FontMenu.swi Iconbar.swi
Log Message:
Various enhabcements and bug-fixes. Updated Test suite
Index: FontDbox.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/Toolbox/oslib/FontDbox.swi,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FontDbox.swi 11 Mar 2002 10:07:58 -0000 1.3
--- FontDbox.swi 28 Nov 2002 13:09:00 -0000 1.4
***************
*** 98,102 ****
( .Int: height,
.Int: aspect,
! [208] .Char: font
) "Prefer FontDbox_ActionApplyFontBlock";
--- 98,103 ----
( .Int: height,
.Int: aspect,
! //[208] .Char: font // TV 20021128
! [204] .Char: font
) "Prefer FontDbox_ActionApplyFontBlock";
***************
*** 106,110 ****
( .Int: height,
.Int: aspect,
! [208] .Char: font
);
--- 107,112 ----
( .Int: height,
.Int: aspect,
! //[208] .Char: font // TV 20021128
! [204] .Char: font
);
Index: FontMenu.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/Toolbox/oslib/FontMenu.swi,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FontMenu.swi 11 Mar 2002 14:13:26 -0000 1.4
--- FontMenu.swi 28 Nov 2002 13:09:00 -0000 1.5
***************
*** 62,66 ****
TYPE
FontMenu_ActionSelection = .Struct
! ( [216] .Char: font_identifier
) "Prefer FontMenu_ActionSelectionBlock";
--- 62,67 ----
TYPE
FontMenu_ActionSelection = .Struct
! // ( [216] .Char: font_identifier // TV 20021128
! ( [212] .Char: font_identifier
) "Prefer FontMenu_ActionSelectionBlock";
***************
*** 68,72 ****
TYPE
FontMenu_ActionSelectionBlock = .Struct: Toolbox_ActionHeader
! ( [216] .Char: font_identifier );
CONST
--- 69,74 ----
TYPE
FontMenu_ActionSelectionBlock = .Struct: Toolbox_ActionHeader
! // ( [216] .Char: font_identifier ); // TV 20021128
! ( [212] .Char: font_identifier );
CONST
Index: Iconbar.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/Toolbox/oslib/Iconbar.swi,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** Iconbar.swi 11 Mar 2002 14:13:30 -0000 1.4
--- Iconbar.swi 28 Nov 2002 13:09:00 -0000 1.5
***************
*** 96,100 ****
Iconbar_ActionSelectAboutToBeShown = .Struct
(
! Toolbox_o: o
);
--- 96,101 ----
Iconbar_ActionSelectAboutToBeShown = .Struct
(
! //Toolbox_o: o //TV 20021128
! Toolbox_O: o
);
***************
*** 102,106 ****
Iconbar_ActionAdjustAboutToBeShown = .Struct
(
! Toolbox_o: o
);
--- 103,108 ----
Iconbar_ActionAdjustAboutToBeShown = .Struct
(
! //Toolbox_o: o //TV 20021128
! Toolbox_O: o
);
***************
*** 110,114 ****
Toolbox_ActionHeader
(
! Toolbox_o: o
);
--- 112,117 ----
Toolbox_ActionHeader
(
! //Toolbox_o: o //TV 20021128
! Toolbox_O: o
);
***************
*** 118,122 ****
Toolbox_ActionHeader
(
! Toolbox_o: o
);
--- 121,126 ----
Toolbox_ActionHeader
(
! //Toolbox_o: o //TV 20021128
! Toolbox_O: o
);
|
|
From: <to...@us...> - 2002-11-28 13:09:03
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib
In directory sc8-pr-cvs1:/tmp/cvs-serv19925/OSLib/!OsLib/Source/User/oslib
Modified Files:
Arcweb.swi BASICTrans.swi
Log Message:
Various enhabcements and bug-fixes. Updated Test suite
Index: Arcweb.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/Arcweb.swi,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Arcweb.swi 11 Mar 2002 14:13:55 -0000 1.2
--- Arcweb.swi 28 Nov 2002 13:09:00 -0000 1.3
***************
*** 4,8 ****
NEEDS OS, WIMP;
! NEEDSATEND ArcWeb32;
CONST
--- 4,9 ----
NEEDS OS, WIMP;
! //NEEDSATEND ArcWeb32; // TV 20021128 Removed all pretense of supporting
! // 8-bit file handles. It didn't work...
CONST
***************
*** 100,110 ****
);
! TYPE
! Arcweb_URLW =
! .Union
! (
! OS_FW: url_file_w "32-bit file handle",
! [200] .Char: url
! );
TYPE
--- 101,111 ----
);
! //TYPE
! // Arcweb_URLW =
! // .Union
! // (
! // OS_FW: url_file_w "32-bit file handle",
! // [200] .Char: url
! // );
TYPE
Index: BASICTrans.swi
===================================================================
RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/BASICTrans.swi,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** BASICTrans.swi 9 Mar 2002 11:12:33 -0000 1.1
--- BASICTrans.swi 28 Nov 2002 13:09:00 -0000 1.2
***************
*** 14,18 ****
buffer",
ENTRY (R0 = .Int: error_no,
! R1 = .Ref OS_Error: error_buffer),
EXIT (R0?, R1?, R2?, R3?));
--- 14,18 ----
buffer",
ENTRY (R0 = .Int: error_no,
! R1 = .Ref .String: error_buffer),
EXIT (R0?, R1?, R2?, R3?));
|
10 messages has been excluded from this view by a project administrator.
