Virtualization
/
SLOF
mirror of https://gitlab.com/qemu-project/SLOF.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Spelling fixes in comments and debug messages 

Most of these errors were found by codespell:

controler -> controller
appropiate -> appropriate
devide -> divide
comming -> coming
seperate -> separate
reponsible -> responsible
initialization -> initialization
successfull -> successful
whithin -> within
recieve -> receive
wich -> which
occurence -> occurrence
beggining -> beginning
accessable -> accessible
proccess -> process
succesfuly -> successfully
immediatly -> immediately
prefered -> preferred
avaliable -> available
threshhold -> threshold
statistsics -> statistics
endianess -> endianness
positon -> position
writen -> written
occurence -> occurrence
upto -> up to
overwriten -> overwritten
availabe -> available
enviroment -> environment
intruction -> instruction
thru -> through
substract -> subtract
occured -> occurred
begining -> beginning
lenght -> length
atributes -> attributes
preceeding -> preceding
defintion -> definition
decriptor -> descriptor

Signed-off-by: Stefan Weil <sw@weilnetz.de>
Signed-off-by: Nikunj A Dadhania <nikunj@linux.vnet.ibm.com>
This commit is contained in:
Stefan Weil 2012-12-24 09:47:46 +01:00 committed by Nikunj A. Dadhania
parent 0ad10f26c9
commit d070068574
42 changed files with 82 additions and 82 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
board-js2x/llfw/u4mem.c
View File

@ -81,7 +81,7 @@ static const uint32_t SUBVER = 1;
#define CLK_DDR_CLK_MSK (IBIT(11) | IBIT(12) | IBIT(13))
/*
* memory controler registers
* memory controller registers
*/
#define RASTimer0_R u4reg(0x2030)
#define RASTimer1_R u4reg(0x2040)
@ -2210,7 +2210,7 @@ u4_auto_calib_MemBus( auto_calib_t *f_ac_pt )
l_Ver_u32 /= n;
/*
* set appropiate vernier register for
* set appropriate vernier register for
* the current bytelane
*/
bidx = ( b >> 2 );
@ -2384,7 +2384,7 @@ u4_InitialScrub( void )
/*
* RND: calculates Timer cycles from the given frequency
* devided by the clock frequency. Values are rounded
* divided by the clock frequency. Values are rounded
* up to the nearest integer value if the division is not even.
*/
#define RND( tXXX ) ( ( ( tXXX ) + tCK - 1 ) / tCK )

2
board-js2x/slof/OF.fs
View File

@ -154,7 +154,7 @@ THEN
takeover? IF
\ potentially comming from phype
\ potentially coming from phype
u4? IF
\ takeover on JS21 is using some nvram area
\ which might be available

2
board-js2x/slof/ht.fs
View File

