rsspice 0.1.0

Pure Rust port of the SPICE Toolkit for space geometry
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100

//
// GENERATED FILE
//

use super::*;
use f2rust_std::*;

//$Procedure      MSPELD ( Misspelling diagnosis )
pub fn MSPELD(
    WORD: &[u8],
    GUESS: &[u8],
    CAUSE: &mut [u8],
    ctx: &mut Context,
) -> f2rust_std::Result<()> {
    let mut LOC: i32 = 0;
    let mut DIAGNS = [b' '; 12];
    let mut FIRST = [b' '; 16];
    let mut LAST = [b' '; 16];

    //
    // Local variables
    //

    MATCHE(WORD, GUESS, &mut DIAGNS, &mut LOC, ctx)?;

    if fstr::eq(&DIAGNS, b"IDENTITY") {
        fstr::assign(CAUSE, b" ");
    } else if fstr::eq(&DIAGNS, b"TRANSPOSE") {
        spicelib::INTORD(LOC, &mut FIRST, ctx);
        spicelib::INTORD((LOC + 1), &mut LAST, ctx);

        spicelib::LCASE(&FIRST.clone(), &mut FIRST, ctx);
        spicelib::LCASE(&LAST.clone(), &mut LAST, ctx);

        fstr::assign(CAUSE, b"It appears that you have transposed the ");

        spicelib::SUFFIX(&FIRST, 1, CAUSE);
        spicelib::SUFFIX(b"and", 1, CAUSE);
        spicelib::SUFFIX(&LAST, 1, CAUSE);
        spicelib::SUFFIX(b"letters of", 1, CAUSE);
        spicelib::SUFFIX(GUESS, 1, CAUSE);
        spicelib::SUFFIX(b"(the letters", 1, CAUSE);
        spicelib::SUFFIX(fstr::substr(GUESS, LOC..=LOC), 1, CAUSE);
        spicelib::SUFFIX(b"and", 1, CAUSE);
        spicelib::SUFFIX(fstr::substr(GUESS, (LOC + 1)..=(LOC + 1)), 1, CAUSE);
        spicelib::SUFFIX(b").", 0, CAUSE);
    } else if fstr::eq(&DIAGNS, b"INSERT") {
        spicelib::INTORD(LOC, &mut FIRST, ctx);
        spicelib::LCASE(&FIRST.clone(), &mut FIRST, ctx);

        fstr::assign(CAUSE, b"It appears that you have left out the ");

        spicelib::SUFFIX(&FIRST, 1, CAUSE);
        spicelib::SUFFIX(b"letter of ", 1, CAUSE);
        spicelib::SUFFIX(GUESS, 1, CAUSE);
        spicelib::SUFFIX(b". (The ", 0, CAUSE);
        spicelib::SUFFIX(&FIRST, 1, CAUSE);
        spicelib::SUFFIX(b"letter should be ", 1, CAUSE);
        spicelib::SUFFIX(fstr::substr(GUESS, LOC..=LOC), 1, CAUSE);
        spicelib::SUFFIX(b".)", 0, CAUSE);
    } else if fstr::eq(&DIAGNS, b"REPLACE") {
        spicelib::INTORD(LOC, &mut FIRST, ctx);
        spicelib::LCASE(&FIRST.clone(), &mut FIRST, ctx);

        fstr::assign(CAUSE, b"It appears that you have mistyped the ");

        spicelib::SUFFIX(&FIRST, 1, CAUSE);
        spicelib::SUFFIX(b"letter of ", 1, CAUSE);
        spicelib::SUFFIX(GUESS, 1, CAUSE);
        spicelib::SUFFIX(b". (The ", 0, CAUSE);
        spicelib::SUFFIX(&FIRST, 1, CAUSE);
        spicelib::SUFFIX(b"letter should be ", 1, CAUSE);
        spicelib::SUFFIX(fstr::substr(GUESS, LOC..=LOC), 1, CAUSE);
        spicelib::SUFFIX(b". You have ", 0, CAUSE);
        spicelib::SUFFIX(fstr::substr(WORD, LOC..=LOC), 1, CAUSE);
        spicelib::SUFFIX(b"instead.)", 1, CAUSE);
    } else if fstr::eq(&DIAGNS, b"REMOVE") {
        spicelib::INTORD(LOC, &mut FIRST, ctx);
        spicelib::LCASE(&FIRST.clone(), &mut FIRST, ctx);

        fstr::assign(CAUSE, b"It appears that you have an extra letter at the ");

        spicelib::SUFFIX(&FIRST, 1, CAUSE);
        spicelib::SUFFIX(b"letter of ", 1, CAUSE);
        spicelib::SUFFIX(WORD, 1, CAUSE);
        spicelib::SUFFIX(b". (The ", 0, CAUSE);
        spicelib::SUFFIX(&FIRST, 1, CAUSE);
        spicelib::SUFFIX(b"letter ", 1, CAUSE);
        spicelib::SUFFIX(fstr::substr(WORD, LOC..=LOC), 1, CAUSE);
        spicelib::SUFFIX(b"should be removed.)", 1, CAUSE);
    } else {
        fstr::assign(CAUSE, b"I believe you meant ");

        spicelib::SUFFIX(GUESS, 1, CAUSE);
        spicelib::SUFFIX(b".  However, the actual spelling ", 1, CAUSE);
        spicelib::SUFFIX(b"error is not a simple one.      ", 1, CAUSE);
    }

    Ok(())
}