Switch suffix from "_bang" to "_x"

The "_x" convention comes from Guile's C API.
This commit is contained in:
Lassi Kortela 2022-10-04 22:09:09 +03:00
parent e531778723
commit 11fb8803f6
3 changed files with 27 additions and 27 deletions

View File

@ -27,10 +27,10 @@ boolean? BooleanP
bytevector Bytevector
bytevector-append BytevectorAppend
bytevector-copy BytevectorCopy
bytevector-copy! BytevectorCopyBang
bytevector-copy! BytevectorCopyX
bytevector-length BytevectorLength
bytevector-u8-ref BytevectorU8Ref
bytevector-u8-set! BytevectorU8SetBang
bytevector-u8-set! BytevectorU8SetX
bytevector? BytevectorP
caaaar Caaaar
caaadr Caaadr
@ -187,7 +187,7 @@ list->string ListToString
list->vector ListToVector
list-copy ListCopy
list-ref ListRef
list-set! ListSetBang
list-set! ListSetX
list-tail ListTail
list? ListP
load Load
@ -246,7 +246,7 @@ rational? RationalP
rationalize Rationalize
read Read
read-bytevector ReadBytevector
read-bytevector! ReadBytevectorBang
read-bytevector! ReadBytevectorX
read-char ReadChar
read-error? ReadErrorP
read-line ReadLine
@ -258,9 +258,9 @@ remainder Remainder
reverse Reverse
round Round
scheme-report-environment SchemeReportEnvironment
set! SetBang
set-car! SetCarBang
set-cdr! SetCdrBang
set! SetX
set-car! SetCarX
set-cdr! SetCdrX
sin Sin
sqrt Sqrt
square Square
@ -277,15 +277,15 @@ string-ci=? StringCiEqualP
string-ci>=? StringCiGreaterEqualP
string-ci>? StringCiGreaterP
string-copy StringCopy
string-copy! StringCopyBang
string-copy! StringCopyX
string-downcase StringDowncase
string-fill! StringFillBang
string-fill! StringFillX
string-foldcase StringFoldcase
string-for-each StringForEach
string-length StringLength
string-map StringMap
string-ref StringRef
string-set! StringSetBang
string-set! StringSetX
string-upcase StringUpcase
string<=? StringLessEqualP
string<? StringLessP
@ -316,13 +316,13 @@ vector->list VectorToList
vector->string VectorToString
vector-append VectorAppend
vector-copy VectorCopy
vector-copy! VectorCopyBang
vector-fill! VectorFillBang
vector-copy! VectorCopyX
vector-fill! VectorFillX
vector-for-each VectorForEach
vector-length VectorLength
vector-map VectorMap
vector-ref VectorRef
vector-set! VectorSetBang
vector-set! VectorSetX
vector? VectorP
when When
with-exception-handler WithExceptionHandler

View File

@ -27,10 +27,10 @@ boolean? boolean_p
bytevector bytevector
bytevector-append bytevector_append
bytevector-copy bytevector_copy
bytevector-copy! bytevector_copy_bang
bytevector-copy! bytevector_copy_x
bytevector-length bytevector_length
bytevector-u8-ref bytevector_u8_ref
bytevector-u8-set! bytevector_u8_set_bang
bytevector-u8-set! bytevector_u8_set_x
bytevector? bytevector_p
caaaar caaaar
caaadr caaadr
@ -187,7 +187,7 @@ list->string list_to_string
list->vector list_to_vector
list-copy list_copy
list-ref list_ref
list-set! list_set_bang
list-set! list_set_x
list-tail list_tail
list? list_p
load load
@ -246,7 +246,7 @@ rational? rational_p
rationalize rationalize
read read
read-bytevector read_bytevector
read-bytevector! read_bytevector_bang
read-bytevector! read_bytevector_x
read-char read_char
read-error? read_error_p
read-line read_line
@ -258,9 +258,9 @@ remainder remainder
reverse reverse
round round
scheme-report-environment scheme_report_environment
set! set_bang
set-car! set_car_bang
set-cdr! set_cdr_bang
set! set_x
set-car! set_car_x
set-cdr! set_cdr_x
sin sin
sqrt sqrt
square square
@ -277,15 +277,15 @@ string-ci=? string_ci_equal_p
string-ci>=? string_ci_greater_equal_p
string-ci>? string_ci_greater_p
string-copy string_copy
string-copy! string_copy_bang
string-copy! string_copy_x
string-downcase string_downcase
string-fill! string_fill_bang
string-fill! string_fill_x
string-foldcase string_foldcase
string-for-each string_for_each
string-length string_length
string-map string_map
string-ref string_ref
string-set! string_set_bang
string-set! string_set_x
string-upcase string_upcase
string<=? string_less_equal_p
string<? string_less_p
@ -316,13 +316,13 @@ vector->list vector_to_list
vector->string vector_to_string
vector-append vector_append
vector-copy vector_copy
vector-copy! vector_copy_bang
vector-fill! vector_fill_bang
vector-copy! vector_copy_x
vector-fill! vector_fill_x
vector-for-each vector_for_each
vector-length vector_length
vector-map vector_map
vector-ref vector_ref
vector-set! vector_set_bang
vector-set! vector_set_x
vector? vector_p
when when
with-exception-handler with_exception_handler

View File

@ -29,7 +29,7 @@
(define names
'((#\. "dot")
(#\? "p")
(#\! "bang")
(#\! "x")
(#\+ "plus")
(#\* "star")
(#\- "minus")