@ -59,7 +59,7 @@ f2000000 CONSTANT my-puid
: config-dump ( addr size -- ) ['] config-l@ 4 (dump) ;
\ 16MB of configuration space, seperate for type 0 and type 1.
\ 16MB of configuration space, separate for type 0 and type 1.
00000000 encode-int f2000000 encode-int+
00000000 encode-int+ 02000000 encode-int+ s" reg" property

2
board-qemu/virtio-net/vn-pci.c
View File

@ -33,7 +33,7 @@
/**
* Module init for virtio via PCI.
* Checks whether we're reponsible for the given device and set up
* Checks whether we're responsible for the given device and set up
* the virtqueue configuration.
*/
int

2
clients/net-snk/app/biosemu/biosemu.c
View File

@ -327,7 +327,7 @@ biosemu(char argc, char **argv)
// indicating that the initialization probably was successful
if ((pop_word() == 0xf4f4) && (M.x86.R_SS == STACK_SEGMENT)
&& (M.x86.R_SP == STACK_START_OFFSET)) {
DEBUG_PRINTF("Stack is clean, initialization successfull!\n");
DEBUG_PRINTF("Stack is clean, initialization successful!\n");
} else {
DEBUG_PRINTF
("Stack unclean, initialization probably NOT COMPLETE!!!\n");

12
clients/net-snk/app/biosemu/io.c
View File

@ -83,7 +83,7 @@ my_inb(X86EMU_pioAddr addr)
uint64_t translated_addr = addr;
uint8_t translated = dev_translate_address(&translated_addr);
if (translated != 0) {
//translation successfull, access Device I/O (BAR or Legacy...)
//translation successful, access Device I/O (BAR or Legacy...)
DEBUG_PRINTF_IO("%s(%x): access to Device I/O\n", __FUNCTION__,
addr);
//DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -132,7 +132,7 @@ my_inw(X86EMU_pioAddr addr)
uint64_t translated_addr = addr;
uint8_t translated = dev_translate_address(&translated_addr);
if (translated != 0) {
//translation successfull, access Device I/O (BAR or Legacy...)
//translation successful, access Device I/O (BAR or Legacy...)
DEBUG_PRINTF_IO("%s(%x): access to Device I/O\n", __FUNCTION__,
addr);
//DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -177,7 +177,7 @@ my_inl(X86EMU_pioAddr addr)
uint64_t translated_addr = addr;
uint8_t translated = dev_translate_address(&translated_addr);
if (translated != 0) {
//translation successfull, access Device I/O (BAR or Legacy...)
//translation successful, access Device I/O (BAR or Legacy...)
DEBUG_PRINTF_IO("%s(%x): access to Device I/O\n", __FUNCTION__,
addr);
//DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -223,7 +223,7 @@ my_outb(X86EMU_pioAddr addr, uint8_t val)
uint64_t translated_addr = addr;
uint8_t translated = dev_translate_address(&translated_addr);
if (translated != 0) {
//translation successfull, access Device I/O (BAR or Legacy...)
//translation successful, access Device I/O (BAR or Legacy...)
DEBUG_PRINTF_IO("%s(%x, %x): access to Device I/O\n",
__FUNCTION__, addr, val);
//DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -255,7 +255,7 @@ my_outw(X86EMU_pioAddr addr, uint16_t val)
uint64_t translated_addr = addr;
uint8_t translated = dev_translate_address(&translated_addr);
if (translated != 0) {
//translation successfull, access Device I/O (BAR or Legacy...)
//translation successful, access Device I/O (BAR or Legacy...)
DEBUG_PRINTF_IO("%s(%x, %x): access to Device I/O\n",
__FUNCTION__, addr, val);
//DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -296,7 +296,7 @@ my_outl(X86EMU_pioAddr addr, uint32_t val)
uint64_t translated_addr = addr;
uint8_t translated = dev_translate_address(&translated_addr);
if (translated != 0) {
//translation successfull, access Device I/O (BAR or Legacy...)
//translation successful, access Device I/O (BAR or Legacy...)
DEBUG_PRINTF_IO("%s(%x, %x): access to Device I/O\n",
__FUNCTION__, addr, val);
//DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);

12
clients/net-snk/app/biosemu/mem.c
View File

@ -177,7 +177,7 @@ my_rdb(uint32_t addr)
uint8_t translated = dev_translate_address(&translated_addr);
uint8_t rval;
if (translated != 0) {
//translation successfull, access VGA Memory (BAR or Legacy...)
//translation successful, access VGA Memory (BAR or Legacy...)
DEBUG_PRINTF_MEM("%s(%08x): access to VGA Memory\n",
__FUNCTION__, addr);
//DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -209,7 +209,7 @@ my_rdw(uint32_t addr)
uint8_t translated = dev_translate_address(&translated_addr);
uint16_t rval;
if (translated != 0) {
//translation successfull, access VGA Memory (BAR or Legacy...)
//translation successful, access VGA Memory (BAR or Legacy...)
DEBUG_PRINTF_MEM("%s(%08x): access to VGA Memory\n",
__FUNCTION__, addr);
//DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -260,7 +260,7 @@ my_rdl(uint32_t addr)
uint8_t translated = dev_translate_address(&translated_addr);
uint32_t rval;
if (translated != 0) {
//translation successfull, access VGA Memory (BAR or Legacy...)
//translation successful, access VGA Memory (BAR or Legacy...)
DEBUG_PRINTF_MEM("%s(%x): access to VGA Memory\n",
__FUNCTION__, addr);
//DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -322,7 +322,7 @@ my_wrb(uint32_t addr, uint8_t val)
uint64_t translated_addr = addr;
uint8_t translated = dev_translate_address(&translated_addr);
if (translated != 0) {
//translation successfull, access VGA Memory (BAR or Legacy...)
//translation successful, access VGA Memory (BAR or Legacy...)
DEBUG_PRINTF_MEM("%s(%x, %x): access to VGA Memory\n",
__FUNCTION__, addr, val);
//DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -347,7 +347,7 @@ my_wrw(uint32_t addr, uint16_t val)
uint64_t translated_addr = addr;
uint8_t translated = dev_translate_address(&translated_addr);
if (translated != 0) {
//translation successfull, access VGA Memory (BAR or Legacy...)
//translation successful, access VGA Memory (BAR or Legacy...)
DEBUG_PRINTF_MEM("%s(%x, %x): access to VGA Memory\n",
__FUNCTION__, addr, val);
//DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
@ -392,7 +392,7 @@ my_wrl(uint32_t addr, uint32_t val)
uint64_t translated_addr = addr;
uint8_t translated = dev_translate_address(&translated_addr);
if (translated != 0) {
//translation successfull, access VGA Memory (BAR or Legacy...)
//translation successful, access VGA Memory (BAR or Legacy...)
DEBUG_PRINTF_MEM("%s(%x, %x): access to VGA Memory\n",
__FUNCTION__, addr, val);
//DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);

2
clients/net-snk/app/biosemu/vbe.c
View File

@ -111,7 +111,7 @@ vbe_prepare()
M.x86.R_EDI = 0x0;
M.x86.R_ES = VBE_SEGMENT;
return 0; // successfull init
return 0; // successful init
}
// VBE Function 00h

12
clients/net-snk/app/netapps/args.c
View File

@ -19,8 +19,8 @@
/**
* Returns pointer of the n'th argument within a string.
*
* @param arg_str string with arguments, seperated with ','
* @param index index of the requested arguments whithin arg_str
* @param arg_str string with arguments, separated with ','
* @param index index of the requested arguments within arg_str
* @return pointer of argument[index] on success
* NULL if index is out of range
*/
@ -41,7 +41,7 @@ get_arg_ptr(const char *arg_str, unsigned int index)
/**
* Returns number of arguments within a string.
*
* @param arg_str string with arguments, seperated with ','
* @param arg_str string with arguments, separated with ','
* @return number of arguments
*/
unsigned int
@ -57,7 +57,7 @@ get_args_count(const char *arg_str)
/**
* Returns the length of the first argument.
*
* @param arg_str string with arguments, seperated with ','
* @param arg_str string with arguments, separated with ','
* @return length of first argument
*/
unsigned int
@ -74,8 +74,8 @@ get_arg_length(const char *arg_str)
* Copy the n'th argument within a string into a buffer in respect
* to a limited buffer size
*
* @param arg_str string with arguments, seperated with ','
* @param index index of the requested arguments whithin arg_str
* @param arg_str string with arguments, separated with ','
* @param index index of the requested arguments within arg_str
* @param buffer pointer to the buffer
* @param length size of the buffer
* @return pointer of buffer on success

6
clients/net-snk/app/netapps/netboot.c
View File

@ -55,7 +55,7 @@ typedef struct {
* Parses a argument string for IPv6 booting, extracts all
* parameters and fills a structure accordingly
*
* @param arg_str string with arguments, seperated with ','
* @param arg_str string with arguments, separated with ','
* @param argc number of arguments
* @param obp_tftp_args structure which contains the result
* @return updated arg_str
@ -144,7 +144,7 @@ parse_ipv6args (const char *arg_str, unsigned int argc,
* Parses a argument string for IPv4 booting, extracts all
* parameters and fills a structure accordingly
*
* @param arg_str string with arguments, seperated with ','
* @param arg_str string with arguments, separated with ','
* @param argc number of arguments
* @param obp_tftp_args structure which contains the result
* @return updated arg_str
@ -232,7 +232,7 @@ parse_ipv4args (const char *arg_str, unsigned int argc,
* Netload-Parameters:
* [bootp,]siaddr,filename,ciaddr,giaddr,bootp-retries,tftp-retries
*
* @param arg_str string with arguments, seperated with ','
* @param arg_str string with arguments, separated with ','
* @param obp_tftp_args structure which contains the result
* @return none
*/

12
clients/net-snk/app/netlib/dhcp.c
View File

@ -177,7 +177,7 @@ static char * response_buffer;
* DHCP: Obtains IP and configuration info from DHCP server
* (makes several attempts).
*
* @param boot_device a socket number used to send and recieve packets
* @param boot_device a socket number used to send and receive packets
* @param fn_ip contains the following configuration information:
* client MAC, client IP, TFTP-server MAC,
* TFTP-server IP, Boot file name
@ -292,7 +292,7 @@ dhcp_attempt(void) {
*
* @param opt_field Points to the "vend" field of DHCP-message
* (destination)
* @param opt_struct this structure stores info about the options wich
* @param opt_struct this structure stores info about the options which
* will be added to DHCP-message (source)
* @return TRUE - options packed;
* FALSE - error condition occurs.
@ -387,7 +387,7 @@ dhcp_encode_options(uint8_t * opt_field, dhcp_options_t * opt_struct) {
* @param opt_field Points to the "options" field of DHCP-message
* (source).
* @param opt_len Length of "options" field.
* @param opt_struct this structure stores info about the options wich
* @param opt_struct this structure stores info about the options which
* was extracted from DHCP-message (destination).
* @return TRUE - options extracted;
* FALSE - error condition occurs.
@ -527,13 +527,13 @@ static int8_t dhcp_merge_options(uint8_t dst_options[], uint32_t * dst_len,
}
/**
* DHCP: Finds given occurence of the option with the given code (op_code)
* DHCP: Finds given occurrence of the option with the given code (op_code)
* in "options" field of DHCP-message.
*
* @param options "options" field of DHCP-message
* @param len length of the "options" field
* @param op_code code of the option to find
* @param op_offset SUCCESS - offset to an option occurence;
* @param op_offset SUCCESS - offset to an option occurrence;
* FAULT - offset is set to zero.
* @return TRUE - option was find;
* FALSE - option wasn't find.
@ -582,7 +582,7 @@ dhcp_append_option(uint8_t dst_options[], uint32_t * dst_len,
*
* @param dst_options "options" field of DHCP-message
* @param dst_len length of the "options" field (modified)
* @param dst_offset offset of the option from beggining of the list
* @param dst_offset offset of the option from beginning of the list
* @param new_option points to an option in another list (src)
*/
static void

8
clients/net-snk/app/netlib/dns.c
View File

@ -93,7 +93,7 @@ static int8_t dns_domain_cname[0x100]; /**< Canonical domain name */
* DNS: Initialize the environment for DNS client.
* To perfrom DNS-queries use the function dns_get_ip.
*
* @param device_socket a socket number used to send and recieve packets
* @param device_socket a socket number used to send and receive packets
* @param server_ip DNS-server IPv4 address (e.g. 127.0.0.1)
* @return TRUE in case of successful initialization;
* FALSE in case of fault (e.g. can't obtain MAC).
@ -144,7 +144,7 @@ dns_get_ip(int8_t * url, uint32_t * domain_ip) {
return 0;
}
// Check if DNS server is presented and accessable
// Check if DNS server is presented and accessible
if (dns_server_ip == 0) {
printf("\nERROR:\t\t\tCan't resolve domain name "
"(DNS server is not presented)!\n");
@ -183,7 +183,7 @@ dns_get_ip(int8_t * url, uint32_t * domain_ip) {
/**
* DNS: Handles DNS-messages according to Receive-handle diagram.
* Sets dns_result_ip for given dns_domain_name (see dns_get_ip)
* or signals error condition occurs during DNS-resolving proccess
* or signals error condition occurs during DNS-resolving process
* by setting dns_error flag.
*
* @param packet DNS-packet to be handled
@ -266,7 +266,7 @@ handle_dns(uint8_t * packet, int32_t packetsize) {
resp_section += htons(* (uint16_t *) (resp_section + 8)) + 10;
}
}
return 0; // Packet succesfuly handled but IP wasn't obtained
return 0; // Packet successfully handled but IP wasn't obtained
}
/**

2
clients/net-snk/app/netlib/ipv4.c
View File

@ -401,7 +401,7 @@ handle_ipv4(uint8_t * ip_packet, int32_t packetsize)
* We sent an ARP request first, if this is the first packet sent to
* the declared IPv4 destination address. In this case we store the
* the packet and sent it later if we receive the ARP response.
* If the MAC address is known already, then we send the packet immediatly.
* If the MAC address is known already, then we send the packet immediately.
* If there is already an ARP request pending, then we drop this packet
* and send again an ARP request.
*

2
clients/net-snk/app/netlib/tftp.c
View File

@ -535,7 +535,7 @@ tftp(filename_ip_t * _fn_ip, unsigned char *_buffer, int _len,
* which do not support the RRQ blocksize option */
blocksize = 512;
/* Prefered blocksize - used as option for the read request */
/* Preferred blocksize - used as option for the read request */
if (_blocksize < 8)
_blocksize = 8;
else if (_blocksize > MAX_BLOCKSIZE)

2
clients/net-snk/kernel/modules.c
View File

@ -91,7 +91,7 @@ load_module(const char *name)
}
}
if(i == MODULES_MAX) {
// no space avaliable!
// no space available!
return -3;
}

2
clients/net-snk/kernel/systemcall.c
View File

@ -40,7 +40,7 @@ _syscall_open(const char* name, int flags)
}
if(fd == FILEIO_MAX) {
printk ("Can not open \"%s\" because file descriptor list is full\n", name);
/* there is no free file descriptor avaliable */
/* there is no free file descriptor available */
return -2;
}

4
clients/net-snk/kernel/timer.c
View File

@ -54,7 +54,7 @@ static void wait_ticks(uint64_t ticks)
// wait for (at least) usecs microseconds
void udelay(unsigned int usecs)
{
// first multiply the usec with timebase and then devide
// first multiply the usec with timebase and then divide
// because 1.000.000 is relatively huge compared to usecs
wait_ticks((usecs*tb_freq)/1000000);
}
@ -63,7 +63,7 @@ void udelay(unsigned int usecs)
// wait for (at least) msecs milliseconds
void mdelay(unsigned int msecs)
{
// first multiply the msec and timebase and then devide
// first multiply the msec and timebase and then divide
// because 1.000 is relatively huge compared to msecs
wait_ticks((msecs*tb_freq)/1000);
}

2
drivers/bcm57xx/bcm57xx.c
View File

@ -2647,7 +2647,7 @@ bcm_init( void )
// step 40/41/42: initialize rx producer ring
bcm_init_rxprod_ring();
// step 43: set rx producer ring replenish threshhold
// step 43: set rx producer ring replenish threshold
// using recommended setting of maximum allocated BD's/8
bcm_write_reg32( STD_RXPR_REP_THR_R, (u32_t) BCM_MAX_RX_BUF / 8 );

4
drivers/bcm57xx/bcm57xx.h
View File

@ -140,7 +140,7 @@
#define RX_DAT_COMPL_MODE_R ( (u16_t) 0x2800 )
// Receive BD Initiator Mode register
#define RX_BD_INIT_MODE_R ( (u16_t) 0x2c00 )
// Standard Receive Producer Ring Replenish Threshhold register
// Standard Receive Producer Ring Replenish Threshold register
#define STD_RXPR_REP_THR_R ( (u16_t) 0x2c18 )
// Receive BD Completion Mode register
#define RX_BD_COMPL_MODE_R ( (u16_t) 0x3000 )
@ -172,7 +172,7 @@
#define STB_HOST_ADDR_HI_R ( (u16_t) 0x3c38 )
// Status Block Host Address High register
#define STB_HOST_ADDR_LO_R ( (u16_t) 0x3c3c )
// Statistsics Base Adress register
// Statistics Base Address register
#define STAT_NIC_ADDR_R ( (u16_t) 0x3c40 )
// Status Block Base Address register
#define STB_NIC_ADDR_R ( (u16_t) 0x3c44 )

2
drivers/e1k/e1k.c
View File

@ -474,7 +474,7 @@ e1k_init_transmitter(void)
*/
e1k_wr32(TCTL, BIT32(1) | // enable transmitter
BIT32(3) | // pad short packets
((uint32_t) 0x0f << 4) | // collision threshhold
((uint32_t) 0x0f << 4) | // collision threshold
((uint32_t) 0x40 << 12)); // collision distance
}

2
include/byteorder.h
View File

@ -11,7 +11,7 @@
*****************************************************************************/
/*
* Common byteorder (endianess) macros
* Common byteorder (endianness) macros
*/
#ifndef BYTEORDER_H

2
lib/libelf/elf.c
View File

@ -25,7 +25,7 @@
* @param file_addr pointer to the start of the ELF file
* @return the class (1 for 32 bit, 2 for 64 bit)
* -1 if it is not an ELF file
* -2 if it has the wrong endianess
* -2 if it has the wrong endianness
* -3 if it is not an ELF executable
* -4 if it is not for PPC
*/

2
llfw/nvramlog.S
View File

@ -109,7 +109,7 @@ ASM_ENTRY(checkLogHeaderData)
ASM_ENTRY(.checkLogPartition)
mflr r8
mr r4, r3 // emulate "bl updateCRC_NVRAM"
li r3, 0 // with successfull CRC check
li r3, 0 // with successful CRC check
li r7, 0
cmpwi 7, r3, 0
beq+ 7, 0f

2
romfs/tools/build_ffs.c
View File

@ -310,7 +310,7 @@ next_file_address(struct ffs_header_t *hdr, unsigned int rom_pos, int hdrsize,
return -1;
}
/* spin offset to new positon */
/* spin offset to new position */
if (pad8_num(hdr->romaddr) != hdr->romaddr) {
printf("BUG!!!! pad8_num(hdr->romaddr) != hdr->romaddr\n");
return -1;

2
romfs/tools/create_crc.c
View File

@ -115,7 +115,7 @@ createHeaderImage(int notime)
}
// length must be 13 instead 12 because of terminating
// NUL. Therefore uH.stH.platform_revison must be
// writen later to overwrite the terminating NUL
// written later to overwrite the terminating NUL
if (strftime(dastr, 15, "0x%Y%m%d%H%M", tm) == 0) {
printf("strftime error\n");
}

4
slof/fs/base.fs
View File

@ -143,7 +143,7 @@ CONSTANT <2constant>
then
-1 +loop =
;
\ reverse split -- split at the last occurence of char
\ reverse split -- split at the last occurrence of char
: rsplit ( str len char -- left len right len )
>r 2dup r> rfindchar IF >r over r@ 2swap r> 1+ /string ELSE 0 0 THEN ;
@ -221,7 +221,7 @@ CONSTANT <2constant>
1 >in +! \ advance input-index
;
\ Parse upto next "
\ Parse up to next "
: parse-" ( dst-adr -- dst-adr' )
[char] " parse dup 3 pick + >r ( dst-adr str len R: dst-adr' )

4
slof/fs/debug.fs
View File

@ -366,7 +366,7 @@ true value trace>up?
: debug-off ( -- )
debug-last-xt IF
debug-last-xt-content debug-last-xt ! \ Restore overwriten token
debug-last-xt-content debug-last-xt ! \ Restore overwritten token
0 to debug-last-xt
THEN
;
@ -377,7 +377,7 @@ true value trace>up?
: (break-entry) ( -- )
debug-last-xt dup @ ['] breakpoint <> swap ( debug-addr? debug-last-xt )
debug-last-xt-content swap ! \ Restore overwriten token
debug-last-xt-content swap ! \ Restore overwritten token
r> drop \ Don't return to bp, but to caller
debug-last-xt-content <colon> <> and IF \ Execute non colon definition
debug-last-xt cr u. ." : "

2
slof/fs/devices/pci-device_10de_0141.fs
View File

@ -20,7 +20,7 @@ pci-mem-enable
30 config-l@ pci-find-fcode execute-rom-fcode
: check-display ( nodepath len -- true|false ) \ true if display found and "screen" alias set
\ check if display availabe, set screen alias
\ check if display available, set screen alias
2dup find-node \ ( path len phandle|0 ) find node
?dup IF
\ node found, get "display-type" property

2
slof/fs/dictionary.fs
View File

@ -29,7 +29,7 @@
WHILE ( xt currxt *name pos )
dup @ 4 pick = IF ( xt currxt *name pos )
over count type space
BEGIN cell+ dup @ ['] semicolon = UNTIL cell - \ eat up other occurences
BEGIN cell+ dup @ ['] semicolon = UNTIL cell - \ eat up other occurrences
THEN
REPEAT
THEN

2
slof/fs/envvar.fs
View File

@ -193,7 +193,7 @@ DEFER old-emit
5 OF env-secmode ENDOF ENDCASE
;
\ Enviroment variables might be board specific
\ Environment variables might be board specific
#include <envvar_defaults.fs>

4
slof/fs/exception.fs
View File

@ -51,7 +51,7 @@ CONSTANT ciregs-size
200 OF ." Machine Check" ENDOF
300 OF ." Data Storage" ENDOF
380 OF ." Data Segment" ENDOF
400 OF ." Intruction Storage" ENDOF
400 OF ." Instruction Storage" ENDOF
480 OF ." Instruction Segment" ENDOF
500 OF ." External" ENDOF
600 OF ." Alignment" ENDOF
@ -143,7 +143,7 @@ CONSTANT ciregs-size
msr@ 8000 not and msr!
;
\ Generate external interrupt thru Internal Interrupt Controller of BE
\ Generate external interrupt through Internal Interrupt Controller of BE
: gen-ext-int ( -- )
7fffffff dec! \ Reset decrementer

2
slof/fs/fcode/1275.fs
View File

@ -33,7 +33,7 @@
dup 8000 >= IF
10000 - \ Create cell-sized negative value
THEN
fcode-offset - \ IP is already behind offset, so substract offset size
fcode-offset - \ IP is already behind offset, so subtract offset size
;
: ?negative

4
slof/fs/ide.fs
View File

@ -21,7 +21,7 @@
0 VALUE >ata \ base address for command-block
0 VALUE >ata1 \ base address for control block
true VALUE no-timeout \ flag that no timeout occured
true VALUE no-timeout \ flag that no timeout occurred
0c CONSTANT #cdb-bytes \ command descriptor block (12 bytes)
800 CONSTANT atapi-size
@ -289,7 +289,7 @@ scsi-open \ add scsi functions
IF
cr ." packet size = 16 ** not supported ! **"
THEN
no-timeout not \ any timeout occured so far ?
no-timeout not \ any timeout occurred so far ?
IF
cr ." ** timeout **"
THEN

2
slof/fs/node.fs
View File

@ -299,7 +299,7 @@ defer find-node
ELSE 2drop dup IF .alias
ELSE 2drop list-alias THEN THEN ;
\ sub-alias does a single iteration of an alias at the begining od dev path
\ sub-alias does a single iteration of an alias at the beginning od dev path
\ expression. de-alias will repeat this until all indirect alising is resolved
: sub-alias ( arg-str arg-len -- arg' len' | false )
2dup

2
slof/fs/packages/disk-label.fs
View File

@ -265,7 +265,7 @@ CONSTANT /partition-entry
\ Check for an ISO-9660 filesystem on the disk
\ (cf. CHRP IEEE 1275 spec., chapter 11.1.2.3)
: has-iso9660-filesystem ( -- TRUE|FALSE )
\ Seek to the begining of logical 2048-byte sector 16
\ Seek to the beginning of logical 2048-byte sector 16
\ refer to Chapter C.11.1 in PAPR 2.0 Spec
\ was: 10 read-sector, but this might cause trouble if you
\ try booting an ISO image from a device with 512b sectors.

2
slof/fs/property.fs
View File

@ -28,7 +28,7 @@ true value encode-first?
: decode-int over >r 4 /string r> 4c@ swap 2swap swap bljoin ;
: decode-64 decode-int -rot decode-int -rot 2swap swap lxjoin ;
: decode-string ( prop-addr1 prop-len1 -- prop-addr2 prop-len2 str len )
dup 0= IF 2dup EXIT THEN \ string properties with zero lenght
dup 0= IF 2dup EXIT THEN \ string properties with zero length
over BEGIN dup c@ 0= IF 1+ -rot swap 2 pick over - rot over - -rot 1-
EXIT THEN 1+ AGAIN ;

2
slof/fs/scsi-loader.fs
View File

@ -14,7 +14,7 @@
\ Last change: MiR 13.11.2007 10:55:57
\ **************************************
: .ansi-attr-off 1b emit ." [0m" ; \ ESC Sequence: all terminal atributes off
: .ansi-attr-off 1b emit ." [0m" ; \ ESC Sequence: all terminal attributes off
: .ansi-blue 1b emit ." [34m" ; \ ESC Sequence: foreground-color = blue
: .ansi-green 1b emit ." [32m" ; \ ESC Sequence: foreground-color = green
: .ansi-red 1b emit ." [31m" ; \ ESC Sequence: foreground-color = green

6
slof/fs/scsi-support.fs
View File

@ -803,7 +803,7 @@ CONSTANT scsi-length-media-event
\ ****************************************************************************
\ close scsi-session and remove scsi word list (if exists)
\ ****************************************************************************
\ if 'previous' is used without a preceeding 'also' all forth words are lost !
\ if 'previous' is used without a preceding 'also' all forth words are lost !
\ ****************************************************************************
: scsi-close ( -- )
\ FIXME This only works if scsi-words is the last vocabulary on the stack
@ -817,10 +817,10 @@ CONSTANT scsi-length-media-event
THEN
context scsi-context = \ scsi word list still active ?
IF
scsi-param-errors 0<> \ any errors occured ?
scsi-param-errors 0<> \ any errors occurred ?
IF
cr ." ** WARNING: " scsi-param-errors .d
." SCSI Errors occured ** " cr
." SCSI Errors occurred ** " cr
THEN
previous \ remove scsi word list on top
0 to scsi-context \ prevent from being misinterpreted

8
slof/fs/usb/usb-ohci.fs
View File

@ -706,7 +706,7 @@ hchcca-dma hchcca - CONSTANT virt2phys-offset
;
\ COLON DEFINTION: HC-enable-bulk-list-processing
\ COLON DEFINITION: HC-enable-bulk-list-processing
\ PENDING: Remove Hard coded constants.
: HC-enable-bulk-list-processing ( -- )
@ -779,7 +779,7 @@ hchcca-dma hchcca - CONSTANT virt2phys-offset
\ If the caller specifies a wrong data toggle of 1 for a SETUP
\ PACKET, this method will not find it out.
\ COLON DEFINTION: (toggle-current-toggle)
\ COLON DEFINITION: (toggle-current-toggle)
\ Scope: Internal to fill-TD-list
\ Functionality:
\ Toggles the "T" field that is passed as argument.
@ -1002,7 +1002,7 @@ s" usb-support.fs" INCLUDED
\ =====================================================================
\ COLON DEFINTION: control-std-set-address
\ COLON DEFINITION: control-std-set-address
\ INTERFACE FUNCTION
\ Function allocates an USB addrss and uses it to send SET-ADDRESS packet
\ to the default USB address.
@ -1022,7 +1022,7 @@ s" usb-support.fs" INCLUDED
;
\ Fetches the device decriptor of the usb-device
\ Fetches the device descriptor of the usb-device
: control-std-get-device-descriptor

4
slof/fs/usb/usb-storage.fs
View File

@ -245,7 +245,7 @@ usb-debug-flag to scsi-param-debug \ copy debug flag
\ ---------------------------------------------------------------
\ Method to 1. Send the READ CAPACITY command
\ 2. Recieve and analyse the response data
\ 2. Receive and analyse the response data
\ ---------------------------------------------------------------
: read-capacity ( -- )
@ -285,7 +285,7 @@ usb-debug-flag to scsi-param-debug \ copy debug flag
dma-buf >response-buffer 0 do-bulk-command
IF
s" Successfully read test unit ready data" usb-debug-print
s" Test Unit STATUS availabe in dma-buf >csw-buffer" usb-debug-print
s" Test Unit STATUS available in dma-buf >csw-buffer" usb-debug-print
dma-buf >csw-buffer 0c + c@ 0= IF
s" Test Unit Command Successfully Executed" usb-debug-print
TRUE ( TRUE )

4
slof/fs/usb/usb-support.fs
View File

@ -537,7 +537,7 @@ VARIABLE controlxfer-cmd
\ value of max packet size
\ mps: Max Packet Size.
\ address: Address of endpoint. 11-bit address. The lower 7-bits represent
\ the USB addres and the upper 4-bits represent the Endpoint
\ the USB address and the upper 4-bits represent the Endpoint
\ number.
: (do-rw-endpoint)
@ -578,7 +578,7 @@ VARIABLE controlxfer-cmd
\ buffer length: Data buffer associated with the transfer
\ mps: Max Packet Size.
\ address: Address of endpoint. 11-bit address. The lower 7-bits represent
\ the USB addres and the upper 4-bits represent the Endpoint
\ the USB address and the upper 4-bits represent the Endpoint
\ number.

2
tools/gen_reloc_table.c
View File

@ -69,7 +69,7 @@ main(int argc, char *argv[])
offset ++;
if (cnt_a != cnt_b)
{
fprintf (stderr, "Files >%s< and >%s< have not the same lenght\n",argv[1],argv[2]);
fprintf (stderr, "Files >%s< and >%s< have not the same length\n",argv[1],argv[2]);
exit(-1);
}