Fixing more.

This commit is contained in:
Brad Nelson
2021-02-13 10:26:39 -08:00
parent 1229e2dc57
commit 6ee028c86e
3 changed files with 5 additions and 3 deletions

View File

@ -141,7 +141,7 @@
Y(esp_camera_init, n0 = esp_camera_init((camera_config_t *) a0)) \ Y(esp_camera_init, n0 = esp_camera_init((camera_config_t *) a0)) \
Y(esp_camera_deinit, PUSH esp_camera_deinit()) \ Y(esp_camera_deinit, PUSH esp_camera_deinit()) \
Y(esp_camera_fb_get, PUSH esp_camera_fb_get()) \ Y(esp_camera_fb_get, PUSH esp_camera_fb_get()) \
Y(esp_camera_db_return, esp_camera_fb_return((camera_fb_t *) a0); DROP) \ Y(esp_camera_fb_return, esp_camera_fb_return((camera_fb_t *) a0); DROP) \
Y(esp_camera_sensor_get, PUSH esp_camera_sensor_get()) Y(esp_camera_sensor_get, PUSH esp_camera_sensor_get())
#endif #endif

View File

@ -4,7 +4,7 @@
vocabulary bterm bterm definitions vocabulary bterm bterm definitions
also bluetooth also internals also bluetooth also internals
SerialBT.new constant bt SerialBT.new constant bt
z" forth" 0 bt SerialBT.begin . z" forth" 0 bt SerialBT.begin drop
esp_bt_dev_get_address hex 6 dump cr esp_bt_dev_get_address hex 6 dump cr
: bt-type bt SerialBT.write drop ; : bt-type bt SerialBT.write drop ;
: bt-key : bt-key
@ -12,4 +12,5 @@ esp_bt_dev_get_address hex 6 dump cr
: bt-on ['] bt-type is type ['] bt-key is key ; : bt-on ['] bt-type is type ['] bt-key is key ;
: bt-off ['] arduino-type is type ['] arduino-key is key ; : bt-off ['] arduino-type is type ['] arduino-key is key ;
only forth definitions only forth definitions
bterm 500 ms bt-on
| evaluate ; | evaluate ;

View File

@ -46,8 +46,9 @@ forth definitions
vocabulary SD_MMC SD_MMC definitions vocabulary SD_MMC SD_MMC definitions
transfer{ transfer{
SD_MMC.begin SD_MMC.end
SD_MMC.cardType SD_MMC.cardType
SD_MMC.begin
SD_MMC.end
SD_MMC.totalBytes SD_MMC.usedBytes SD_MMC.totalBytes SD_MMC.usedBytes
}transfer }transfer
forth definitions forth definitions